From 769f18a6a95b3757cb830b0765d93149d03a6495 Mon Sep 17 00:00:00 2001 From: Kyle M Hall Date: Tue, 6 May 2014 08:49:15 -0400 Subject: [PATCH] Bug 4068: ensure accepting a suggestion does not hide the 'pending' tab Prior to this patch: 1) Moving a suggestion from status 'pending' to 'accepted - After saving only tab 'accepted' is shown. 2) Moving a suggestion back from 'accepted' to 'pending' - After saving only tab 'pending' is shown. Test Plan: 1) Verify the bug by taking the actions listed above 2) Apply this patch 3) Verify the bug no longer exists Signed-off-by: Owen Leonard Signed-off-by: Jonathan Druart It is not very elegant but I have nothing else to suggest. Signed-off-by: Galen Charlton --- suggestion/suggestion.pl | 15 ++++++++++++++- 1 file changed, 14 insertions(+), 1 deletion(-) diff --git a/suggestion/suggestion.pl b/suggestion/suggestion.pl index c0327ad331..9efd015596 100755 --- a/suggestion/suggestion.pl +++ b/suggestion/suggestion.pl @@ -182,7 +182,20 @@ elsif ($op eq "change" ) { $$suggestion_ref{'suggestionid'}=$suggestionid; &ModSuggestion($suggestion_ref); } - $op = 'else'; + my $params; + foreach my $key ( + qw( + displayby branchcode title author isbn publishercode copyrightdate + collectiontitle suggestedby suggesteddate_from suggesteddate_to + manageddate_from manageddate_to accepteddate_from + accepteddate_to budgetid + ) + ) + { + $params .= $key . '=' . $input->param($key) . '&' + if $input->param($key); + } + print $input->redirect("/cgi-bin/koha/suggestion/suggestion.pl?$params"); }elsif ($op eq "delete" ) { foreach my $delete_field (@editsuggestions) { &DelSuggestion( $borrowernumber, $delete_field,'intranet' ); -- 2.39.5