Index: openacs-4/packages/acs-content-repository/tcl/image-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-content-repository/tcl/image-procs.tcl,v
diff -u -r1.8 -r1.9
--- openacs-4/packages/acs-content-repository/tcl/image-procs.tcl	29 Dec 2008 22:01:28 -0000	1.8
+++ openacs-4/packages/acs-content-repository/tcl/image-procs.tcl	1 Oct 2010 15:23:23 -0000	1.9
@@ -25,7 +25,7 @@
     {-package_id ""}
     {-creation_ip ""}
     {-item_subtype "content_item"}
-    {-content_type "content_revision"}
+    {-content_type "image"}
     {-title ""}
     {-description ""}
     {-mime_type ""}
@@ -58,7 +58,6 @@
     
     @error 
 } {
-ns_log notice "IMAGE::NEW"
     if {$width eq "" || $height eq ""} {
 	foreach {width height} [image::get_file_dimensions \
 				    -filename $tmp_filename \
@@ -82,7 +81,7 @@
                 -package_id $package_id \
                 -creation_ip $creation_ip \
                 -item_subtype $item_subtype \
-                -content_type "image" \
+                -content_type $content_type \
                 -title $title \
                 -description $description \
                 -mime_type $mime_type \