X-Git-Url: http://koha-dev.rot13.org:8081/gitweb/?a=blobdiff_plain;f=opac%2Fopac-suggestions.pl;h=15eebf914459790806b37634a3f6c0603c4178e7;hb=8d7608cd64a74d3513fb618d39a5a0f414fdf6a3;hp=2f0dc368865b2864fcf5f04b1cd123913921e303;hpb=2a3f7c141798121a75fc9ee670af0fdde431d9c2;p=koha_fer diff --git a/opac/opac-suggestions.pl b/opac/opac-suggestions.pl index 2f0dc36886..15eebf9144 100755 --- a/opac/opac-suggestions.pl +++ b/opac/opac-suggestions.pl @@ -20,6 +20,7 @@ use warnings; use CGI; use C4::Auth; # get_template_and_user +use C4::Members; use C4::Branch; use C4::Koha; use C4::Output; @@ -77,7 +78,7 @@ if ( $op eq "add_confirm" ) { } else { $$suggestion{'suggesteddate'}=C4::Dates->today; - $$suggestion{'branchcode'}=C4::Context->userenv->{"branch"}; + $$suggestion{'branchcode'}= $input->param('branch') || C4::Context->userenv->{"branch"}; &NewSuggestion($suggestion); # empty fields, to avoid filter in "SearchSuggestion" $$suggestion{$_}='' foreach qw