Index: openacs-4/packages/acs-tcl/tcl/form-processing-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/form-processing-procs.tcl,v
diff -u -r1.59 -r1.60
--- openacs-4/packages/acs-tcl/tcl/form-processing-procs.tcl	14 May 2007 20:30:26 -0000	1.59
+++ openacs-4/packages/acs-tcl/tcl/form-processing-procs.tcl	12 Oct 2007 07:21:49 -0000	1.60
@@ -611,6 +611,7 @@
                 lappend af_element_names($form_name) "[concat "-section" [uplevel [list subst [lrange $element 1 end]]]]"
             } else {
                 set element_name_part [uplevel [list subst $element_name_part]]
+ns_log notice "element_name_part=$element_name_part"
                 if { ![regexp {^([^ \t:]+)(?::([a-zA-Z0-9_,(|)]*))?$} $element_name_part match element_name flags] } {
                     return -code error "Form element '$element_name_part' doesn't have the right format. It must be var\[:flag\[,flag ...\]\]"
                 }
Index: openacs-4/packages/acs-tcl/tcl/request-processor-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/request-processor-procs.tcl,v
diff -u -r1.89 -r1.90
--- openacs-4/packages/acs-tcl/tcl/request-processor-procs.tcl	14 Aug 2007 14:09:01 -0000	1.89
+++ openacs-4/packages/acs-tcl/tcl/request-processor-procs.tcl	12 Oct 2007 07:21:49 -0000	1.90
@@ -488,6 +488,7 @@
         set path "[acs_root_dir]/www/resources/[join [lrange [ns_conn urlv] 1 end] /]"
     }
     if { [file isfile $path] } {
+        ns_setexpires 300
         ns_returnfile 200 [ns_guesstype $path] $path
         return filter_return
     } else {
Index: openacs-4/packages/acs-tcl/tcl/security-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/security-procs.tcl,v
diff -u -r1.44 -r1.45
--- openacs-4/packages/acs-tcl/tcl/security-procs.tcl	16 Jul 2007 00:54:16 -0000	1.44
+++ openacs-4/packages/acs-tcl/tcl/security-procs.tcl	12 Oct 2007 07:21:49 -0000	1.45
@@ -158,7 +158,7 @@
 
 } {
     ns_log debug "OACS= sec_login_handler: enter"
-
+ns_log notice "--login handler"
     set auth_level none
     set new_user_id 0
     set untrusted_user_id 0
@@ -186,6 +186,7 @@
         # Check authentication cookie
         # First, check expiration 
         if { [sec_login_timeout] == 0 || [ns_time] - $login_expr < [sec_login_timeout] } {
+ns_log notice "-CHECK AUTH TOKEN"
             # Then check auth_token
             if {$auth_token eq [sec_get_user_auth_token $untrusted_user_id]} {
                 # Are we secure?
Index: openacs-4/packages/acs-tcl/tcl/utilities-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/utilities-procs.tcl,v
diff -u -r1.100 -r1.101
--- openacs-4/packages/acs-tcl/tcl/utilities-procs.tcl	25 Sep 2007 15:22:38 -0000	1.100
+++ openacs-4/packages/acs-tcl/tcl/utilities-procs.tcl	12 Oct 2007 07:21:49 -0000	1.101
@@ -1723,15 +1723,16 @@
    It returns status 200 and all headers including
    any added to outputheaders.
 } {
+
+   if {[string match "text/*" $content_type] && ![string match *charset=* $content_type]} {
+     append content_type "; charset=[ns_config ns/parameters OutputCharset iso-8859-1]"
+   }
+
    set all_the_headers "HTTP/1.0 200 OK
 MIME-Version: 1.0
 Content-Type: $content_type\r\n"
     util_WriteWithExtraOutputHeaders $all_the_headers
-    if {[string match "text/*" $content_type]} {
-      if {![string match *charset=* $content_type]} {
-	append content_type \
-	    "; charset=[ns_config ns/parameters OutputCharset iso-8859-1]"
-      }
+   if {[string match "text/*" $content_type]} {
       ns_startcontent -type $content_type
     } else {
       ns_startcontent