github/repo2html
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

Fixed environment variables and removed WEB-DIRECTORY environment variable

Browse source
This commit is contained in:
m455 2022-12-07 15:32:06 -05:00
parent c4239e4a82
commit a67a26548f
1 changed files with 4 additions and 5 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

9
main.scm
View file

@ -14,11 +14,10 @@
(clojurian syntax) (clojurian syntax)
) )
(define WEB-DIRECTORY (or (get-environment-variable "GIT_WWW") "/var/www/git")) (define CLONE-URL (or (get-environment-variable "REPO2HTML_CLONE_URL") "git://git.example.com"))
(define CLONE-URL (or (get-environment-variable "GIT_WWW_CLONE_URL") "git://git.example.com")) (define TITLE (or (get-environment-variable "REPO2HTML_TITLE") "my git repositories"))
(define TITLE (or (get-environment-variable "GIT_WWW_TITLE") "my git repositories")) (define DESCRIPTION (or (get-environment-variable "REPO2HTML_DESCRIPTION") "my git repositories"))
(define DESCRIPTION (or (get-environment-variable "GIT_WWW_DESCRIPTION") "my git repositories")) (define H1 (or (get-environment-variable "REPO2HTML_H1") "git.example.com"))
(define H1 (or (get-environment-variable "GIT_WWW_H1") "git.example.com"))
(define (populate-html-template repo-name display-body-thunk) (define (populate-html-template repo-name display-body-thunk)
(display #<#string-block (display #<#string-block