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))