From 1e8e13d2650d4fe4d906f92719a7120cca2b8088 Mon Sep 17 00:00:00 2001
From: Matthias Andreas Benkard <code@mail.matthias.benkard.de>
Date: Thu, 24 Mar 2011 14:12:01 +0100
Subject: Fix a stupid confusion of IF cases.

---
 mulkcms.lisp | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/mulkcms.lisp b/mulkcms.lisp
index 2fd8e4b..230a5bc 100644
--- a/mulkcms.lisp
+++ b/mulkcms.lisp
@@ -1218,8 +1218,8 @@
                                                       :test #'equal))
                                             params))
         (*base-uri* (if *use-ssl-p*
-                        *base-uri/plain*
-                        *base-uri/ssl*)))
+                        *base-uri/ssl*
+                        *base-uri/plain*)))
     (or (find-article-summary-handler path params)
         (find-comment-moderation-handler path params)
         (find-journal-archive-request-handler
-- 
cgit v1.2.3