[bug#54602] Germinal, a Common Lisp Gemini Server

[~vidak <vidak@riseup.net>]

[-- Attachment #1: package source code --]
[-- Type: application/octet-stream, Size: 2026 bytes --]

(use-modules (guix packages)
	     (guix build-system asdf)
	     (guix build utils)
	     (guix git)
	     (guix git-download)
	     (gnu packages lisp)
	     (gnu packages lisp-xyz)
	     ((guix licenses) #:prefix license:))

(define-public germinal
  ;; No release.
  (let ((commit "5bfb371ea57dae8985c0e1c6f184f0338487d684"))
    (package
   (name "germinal")
   (version (git-version "1.0.0" "1" commit))
   (source
    (origin
     (method git-fetch)
     (uri (git-reference
	   (url "https://git.carcosa.net/jmcbray/germinal")
	   (commit commit)))
     (file-name (git-file-name "germinal" version))
     (sha256
      (base32 "12jypa8m10825lp5yxfcm1fyk3r4ziwcri7ndxa0m5dz0y7hggck"))))
   (build-system asdf-build-system/sbcl)

   (inputs `(("alexandria" ,sbcl-alexandria)
	     ("babel" ,sbcl-babel)
	     ("usocket" ,sbcl-usocket)
             ("bordeaux-threads" ,sbcl-bordeaux-threads)
             ("cl+ssl" ,sbcl-cl+ssl)
             ("str" ,sbcl-cl-str)
             ("trivial-mimes" ,sbcl-trivial-mimes)
             ("ppath" ,sbcl-ppath)
             ("osicat" ,sbcl-osicat)
             ("cl-interpol" ,sbcl-cl-interpol)
             ("quri" ,sbcl-quri)
             ("cl-ppcre" ,sbcl-cl-ppcre)
             ("cl-fad" ,sbcl-cl-fad)
             ("local-time" ,sbcl-local-time)
             ("uax-15" ,sbcl-uax-15)))
   (outputs '("out"))
   (arguments
    `(#:asd-systems '("germinal")))
   (synopsis "A gemini protocol server in Common Lisp.")
   (description
    " Germinal is a server for the Gemini Protocol, written in Common
Lisp.

It is named after the early 20th century Yiddish-language anarchist
newspaper Germinal. I wanted to name it after an anarchist publication
to convey the idea of people sharing information and ideas with each
other, in contrast to the way the web is used to push advertising from
corporations to people. And it happened that Germinal shares some
sounds with Gemini.")
   
   (home-page "https://git.carcosa.net/jmcbray/germinal")
   (license license:agpl3))))

germinal

[-- Attachment #2: Type: text/plain, Size: 639 bytes --]


Hello all,

I have written this package for Guix. It is a gemini protocol server
written in Common Lisp.

For me, it builds and installs, but I cannot seem to understand how to
run the software.

I understand that there are Guix system configurations/definitions for
'Agate' and 'gmnisrv', that allow one to use Guix to serve gemini
content.

(see: https://guix.gnu.org/manual/en/html_node/Web-Services.html )

Could anyone help me understand how I might be able to get this
software, Germinal, running on Guix in the same way as Agate and
gmnisrv?

Thanks in advance,

~vidak

=> https://zoinks.one/vidak

=> gemini://tilde.town/~vidak