Revision: 4617 Author: edi URL: http://bknr.net/trac/changeset/4617

Remove debugging code

U trunk/thirdparty/hunchentoot/request.lisp

Modified: trunk/thirdparty/hunchentoot/request.lisp =================================================================== --- trunk/thirdparty/hunchentoot/request.lisp 2010-10-01 00:03:54 UTC (rev 4616) +++ trunk/thirdparty/hunchentoot/request.lisp 2010-10-12 21:40:53 UTC (rev 4617) @@ -224,8 +224,6 @@ (when error (setf (return-code *reply*) +http-internal-server-error+)) - (format t "show-error ~A show-backtrace ~A error ~A backtrace: ~A~%" - *show-lisp-errors-p* *show-lisp-backtraces-p* error backtrace) (start-output :content (cond ((and error *show-lisp-errors-p*) (format nil "<pre>~A~@[~%~%Backtrace:~A~]</pre>" (escape-for-html (format nil "~A" error))