[bknr-cvs] r1920 - branches/xml-class-rework/bknr/src/web

[bknr at bknr.net]

Author: hhubner
Date: 2006-03-12 13:20:56 -0500 (Sun, 12 Mar 2006)
New Revision: 1920

Modified:
   branches/xml-class-rework/bknr/src/web/authorizer.lisp
Log:
Remove debug output.


Modified: branches/xml-class-rework/bknr/src/web/authorizer.lisp
===================================================================
--- branches/xml-class-rework/bknr/src/web/authorizer.lisp	2006-03-12 11:49:22 UTC (rev 1919)
+++ branches/xml-class-rework/bknr/src/web/authorizer.lisp	2006-03-12 18:20:56 UTC (rev 1920)
@@ -88,7 +88,6 @@
       (format t "; Caught error ~A during request processing~%" e)
       (http-error req *response-bad-request* (princ-to-string e))))
 
-  (format t "; request NOT authorized~%")
   ;; unauthorized, come up with 401 response to the web browser
   (redirect (website-make-path *website* "login") req)
   :deny)