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

Bug 17901: Force context to scalar

Browse source 
See bug 15809 for more references.

Signed-off-by: Mirko Tietgen <mirko@abunchofthings.net>

Signed-off-by: Marcel de Rooy <m.de.rooy@rijksmuseum.nl>

Signed-off-by: Kyle M Hall <kyle@bywatersolutions.com>
This commit is contained in:
Jonathan Druart 2017-01-13 17:07:34 +01:00 committed by Kyle M Hall
parent 45cffd874c
commit cb4fa17a27
1 changed files with 5 additions and 5 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

10
opac/opac-shelves.pl
View file

@ -108,12 +108,12 @@ if ( $op eq 'add_form' ) {
my $sortfield = $query->param('sortfield');
$sortfield = 'title' unless grep {/^$sortfield$/}qw( title author copyrightdate itemcallnumber );
if ( $shelf->can_be_managed( $loggedinuser ) ) {
$shelf->shelfname( $query->param('shelfname') );
$shelf->shelfname( scalar $query->param('shelfname') );
$shelf->sortfield( $sortfield );
$shelf->allow_add( $query->param('allow_add') );
$shelf->allow_delete_own( $query->param('allow_delete_own') );
$shelf->allow_delete_other( $query->param('allow_delete_other') );
$shelf->category( $query->param('category') );
$shelf->allow_add( scalar $query->param('allow_add') );
$shelf->allow_delete_own( scalar $query->param('allow_delete_own') );
$shelf->allow_delete_other( scalar $query->param('allow_delete_other') );
$shelf->category( scalar $query->param('category') );
eval { $shelf->store };
if ($@) {