Update of /project/lisppaste/cvsroot/lisppaste2 In directory common-lisp.net:/tmp/cvs-serv28832

Modified Files: variable.lisp Log Message: defparameter is kind of unintuitive there. Spent a frustrated ten minutes wondering why my new page was 404ing until I realized that variable.lisp smashes over the old handler but never replaces it.

Date: Fri Jan 30 11:36:41 2004 Author: bmastenbrook

Index: lisppaste2/variable.lisp diff -u lisppaste2/variable.lisp:1.8 lisppaste2/variable.lisp:1.9 --- lisppaste2/variable.lisp:1.8 Fri Jan 30 11:09:47 2004 +++ lisppaste2/variable.lisp Fri Jan 30 11:36:37 2004 @@ -1,4 +1,4 @@ -;;;; $Id: variable.lisp,v 1.8 2004/01/30 16:09:47 bmastenbrook Exp $ +;;;; $Id: variable.lisp,v 1.9 2004/01/30 16:36:37 bmastenbrook Exp $ ;;;; $Source: /project/lisppaste/cvsroot/lisppaste2/variable.lisp,v $

;;;; See the LICENSE file for licensing information. @@ -40,7 +40,7 @@ (defparameter *rss-url* (araneida:merge-url *paste-external-url* "list.rss"))

-(defparameter *paste-listener* +(defvar *paste-listener* (let ((fwd-url (araneida:copy-url *paste-url*))) (setf (araneida:url-port fwd-url) *internal-http-port*) (make-instance 'araneida:serve-event-reverse-proxy-listener