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"))