Index: openacs-4/packages/cms/www/modules/items/create-2.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/cms/www/modules/items/create-2.tcl,v
diff -u -N -r1.7.2.2 -r1.7.2.3
--- openacs-4/packages/cms/www/modules/items/create-2.tcl	19 Feb 2007 22:17:43 -0000	1.7.2.2
+++ openacs-4/packages/cms/www/modules/items/create-2.tcl	27 Feb 2007 21:42:17 -0000	1.7.2.3
@@ -87,13 +87,31 @@
     -content_method $content_method
 
 # added to support content storage selection (OpenACS - DanW)
-element create create_item storage_type \
-	-datatype keyword \
-	-widget radio \
-	-label "Content Storage Type" \
-        -options { {{Lob Storage} lob } {{File Storage} file} {{Text Storage} text}} \
-	-values [list "text"]
+switch $content_method {
+    file_upload {
+	element create create_item storage_type \
+	    -datatype text \
+	    -widget hidden \
+	    -value file
+    }
+    no_content {
+	element create create_item storage_type \
+	    -datatype text \
+	    -widget hidden \
+	    -optional \
+	    -value text
+    }
+    default {
+	element create create_item storage_type \
+	    -datatype keyword \
+	    -widget radio \
+	    -label "Content Storage Type" \
+	    -options { {{Lob Storage} lob } {{Text Storage} text}} \
+	    -values [list "text"]
+    }
+}
 
+
 if { [wizard exists] } {
   set is_wizard t
   wizard submit create_item