Koha-community/Koha
13
7
Fork 0
Code Issues Releases Wiki Activity

Bug 4068: (follow-up) use URI::Escape

Browse source 
This allows for suggestions that contain characters such
as the ampersand to have their status changed.

Signed-off-by: Galen Charlton <gmc@esilibrary.com>
This commit is contained in:
Galen Charlton 2014-05-08 16:36:10 +00:00
parent 769f18a6a9
commit fb8d47beda
1 changed files with 4 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

7
suggestion/suggestion.pl
View file

@ -31,6 +31,7 @@ use C4::Search;
use C4::Dates qw(format_date);
use C4::Members;
use C4::Debug;
use URI::Escape;
sub Init{
my $suggestion= shift @_;
@ -182,7 +183,7 @@ elsif ($op eq "change" ) {
$$suggestion_ref{'suggestionid'}=$suggestionid;
&ModSuggestion($suggestion_ref);
}
my $params;
my $params = '';
foreach my $key (
qw(
displayby branchcode title author isbn publishercode copyrightdate
@ -192,8 +193,8 @@ elsif ($op eq "change" ) {
)
)
{
$params .= $key . '=' . $input->param($key) . '&'
if $input->param($key);
$params .= $key . '=' . uri_escape($input->param($key)) . '&'
if defined($input->param($key));
}
print $input->redirect("/cgi-bin/koha/suggestion/suggestion.pl?$params");
}elsif ($op eq "delete" ) {