Update of /project/lisppaste/cvsroot/lisppaste2 In directory common-lisp.net:/tmp/cvs-serv23892 Modified Files: variable.lisp Log Message: A somewhat sane starting configuration Date: Thu Jun 17 06:26:12 2004 Author: bmastenbrook Index: lisppaste2/variable.lisp diff -u lisppaste2/variable.lisp:1.21 lisppaste2/variable.lisp:1.22 --- lisppaste2/variable.lisp:1.21 Wed Jun 9 12:48:46 2004 +++ lisppaste2/variable.lisp Thu Jun 17 06:26:12 2004 @@ -1,13 +1,13 @@ -;;;; $Id: variable.lisp,v 1.21 2004/06/09 19:48:46 bmastenbrook Exp $ +;;;; $Id: variable.lisp,v 1.22 2004/06/17 13:26:12 bmastenbrook Exp $ ;;;; $Source: /project/lisppaste/cvsroot/lisppaste2/variable.lisp,v $ ;;;; See the LICENSE file for licensing information. (in-package :lisppaste) -(defparameter *internal-http-port* 8081 +(defparameter *internal-http-port* 8000 "Port lisppaste's araneida will listen on for requests from Apache.") -(defparameter *external-http-port* 80 +(defparameter *external-http-port* 8000 "Port lisppaste's araneida will listen on for requests from remote clients.") (defparameter *paste-site-name* "localhost" @@ -23,7 +23,7 @@ (araneida:merge-url (araneida:make-url :scheme "http" :host *paste-site-name* - #|:port *external-http-port*|# + :port *external-http-port* ) "/paste/")) (defvar *meme-links* nil) ; whether to link to meme IRC logs