[claw-cvs] r130 - trunk/main/claw/src

[Andrea Chiumenti]

Author: achiumenti
Date: Thu Oct 30 08:37:36 2008
New Revision: 130

Log:
several bugfixes and enhancements

Modified:
   trunk/main/claw/src/session-manager.lisp

Modified: trunk/main/claw/src/session-manager.lisp
==============================================================================
--- trunk/main/claw/src/session-manager.lisp	(original)
+++ trunk/main/claw/src/session-manager.lisp	Thu Oct 30 08:37:36 2008
@@ -102,7 +102,7 @@
                :reader session-user-agent
                :documentation "The incoming 'User-Agent' header that
 was sent when this session was created.")
-   (remote-addr :initform (connector-real-remote-addr (clawserver-connector *clawserver*))
+   (remote-addr :initform (connector-remote-addr (clawserver-connector *clawserver*));(connector-real-remote-addr (clawserver-connector *clawserver*))
                 :reader session-remote-addr
                 :documentation "The remote IP address of the client when
 this sessions was started as returned by REAL-REMOTE-ADDR.")