diff options
| author | Matthias Benkard <code@mail.matthias.benkard.de> | 2009-10-11 13:32:38 +0200 |
|---|---|---|
| committer | Matthias Benkard <code@mail.matthias.benkard.de> | 2009-10-11 13:32:38 +0200 |
| commit | e12c4d0d4f439b401a03908b1aa94bb0675a78bf (patch) | |
| tree | 6a7a627bacabab280e8045d1109af6043bce4f19 /journal.lisp | |
| parent | 8945a307dea0fb6ed7f66b819b857c8dce6943ad (diff) | |
Make the environment variable handling code more portable.
Ignore-this: 86d0d724d12f7fe9d230c52a4f225675
darcs-hash:65849172dae755f3a2fbd529fb9c002b1d649afd
Diffstat (limited to 'journal.lisp')
| -rwxr-xr-x | journal.lisp | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/journal.lisp b/journal.lisp index 80fb17a..6652bdb 100755 --- a/journal.lisp +++ b/journal.lisp @@ -31,7 +31,7 @@ ;; use /journal as a relative URI, because it ;; won't work. (if (eq *site* :mst-plus) - (gethash "SCRIPT_NAME" *http-env* "") + (http-getenv "SCRIPT_NAME") "/journal"))) (multiple-value-call #'(lambda (&rest args) (apply #'format out args)) |