33 lines
673 B
Plaintext
33 lines
673 B
Plaintext
#!@GUILE@ \
|
|
--no-auto-compile -e main -s
|
|
!#
|
|
|
|
(use-modules (config)
|
|
(config api)
|
|
(config licenses)
|
|
(config parser sexp)
|
|
(starvat listener)
|
|
(starvat handler))
|
|
|
|
(define %configuration
|
|
(configuration
|
|
(name 'starvat)
|
|
(version @HVERSION@)
|
|
(author @AUTHOR@)
|
|
(copyright @COPYRIGHT@)
|
|
(license @LICENSE@)
|
|
(synopsis "A Gemini server based on Spritely's Goblins")
|
|
(description
|
|
"TODO")
|
|
(directory '("/etc/starvat/"
|
|
(in-home ".config/starvat/")))
|
|
(parser simple-sexp-parser)
|
|
(generate-cmdtree? #t)))
|
|
|
|
(define (main args)
|
|
(define options (getopt-config-auto args %configuration)))
|
|
|
|
;;; Local Variables:
|
|
;;; mode: scheme
|
|
;;; End:
|