[claw-cvs] r169 - in trunk/main: claw-as/src claw-demo/src/frontend

[Andrea Chiumenti]

Author: achiumenti
Date: Fri Dec 26 08:31:37 2008
New Revision: 169

Log:
small realm bugfix 

Modified:
   trunk/main/claw-as/src/misc.lisp
   trunk/main/claw-demo/src/frontend/main.lisp

Modified: trunk/main/claw-as/src/misc.lisp
==============================================================================
--- trunk/main/claw-as/src/misc.lisp	(original)
+++ trunk/main/claw-as/src/misc.lisp	Fri Dec 26 08:31:37 2008
@@ -51,7 +51,7 @@
   (defvar *claw-libraries-resources* ()
     "Global variable to hold exposed web resources")
 
-  (defvar *claw-current-realm* "CLAW"
+  (defvar *claw-current-realm* 'claw
     "The realm under which the request has been sent.
 A realm is used to group resources under a common 'place', and is used for registered web applications
 to have different or common sessions for a give user.")

Modified: trunk/main/claw-demo/src/frontend/main.lisp
==============================================================================
--- trunk/main/claw-demo/src/frontend/main.lisp	(original)
+++ trunk/main/claw-demo/src/frontend/main.lisp	Fri Dec 26 08:31:37 2008
@@ -35,7 +35,7 @@
 
 (defvar *dojo-demo-lisplet*)
 
-(setf *dojo-demo-lisplet* (make-instance 'lisplet :realm "demo"
+(setf *dojo-demo-lisplet* (make-instance 'lisplet :realm 'demo
                                          :redirect-protected-resources-p t
                                          :base-path "/demo"))