[interchange-cvs] interchange - heins modified code/UI_Tag/row_edit.coretag

[interchange-cvs at icdevgroup.org]

User:      heins
Date:      2004-01-13 21:33:55 GMT
Modified:  code/UI_Tag row_edit.coretag
Log:
* Honor spread_width meta setting as is right.

Revision  Changes    Path
1.8       +2 -1      interchange/code/UI_Tag/row_edit.coretag


rev 1.8, prev_rev 1.7
Index: row_edit.coretag
===================================================================
RCS file: /var/cvs/interchange/code/UI_Tag/row_edit.coretag,v
retrieving revision 1.7
retrieving revision 1.8
diff -u -r1.7 -r1.8
--- row_edit.coretag	25 Jun 2003 16:38:17 -0000	1.7
+++ row_edit.coretag	13 Jan 2004 21:33:55 -0000	1.8
@@ -2,6 +2,7 @@
 UserTag row-edit Order key table size columns
 UserTag row-edit addAttr
 UserTag row-edit Interpolate 1
+UserTag row-edit Version $Revision: 1.8 $
 UserTag row-edit Routine <<EOR
 sub {
 	my ($key,$table,$size,$columns,$opt) = @_;
@@ -115,7 +116,7 @@
 	}
 	my $tmp;
 
-	$size = $size || $view->{width} || 12;
+	$size = $size || $view->{spread_width} || $view->{width} || 12;
 	if($bad) {
 		for(@cols) {
 			$out .= "<TD$tf_extra>$bad</TD>";