diff options
| author | Matthias Benkard <code@mail.matthias.benkard.de> | 2009-10-11 14:05:13 +0200 |
|---|---|---|
| committer | Matthias Benkard <code@mail.matthias.benkard.de> | 2009-10-11 14:05:13 +0200 |
| commit | f02ddebb0c69e80f42ee95651a25c2c32521da1e (patch) | |
| tree | 72d42fe23bd3e527b45f1dca91c32ec191d87fdd /main.lisp | |
| parent | cd63ad537e0fd30a76c4e6698bfd5043f1b91296 (diff) | |
Revert to the old CGI helper behaviour.
Ignore-this: b281d0b979d7679984a19b932d696ce5
darcs-hash:90286efc80b24a549a7a97f98f62f5932707223d
Diffstat (limited to 'main.lisp')
| -rw-r--r-- | main.lisp | 4 |
1 files changed, 3 insertions, 1 deletions
@@ -356,4 +356,6 @@ (<:pre (<:as-html (with-output-to-string (out) #+clisp (system::pretty-print-condition e out) #+clisp (system::print-backtrace :out out))))))))) - (journal-main :admin-mode admin-mode))) + (journal-main :admin-mode (member "--admin-mode" + (coerce (ext:argv) 'list) + :test #'string=)))) |