Index: openacs-4/packages/acs-subsite/tcl/email-image-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/tcl/email-image-procs.tcl,v
diff -u -r1.5 -r1.6
--- openacs-4/packages/acs-subsite/tcl/email-image-procs.tcl	18 Apr 2006 13:00:45 -0000	1.5
+++ openacs-4/packages/acs-subsite/tcl/email-image-procs.tcl	4 Jun 2006 00:45:42 -0000	1.6
@@ -241,7 +241,7 @@
 	    set revision_id [content::revision::new -item_id $item_id -title $image_name \
 				 -mime_type $mime_type  \
 				 -description "User email image" -creation_ip $creation_ip ]
-	    db_dml edit_update_cr_items { }
+	    db_dml update_cr_items { }
 	    db_dml lob_content { } -blob_files [list ${dest_path}]
 	    db_dml lob_size { }
 	}