|
Lines 133-139
if ( $op eq "add_confirm" ) {
Link Here
|
| 133 |
|
133 |
|
| 134 |
&NewSuggestion($suggestion); |
134 |
&NewSuggestion($suggestion); |
| 135 |
# empty fields, to avoid filter in "SearchSuggestion" |
135 |
# empty fields, to avoid filter in "SearchSuggestion" |
| 136 |
$$suggestion{$_}='' foreach qw<title author publishercode copyrightdate place collectiontitle isbn STATUS>; |
136 |
$suggestion->{$_}='' foreach qw<title author publishercode copyrightdate place collectiontitle isbn STATUS itemtype>; |
| 137 |
$suggestions_loop = |
137 |
$suggestions_loop = |
| 138 |
&SearchSuggestion( $suggestion ); |
138 |
&SearchSuggestion( $suggestion ); |
| 139 |
push @messages, { type => 'info', code => 'success_on_inserted' }; |
139 |
push @messages, { type => 'info', code => 'success_on_inserted' }; |
| 140 |
- |
|
|