Author: troussanov Date: 2006-03-12 16:15:02 -0500 (Sun, 12 Mar 2006) New Revision: 1926
Modified: trunk/projects/hello-web/src/load.lisp trunk/projects/hello-web/src/packages.lisp trunk/projects/hello-web/src/webserver.lisp Log: Make hello-web wirking again with CMUL
Modified: trunk/projects/hello-web/src/load.lisp =================================================================== --- trunk/projects/hello-web/src/load.lisp 2006-03-12 21:13:40 UTC (rev 1925) +++ trunk/projects/hello-web/src/load.lisp 2006-03-12 21:15:02 UTC (rev 1926) @@ -6,4 +6,5 @@ (swank::create-swank-server 4005 :spawn #'swank::simple-announce-function t) (hello-web::startup)
+#-sbcl (mp::startup-idle-and-top-level-loops)
Modified: trunk/projects/hello-web/src/packages.lisp =================================================================== --- trunk/projects/hello-web/src/packages.lisp 2006-03-12 21:13:40 UTC (rev 1925) +++ trunk/projects/hello-web/src/packages.lisp 2006-03-12 21:15:02 UTC (rev 1926) @@ -11,7 +11,10 @@ (defpackage :hello-web.tags (:use :cl :cl-user -; :ext + #-sbcl + :ext + #+sbcl + :sb-ext :bknr.web :xhtml-generator :hello-web.config) @@ -32,7 +35,10 @@ (defpackage :hello-web (:use :cl :cl-user -; :ext + #-sbcl + :ext + #+sbcl + :sb-ext :cl-interpol :cl-ppcre :bknr.utils
Modified: trunk/projects/hello-web/src/webserver.lisp =================================================================== --- trunk/projects/hello-web/src/webserver.lisp 2006-03-12 21:13:40 UTC (rev 1925) +++ trunk/projects/hello-web/src/webserver.lisp 2006-03-12 21:15:02 UTC (rev 1926) @@ -24,7 +24,7 @@ (:bknr . :bknr.web) (:menu . :bknr.site-menu))) ("/static" directory-handler - :destination ,(#-sbcl unix-namestring #+sbcl sb-ext:native-namestring + :destination ,(#-sbcl unix-namestring #+sbcl native-namestring (merge-pathnames #p"static/" *website-directory*)) )) :modules '(images user)