Index: openacs-4/packages/xotcl-core/tcl/http-client-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/xotcl-core/tcl/http-client-procs.tcl,v
diff -u -r1.23 -r1.24
--- openacs-4/packages/xotcl-core/tcl/http-client-procs.tcl	29 Dec 2008 02:17:48 -0000	1.23
+++ openacs-4/packages/xotcl-core/tcl/http-client-procs.tcl	14 Jan 2010 10:34:57 -0000	1.24
@@ -121,15 +121,15 @@
 
   Class create HttpCore \
       -slots {
-        Attribute host
-        Attribute protocol -default "http" 
-        Attribute port 
-        Attribute path -default "/"
-        Attribute url
-        Attribute post_data -default ""
-        Attribute content_type -default "text/plain"
-        Attribute request_header_fields -default {}
-        Attribute user_agent -default "xohttp/0.2"
+        Attribute create host
+        Attribute create protocol -default "http" 
+        Attribute create port 
+        Attribute create path -default "/"
+        Attribute create url
+        Attribute create post_data -default ""
+        Attribute create content_type -default "text/plain"
+        Attribute create request_header_fields -default {}
+        Attribute create user_agent -default "xohttp/0.2"
       }
 
   # Provide for mapping from HTTP charset encoding labels
@@ -439,7 +439,7 @@
   #
 
   Class HttpRequest -superclass HttpCore -slots {
-    Attribute timeout -type integer
+    Attribute create timeout -type integer
   }
 
   HttpRequest instproc init {} {
@@ -507,8 +507,8 @@
   #
 
   Class AsyncHttpRequest -superclass HttpCore -slots {
-    Attribute timeout -type integer -default 10000 ;# 10 seconds
-    Attribute request_manager
+    Attribute create timeout -type integer -default 10000 ;# 10 seconds
+    Attribute create request_manager
   }
   AsyncHttpRequest instproc set_timeout {} {
     my cancel_timeout
@@ -668,7 +668,7 @@
   Class create AsyncHttpRequest::RequestManager \
       -superclass AsyncHttpRequest::SimpleListener \
       -slots {
-	Attribute condition
+	Attribute create condition
       } -instproc finalize {obj status value} {
 	# set the result and do the notify
 	my instvar condition