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

(-)a/C4/Items.pm (+3 lines)
Lines 413-418 my %default_values_for_mod_from_marc = ( Link Here
413
    itemnotes            => undef, 
413
    itemnotes            => undef, 
414
    itype                => undef, 
414
    itype                => undef, 
415
    location             => undef, 
415
    location             => undef, 
416
    permanent_location   => undef,
416
    materials            => undef, 
417
    materials            => undef, 
417
    notforloan           => 0,
418
    notforloan           => 0,
418
    paidfor              => undef, 
419
    paidfor              => undef, 
Lines 1952-1957 sub _koha_new_item { Link Here
1952
            holdingbranch       = ?,
1953
            holdingbranch       = ?,
1953
            paidfor             = ?,
1954
            paidfor             = ?,
1954
            location            = ?,
1955
            location            = ?,
1956
            permanent_location            = ?,
1955
            onloan              = ?,
1957
            onloan              = ?,
1956
            issues              = ?,
1958
            issues              = ?,
1957
            renewals            = ?,
1959
            renewals            = ?,
Lines 1989-1994 sub _koha_new_item { Link Here
1989
            $item->{'holdingbranch'},
1991
            $item->{'holdingbranch'},
1990
            $item->{'paidfor'},
1992
            $item->{'paidfor'},
1991
            $item->{'location'},
1993
            $item->{'location'},
1994
            $item->{'permanent_location'},
1992
            $item->{'onloan'},
1995
            $item->{'onloan'},
1993
            $item->{'issues'},
1996
            $item->{'issues'},
1994
            $item->{'renewals'},
1997
            $item->{'renewals'},
(-)a/cataloguing/additem.pl (-2 / +5 lines)
Lines 65-76 sub get_item_from_barcode { Link Here
65
65
66
sub set_item_default_location {
66
sub set_item_default_location {
67
    my $itemnumber = shift;
67
    my $itemnumber = shift;
68
    my $item = GetItem( $itemnumber );
68
    if ( C4::Context->preference('NewItemsDefaultLocation') ) {
69
    if ( C4::Context->preference('NewItemsDefaultLocation') ) {
69
        my $item = GetItem( $itemnumber );
70
        $item->{'permanent_location'} = $item->{'location'};
70
        $item->{'permanent_location'} = $item->{'location'};
71
        $item->{'location'} = C4::Context->preference('NewItemsDefaultLocation');
71
        $item->{'location'} = C4::Context->preference('NewItemsDefaultLocation');
72
        ModItem( $item, undef, $itemnumber);
72
        ModItem( $item, undef, $itemnumber);
73
    }
73
    }
74
    else {
75
      $item->{'permanent_location'} = $item->{'location'} if !defined($item->{'permanent_location'});
76
      ModItem( $item, undef, $itemnumber);
77
    }
74
}
78
}
75
79
76
# NOTE: This code is subject to change in the future with the implemenation of ajax based autobarcode code
80
# NOTE: This code is subject to change in the future with the implemenation of ajax based autobarcode code
77
- 

Return to bug 6034