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],[ | |||
127 | (define-public (cgi-program-name prog) | 127 | (define-public (cgi-program-name prog) |
128 | (string-append | 128 | (string-append |
129 | (substring cgi-script-name 0 (string-rindex cgi-script-name #\/)) "/" | 129 | (substring cgi-script-name 0 (string-rindex cgi-script-name #\/)) "/" |
130 | prog ".SCRIPT_SUFFIX")) | 130 | prog ifelse(SCRIPT_SUFFIX,,,"SCRIPT_SUFFIX"))) |
131 | 131 | ||
132 | (define-public (expand-template explist template) | 132 | (define-public (expand-template explist template) |
133 | "(expand-template EXPLIST TEMPLATE) | 133 | "(expand-template EXPLIST TEMPLATE) |