From c0d5cc9f3b5282834d008048a65349283a5fd7a8 Mon Sep 17 00:00:00 2001 From: Doug Bell Date: Mon, 10 Jan 2011 19:38:33 -0600 Subject: [PATCH] fix dataform jumping between views when moving fields --- lib/WebGUI/Asset/Wobject/DataForm.pm | 9 +++++---- 1 file changed, 5 insertions(+), 4 deletions(-) diff --git a/lib/WebGUI/Asset/Wobject/DataForm.pm b/lib/WebGUI/Asset/Wobject/DataForm.pm index 432ef021a..5ae47a925 100644 --- a/lib/WebGUI/Asset/Wobject/DataForm.pm +++ b/lib/WebGUI/Asset/Wobject/DataForm.pm @@ -127,12 +127,13 @@ sub _fieldAdminIcons { my $self = shift; my $fieldName = shift; my $i18n = WebGUI::International->new($self->session,"Asset_DataForm"); + my $mode = ";mode=" . $self->currentView; my $output; - $output = $self->session->icon->delete('func=deleteFieldConfirm;fieldName='.$fieldName,$self->get("url"),$i18n->get(19)) + $output = $self->session->icon->delete('func=deleteFieldConfirm;fieldName='.$fieldName.$mode,$self->get("url"),$i18n->get(19)) unless $self->getFieldConfig($fieldName)->{isMailField}; - $output .= $self->session->icon->edit('func=editField;fieldName='.$fieldName,$self->get("url")) - . $self->session->icon->moveUp('func=moveFieldUp;fieldName='.$fieldName,$self->get("url")) - . $self->session->icon->moveDown('func=moveFieldDown;fieldName='.$fieldName,$self->get("url")); + $output .= $self->session->icon->edit('func=editField;fieldName='.$fieldName.$mode,$self->get("url")) + . $self->session->icon->moveUp('func=moveFieldUp;fieldName='.$fieldName.$mode,$self->get("url")) + . $self->session->icon->moveDown('func=moveFieldDown;fieldName='.$fieldName.$mode,$self->get("url")); return $output; } #-------------------------------------------------------------------