|
Lines 826-832
for my $library ( @$libraries ) {
Link Here
|
| 826 |
# Using last created item if it exists |
826 |
# Using last created item if it exists |
| 827 |
if ( $prefillitem |
827 |
if ( $prefillitem |
| 828 |
&& $op ne "additem" |
828 |
&& $op ne "additem" |
| 829 |
&& $op ne "edititem" ) |
829 |
&& $op ne "edititem" |
|
|
830 |
&& $op ne "dupeitem" ) |
| 830 |
{ |
831 |
{ |
| 831 |
my $item_from_cookie = get_item_from_cookie($input); |
832 |
my $item_from_cookie = get_item_from_cookie($input); |
| 832 |
$current_item = $item_from_cookie if $item_from_cookie; |
833 |
$current_item = $item_from_cookie if $item_from_cookie; |
|
Lines 859-864
foreach my $tag ( keys %{$tagslib} ) {
Link Here
|
| 859 |
# If the subfield must be prefilled with last catalogued item |
860 |
# If the subfield must be prefilled with last catalogued item |
| 860 |
if ( |
861 |
if ( |
| 861 |
$nextop ne 'additem' |
862 |
$nextop ne 'additem' |
|
|
863 |
|| $op eq 'dupeitem' |
| 862 |
|| ( |
864 |
|| ( |
| 863 |
!$prefillitem |
865 |
!$prefillitem |
| 864 |
|| ( $prefillitem && grep { $_ eq $subtag } |
866 |
|| ( $prefillitem && grep { $_ eq $subtag } |
| 865 |
- |
|
|