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.30 -r1.31
--- openacs-4/packages/xotcl-core/tcl/http-client-procs.tcl	27 Oct 2014 16:42:01 -0000	1.30
+++ openacs-4/packages/xotcl-core/tcl/http-client-procs.tcl	7 Aug 2017 23:48:30 -0000	1.31
@@ -462,7 +462,7 @@
   # Synchronous (blocking) requests
   #
 
-  Class HttpRequest -superclass HttpCore -slots {
+  Class create HttpRequest -superclass HttpCore -slots {
     Attribute create timeout -type integer
   }
 
@@ -530,7 +530,7 @@
   # Asynchronous (non-blocking) requests
   #
 
-  Class AsyncHttpRequest -superclass HttpCore -slots {
+  Class create AsyncHttpRequest -superclass HttpCore -slots {
     Attribute create timeout -type integer -default 10000 ;# 10 seconds
     Attribute create request_manager
   }
@@ -671,13 +671,13 @@
       } -instproc success {payload obj} {
         my debug "[string length $payload] bytes payload"
         #if {[string length $payload]<600} {my log payload=$payload}
-        # this is called as after a succesful request
+        # this is called as after a successful request
         my finalize $obj "JOB_COMPLETED" $payload
 
       } -instproc failure {reason obj} {
         my log "[self proc] [self args]"
         my log "failed for '$reason'"
-        # this is called as after an unsuccesful request
+        # this is called as after an unsuccessful request
         my finalize $obj "JOB_FAILED" $reason
 
       } -instproc unknown {method args} {
@@ -752,7 +752,7 @@
   # - http://wp.netscape.com/eng/ssl3/3-SPEC.HTM
   # - - - - - - - - - - - - - - - - - - 
   
-  Class Tls
+  Class create Tls
   Tls instproc open_connection {} {
     my instvar S
     #
@@ -770,7 +770,7 @@
   # Trace Requests
   #                                 
 
-  Class HttpRequestTrace 
+  Class create HttpRequestTrace 
   nsv_set HttpRequestTrace count 0
 
   HttpRequestTrace instproc init {} {