diff options
Diffstat (limited to 'src/ellinika/cgi.scm4')
-rw-r--r-- | src/ellinika/cgi.scm4 | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/ellinika/cgi.scm4 b/src/ellinika/cgi.scm4 index 51f9570..28adea1 100644 --- a/src/ellinika/cgi.scm4 +++ b/src/ellinika/cgi.scm4 @@ -127,7 +127,7 @@ ifelse(IFACE,[CGI],[ (define-public (cgi-program-name prog) (string-append (substring cgi-script-name 0 (string-rindex cgi-script-name #\/)) "/" - prog ".SCRIPT_SUFFIX")) + prog ifelse(SCRIPT_SUFFIX,,,"SCRIPT_SUFFIX"))) (define-public (expand-template explist template) "(expand-template EXPLIST TEMPLATE) |