[interchange-cvs] interchange - heins modified 2 files
interchange-cvs at icdevgroup.org
interchange-cvs at icdevgroup.org
Fri May 1 16:02:50 UTC 2009
User: heins
Date: 2009-05-01 16:02:50 GMT
Modified: dist/lib/UI/pages/admin db_metaconfig.html
Modified: code/UI_Tag flex_select.coretag
Log:
* table_editor/flex_select: Add ability to link "edit record" to custom
page with custom parameter. Also can now change "edit record to
something else like "view user".
Revision Changes Path
2.24 interchange/dist/lib/UI/pages/admin/db_metaconfig.html
rev 2.24, prev_rev 2.23
Index: db_metaconfig.html
===================================================================
RCS file: /var/cvs/interchange/dist/lib/UI/pages/admin/db_metaconfig.html,v
retrieving revision 2.23
retrieving revision 2.24
diff -u -r2.23 -r2.24
--- db_metaconfig.html 1 Sep 2006 07:46:29 -0000 2.23
+++ db_metaconfig.html 1 May 2009 16:02:50 -0000 2.24
@@ -75,8 +75,9 @@
height
extended.explicit_edit extended.number_list
+ extended.explicit_edit_page extended.explicit_edit_form
+ extended.explicit_edit_anchor extended.check_uncheck_all
extended.no_code_link extended.no_checkbox
- extended.check_uncheck_all
extended.radio_box extended.user_merge
extended.ui_sort_field
extended.ui_sort_option
@@ -151,6 +152,9 @@
'extended.bottom_buttons' => 'Buttons only on bottom',
'extended.restrict_allow' => 'Allow these ITL tags',
'extended.explicit_edit' => 'Show "edit record" link',
+ 'extended.explicit_edit_page' => 'Destination for explicit edit',
+ 'extended.explicit_edit_form' => 'Form for explicit edit',
+ 'extended.explicit_edit_anchor' => 'Anchor for explicit edit',
'extended.no_code_link' => "Don't link key column to editor",
'extended.no_checkbox' => "No checkbox for group ops",
'extended.check_uncheck_all' => 'Links to check/uncheck all',
@@ -250,6 +254,9 @@
</pre>
</blockquote>},
'extended.display_type' => "Sets the general style of column edit areas",
+ 'extended.explicit_edit_page' => 'Landing page when clicking explicit edit.',
+ 'extended.explicit_edit_form' => 'Form string for explicit edit, code will be appended',
+ 'extended.explicit_edit_anchor' => 'Anchor to link for explicit edit',
'extended.link_rows_blank' => 'default 1',
'extended.link_row_qual' => 'Default is key field, needs to be different field if auto-numbering. Must not be same as Foreign Key if in auto mode.',
'extended.link_blank_auto' => 'Requires link row qualifier be separate from primary key and foreign key in linked table.',
@@ -407,4 +414,4 @@
]
@_UI_STD_FOOTER_@
-<!-- page: @@MV_PAGE@@ version: $Revision: 2.23 $ -->
+<!-- page: @@MV_PAGE@@ version: $Revision: 2.24 $ -->
1.18 interchange/code/UI_Tag/flex_select.coretag
rev 1.18, prev_rev 1.17
Index: flex_select.coretag
===================================================================
RCS file: /var/cvs/interchange/code/UI_Tag/flex_select.coretag,v
retrieving revision 1.17
retrieving revision 1.18
diff -u -r1.17 -r1.18
--- flex_select.coretag 6 Jul 2007 08:54:20 -0000 1.17
+++ flex_select.coretag 1 May 2009 16:02:50 -0000 1.18
@@ -5,13 +5,13 @@
# the Free Software Foundation; either version 2 of the License, or
# (at your option) any later version. See the LICENSE file for details.
#
-# $Id: flex_select.coretag,v 1.17 2007-07-06 08:54:20 racke Exp $
+# $Id: flex_select.coretag,v 1.18 2009-05-01 16:02:50 mheins Exp $
UserTag flex-select Order table
UserTag flex-select addAttr
UserTag flex-select attrAlias ml height
UserTag flex-select hasEndTag
-UserTag flex-select Version $Revision: 1.17 $
+UserTag flex-select Version $Revision: 1.18 $
UserTag flex-select Routine <<EOR
use vars qw/$CGI $Tmp $Tag/;
my @fs_more = qw/
@@ -661,6 +661,9 @@
data_row_style_odd => '',
form_method => 'GET',
explicit_edit => '',
+ explicit_edit_page => '',
+ explicit_edit_form => '',
+ explicit_edit_anchor => '',
no_code_link => '',
group_image => 'smindex.gif',
group_class => 'rhead',
@@ -1114,7 +1117,7 @@
my $edit_anchor;
my $ee_extra;
if($opt->{explicit_edit}) {
- $edit_anchor = errmsg('edit record');
+ $edit_anchor = $opt->{explicit_edit_anchor} || errmsg('edit record');
$edit_anchor =~ s/ / /g;
$ee_extra = '';
for(qw/ class style width align valign /) {
@@ -1135,6 +1138,7 @@
my $out = qq{<tr class="$rc">\n};
my $code_pre; my $code_post;
+ my $ep_string = '';
if($opt->{no_code_link} and ! $opt->{explicit_edit}) {
$code_pre = $code_post = '';
}
@@ -1149,7 +1153,7 @@
}
- my $ep_string = join "\n", @what, $edit_extra;
+ $ep_string = join "\n", @what, $edit_extra;
my $edit_url = $Tag->area({
href => $edit_page,
@@ -1176,8 +1180,17 @@
}
if($opt->{explicit_edit}) {
- $out .= qq{<td$ee_extra> $code_pre$edit_anchor$code_post </td>};
- $opt->{no_code_link} and $code_pre = $code_post = '';
+ my $form = $opt->{explicit_edit_form} || '';
+ if($form) {
+ $form .= $ecode;
+ }
+ my $url = $Tag->area({
+ href => $opt->{explicit_edit_page} || $edit_page,
+ form => $form || $ep_string,
+ });
+ my $msg = errmsg('process %s', $ecode);
+ my $pre = qq{<a href="$url" title="$msg">};
+ $out .= qq{<td$ee_extra> $pre$edit_anchor$code_post </td>};
}
#::logDebug("keyname=$ts->{keyname}");
More information about the interchange-cvs
mailing list