Lines 63-89
if ( $op eq 'add_form' ) {
Link Here
|
63 |
push @messages, { type => 'error', code => 'does_not_exist' }; |
63 |
push @messages, { type => 'error', code => 'does_not_exist' }; |
64 |
} |
64 |
} |
65 |
} elsif ( $op eq 'add' ) { |
65 |
} elsif ( $op eq 'add' ) { |
66 |
eval { |
66 |
if ( $loggedinuser ) { |
67 |
$shelf = Koha::Virtualshelf->new( |
67 |
eval { |
68 |
{ shelfname => $query->param('shelfname'), |
68 |
$shelf = Koha::Virtualshelf->new( |
69 |
sortfield => $query->param('sortfield'), |
69 |
{ shelfname => $query->param('shelfname'), |
70 |
category => $query->param('category') || 1, |
70 |
sortfield => $query->param('sortfield'), |
71 |
allow_add => $query->param('allow_add'), |
71 |
category => $query->param('category') || 1, |
72 |
allow_delete_own => $query->param('allow_delete_own'), |
72 |
allow_add => $query->param('allow_add'), |
73 |
allow_delete_other => $query->param('allow_delete_other'), |
73 |
allow_delete_own => $query->param('allow_delete_own'), |
74 |
owner => $query->param('owner'), |
74 |
allow_delete_other => $query->param('allow_delete_other'), |
75 |
} |
75 |
owner => $loggedinuser, |
76 |
); |
76 |
} |
77 |
$shelf->store; |
77 |
); |
78 |
$shelfnumber = $shelf->shelfnumber; |
78 |
$shelf->store; |
79 |
}; |
79 |
$shelfnumber = $shelf->shelfnumber; |
80 |
if ($@) { |
80 |
}; |
81 |
push @messages, { type => 'error', code => ref($@), msg => $@ }; |
81 |
if ($@) { |
82 |
} elsif ( not $shelf ) { |
82 |
push @messages, { type => 'error', code => ref($@), msg => $@ }; |
83 |
push @messages, { type => 'error', code => 'error_on_insert' }; |
83 |
} elsif ( not $shelf ) { |
|
|
84 |
push @messages, { type => 'error', code => 'error_on_insert' }; |
85 |
} else { |
86 |
push @messages, { type => 'message', code => 'success_on_insert' }; |
87 |
$op = 'view'; |
88 |
} |
84 |
} else { |
89 |
} else { |
85 |
push @messages, { type => 'message', code => 'success_on_insert' }; |
90 |
push @messages, { type => 'error', code => 'unauthorized_on_insert' }; |
86 |
$op = 'view'; |
91 |
$op = 'list'; |
87 |
} |
92 |
} |
88 |
} elsif ( $op eq 'edit' ) { |
93 |
} elsif ( $op eq 'edit' ) { |
89 |
$shelfnumber = $query->param('shelfnumber'); |
94 |
$shelfnumber = $query->param('shelfnumber'); |
90 |
- |
|
|