View | Details | Raw Unified | Return to bug 24345
Collapse All | Expand All

(-)a/opac/opac-suggestions.pl (-3 / +1 lines)
Lines 36-42 use Koha::Patrons; Link Here
36
use Koha::DateUtils qw( dt_from_string );
36
use Koha::DateUtils qw( dt_from_string );
37
37
38
my $input           = new CGI;
38
my $input           = new CGI;
39
my $op              = $input->param('op');
39
my $op              = $input->param('op') || 'else';
40
my $biblionumber    = $input->param('biblionumber');
40
my $biblionumber    = $input->param('biblionumber');
41
my $suggestion      = $input->Vars;
41
my $suggestion      = $input->Vars;
42
my $negcaptcha      = $input->param('negcap');
42
my $negcaptcha      = $input->param('negcap');
Lines 84-90 else { Link Here
84
# DBIx::Class::Row::store_column(): No such column 'negcap' on Koha::Schema::Result::Suggestion at  Koha/C4/Suggestions.pm
84
# DBIx::Class::Row::store_column(): No such column 'negcap' on Koha::Schema::Result::Suggestion at  Koha/C4/Suggestions.pm
85
delete $suggestion->{negcap};
85
delete $suggestion->{negcap};
86
delete $suggestion->{$_} foreach qw<op suggested_by_anyone confirm>;
86
delete $suggestion->{$_} foreach qw<op suggested_by_anyone confirm>;
87
$op = 'else' unless $op;
88
87
89
if ( $op eq 'else' ) {
88
if ( $op eq 'else' ) {
90
    if ( C4::Context->preference("OPACViewOthersSuggestions") ) {
89
    if ( C4::Context->preference("OPACViewOthersSuggestions") ) {
91
- 

Return to bug 24345