[interchange-cvs] interchange - racke modified
code/UI_Tag/row_edit.coretag
interchange-cvs at icdevgroup.org
interchange-cvs at icdevgroup.org
Fri Mar 19 06:27:12 EST 2004
User: racke
Date: 2004-03-19 11:27:08 GMT
Modified: code/UI_Tag row_edit.coretag
Log:
display columns in the same order as in the columns parameter
needed for UI-offshore usage
Revision Changes Path
1.9 +3 -3 interchange/code/UI_Tag/row_edit.coretag
rev 1.9, prev_rev 1.8
Index: row_edit.coretag
===================================================================
RCS file: /anon_cvs/repository/interchange/code/UI_Tag/row_edit.coretag,v
retrieving revision 1.8
retrieving revision 1.9
diff -u -r1.8 -r1.9
--- row_edit.coretag 13 Jan 2004 21:33:55 -0000 1.8
+++ row_edit.coretag 19 Mar 2004 11:27:08 -0000 1.9
@@ -2,7 +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 Version $Revision: 1.9 $
UserTag row-edit Routine <<EOR
sub {
my ($key,$table,$size,$columns,$opt) = @_;
@@ -78,10 +78,10 @@
if($columns ||= $view->{spread_cols} || $view->{attribute}) {
@cols = split /[\s,\0]+/, $columns;
my %col;
- for(@cols) {
+ for($db->columns()) {
$col{$_} = 1;
}
- @cols = grep defined $col{$_}, $db->columns();
+ @cols = grep defined $col{$_}, @cols;
}
else {
@cols = $db->columns();
More information about the interchange-cvs
mailing list