Index: openacs-4/packages/xotcl-core/tcl/05-db-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/xotcl-core/tcl/05-db-procs.tcl,v
diff -u -r1.58 -r1.59
--- openacs-4/packages/xotcl-core/tcl/05-db-procs.tcl	14 Mar 2008 20:04:57 -0000	1.58
+++ openacs-4/packages/xotcl-core/tcl/05-db-procs.tcl	17 Mar 2008 00:28:58 -0000	1.59
@@ -697,7 +697,7 @@
       # for now, we simply return a constant "unknown", otherwise the
       # argument would be required
       return [db_list_of_lists [my qn get_function_params] {
-	select args.argument_name, 'unknown'
+	select args.argument_name, 'NULL'
         from user_arguments args
         where args.position > 0
         and args.object_name = upper(:object_name)
@@ -1637,7 +1637,8 @@
   } {
     upvar $tz_var tz
     set tz 00
-    regexp {^([^.]+)[.]?[0-9]*([+-][0-9]*)$} $timestamp _ timestamp tz
+    #regexp {^([^.]+)[.]?[0-9]*([+-][0-9]*)$} $timestamp _ timestamp tz
+    regexp {^([^.]+)[.][0-9]*([+-][0-9]*)$} $timestamp _ timestamp tz
     return $timestamp
   }
 }
Index: openacs-4/packages/xotcl-core/tcl/cr-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/xotcl-core/tcl/cr-procs.tcl,v
diff -u -r1.16 -r1.17
--- openacs-4/packages/xotcl-core/tcl/cr-procs.tcl	14 Mar 2008 19:34:00 -0000	1.16
+++ openacs-4/packages/xotcl-core/tcl/cr-procs.tcl	17 Mar 2008 00:28:58 -0000	1.17
@@ -818,7 +818,7 @@
         lappend values $v
       }
       return "insert into [my set table_name]i ([join $attributes ,]) \
-                values ([join $values ,])"
+                values (:[join $values ,:])"
     }
 
     CrItem instproc fix_content {{-only_text false} revision_id content} {
@@ -867,8 +867,8 @@
         set sql "update [$domain table_name] \
                 set $att = :value \
 		where [$domain id_column] = $revision_id"
+        db_dml [my qn update_attribute-$att] $sql
       }
-      db_dml [my qn update_attribute-$att] $sql
     }
   }