[interchange-cvs] interchange - heins modified 2 files

interchange-cvs at icdevgroup.org interchange-cvs at icdevgroup.org
Wed Jul 21 17:21:24 EDT 2004


User:      heins
Date:      2004-07-21 21:21:24 GMT
Modified:  dist/lib/UI/pages/admin meta_editor.html
Modified:  code/Widget uploadblob.widget
Log:
* Remove "File Upload" tab from meta_editor, which only served one
  widget.

* Relocate name_to and size_to from "File Upload" to ExtraMeta for
  uploadblob widget, where it now belongs.

Revision  Changes    Path
2.14      +1 -14     interchange/dist/lib/UI/pages/admin/meta_editor.html


rev 2.14, prev_rev 2.13
Index: meta_editor.html
===================================================================
RCS file: /var/cvs/interchange/dist/lib/UI/pages/admin/meta_editor.html,v
retrieving revision 2.13
retrieving revision 2.14
diff -u -r2.13 -r2.14
--- meta_editor.html	21 Jul 2004 05:46:55 -0000	2.13
+++ meta_editor.html	21 Jul 2004 21:21:24 -0000	2.14
@@ -125,11 +125,6 @@
 	   extended.data_cell_class
 	   extended.data_cell_style
 
-	   =File Upload
-
-	   extended.name_to
-	   extended.size_to
-
 	   =Advanced
 
 	   outboard
@@ -143,8 +138,6 @@
 
 	options	=> {
 		'extended.ui_sort_option' => qq{=--default--,f=Case insensitive, fr=Case insensitive/Reverse, n=Numeric, nr=Reverse Numeric},
-		'extended.size_to' => qq{columns::$m_table},
-		'extended.name_to' => qq{columns::$m_table},
 		'field' => qq{columns::$m_table},
 	},
 
@@ -180,8 +173,6 @@
 		'extended.maxlength' => 'Maxlength',
 		'extended.check' => 'Profile check',
 		'extended.blank_default' => 'Default value',
-		'extended.size_to' => 'Field to store uploadblob size in',
-		'extended.name_to' => 'Field to store uploadblob file name in',
 		'extended.restrict_allow' => 'Allow these ITL tags',
 		'display_filter' => 'Display filter',
 	},
@@ -191,8 +182,6 @@
 		'extended.maxlength' => 'For text widget (HTML maxlength=NN)',
 		'extended.blank_default' => 'Applies only when empty',
 		'extended.check' => 'Standard IC mv_profile checks -- required, postcode, etc.',
-		'extended.size_to' => 'if any -- must be in fields of table editor',
-		'extended.name_to' => 'if any -- must be in fields of table editor',
 		'extended.restrict_allow' => 'in append/prepend/lookup_query',
 		'display_filter' => 'Only used for hidden_text type',
 	},
@@ -200,8 +189,6 @@
 		extended => "textarea_5_50",
 		'extended.ui_more_alpha' => 'yesno',
 		'extended.ui_sort_option' => 'select',
-		'extended.size_to' => 'select',
-		'extended.name_to' => 'select',
 		'extended.fs_no_group' => 'yesno',
 		'extended.fs_display_filter' => 'text_50',
 		'extended.fs_data_calc' => 'textarea_4_70',
@@ -284,4 +271,4 @@
 	][/table-editor]
 
 @_UI_STD_FOOTER_@
-<!-- page: @@MV_PAGE@@ version: $Revision: 2.13 $ -->
+<!-- page: @@MV_PAGE@@ version: $Revision: 2.14 $ -->



1.2       +24 -2     interchange/code/Widget/uploadblob.widget


rev 1.2, prev_rev 1.1
Index: uploadblob.widget
===================================================================
RCS file: /var/cvs/interchange/code/Widget/uploadblob.widget,v
retrieving revision 1.1
retrieving revision 1.2
diff -u -r1.1 -r1.2
--- uploadblob.widget	3 Jun 2004 06:31:19 -0000	1.1
+++ uploadblob.widget	21 Jul 2004 21:21:24 -0000	1.2
@@ -6,7 +6,9 @@
 	my $name = $opt->{name};
 	my $size = $opt->{cols} || $opt->{width};
 
-	my $out = '';
+	my $pre = $opt->{prepend} || '';
+	my $app = $opt->{append} || '';
+	my $out = $pre;
 
 	if(my $n = $opt->{name_to}) {
 		$out .= qq{<INPUT TYPE=hidden NAME="mv_data_file_name_to_$name" VALUE="$n">};
@@ -17,8 +19,28 @@
 	
 	$size = qq{ SIZE="$size"} if $size > 0;
     $out .= qq{<INPUT TYPE=hidden NAME="mv_data_file_field" VALUE="$name">
-<INPUT TYPE=file NAME="$name"$size>};
+<INPUT TYPE=hidden NAME="mv_data_file_path" VALUE="">
+<INPUT TYPE=hidden NAME="mv_data_file_oldfile" VALUE="">
+<INPUT TYPE=file NAME="$name"$size>$app};
 	return $out;
 }
 EOR
+
+CodeDef uploadblob ExtraMeta <<EOM
+{
+	_order => [ qw/ name_to size_to /],
+	name_to => {
+		options => 'columns::',
+		label => 'Field to store uploadblob file name in',
+		help => 'if any -- must be in fields of table editor',
+		widget => 'select',
+	},
+	size_to => {
+		options => 'columns::',
+		label => 'Field to store uploadblob size in',
+		help => 'if any -- must be in fields of table editor',
+		widget => 'select',
+	},
+}
+EOM
 








More information about the interchange-cvs mailing list