[interchange-cvs] interchange - heins modified
lib/Vend/Table/Editor.pm
interchange-cvs at icdevgroup.org
interchange-cvs at icdevgroup.org
Sun Apr 17 08:41:25 EDT 2005
User: heins
Date: 2005-04-17 12:41:25 GMT
Modified: lib/Vend/Table Editor.pm
Log:
* Correct exclusion mapping for top buttons and messages area. This corrects
an empty table data cell which was not displaying messages when BOTTOM_BUTTONS
was in effect.
Revision Changes Path
1.71 +4 -4 interchange/lib/Vend/Table/Editor.pm
rev 1.71, prev_rev 1.70
Index: Editor.pm
===================================================================
RCS file: /var/cvs/interchange/lib/Vend/Table/Editor.pm,v
retrieving revision 1.70
retrieving revision 1.71
diff -u -r1.70 -r1.71
--- Editor.pm 15 Apr 2005 13:57:05 -0000 1.70
+++ Editor.pm 17 Apr 2005 12:41:24 -0000 1.71
@@ -1,6 +1,6 @@
# Vend::Table::Editor - Swiss-army-knife table editor for Interchange
#
-# $Id: Editor.pm,v 1.70 2005/04/15 13:57:05 mheins Exp $
+# $Id: Editor.pm,v 1.71 2005/04/17 12:41:24 mheins Exp $
#
# Copyright (C) 2002-2003 Interchange Development Group
# Copyright (C) 2002 Mike Heins <mike at perusion.net>
@@ -26,7 +26,7 @@
package Vend::Table::Editor;
use vars qw($VERSION);
-$VERSION = substr(q$Revision: 1.70 $, 10);
+$VERSION = substr(q$Revision: 1.71 $, 10);
use Vend::Util;
use Vend::Interpolate;
@@ -2723,6 +2723,7 @@
|| defined $opt->{include_form}
|| $mlabel;
+ $mlabel ||= ' ';
if ($extra_ok and ! $opt->{no_top} and ! $opt->{nosave}) {
if($opt->{back_text}) {
chunk ttag(), 'OUTPUT_MAP', <<EOF; # unless $wo;
@@ -2751,9 +2752,8 @@
<INPUT TYPE=submit NAME=mv_click VALUE="$opt->{cancel_text}"$opt->{cancel_button_extra}> <B><INPUT TYPE=submit NAME=mv_click VALUE="$opt->{next_text}"$opt->{next_button_extra}></B>
<BR>
EOF
- chunk 'MLABEL', 'BOTTOM_BUTTONS OUTPUT_MAP', 'MESSAGES', $mlabel;
+ chunk 'MLABEL', 'NO_TOP OUTPUT_MAP', 'MESSAGES', $mlabel;
chunk ttag(), 'NO_TOP OUTPUT_MAP', <<EOF;
-
</td>
</tr>
$opt->{spacer_row}
More information about the interchange-cvs
mailing list