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

(-)a/C4/Items.pm (+1 lines)
Lines 2135-2140 sub _set_defaults_for_add { Link Here
2135 
    my $item = shift;
 2135 
    my $item = shift;
2136 
    $item->{dateaccessioned} ||= C4::Dates->new->output('iso');
 2136 
    $item->{dateaccessioned} ||= C4::Dates->new->output('iso');
2137 
    $item->{$_} ||= 0 for (qw( notforloan damaged itemlost withdrawn));
 2137 
    $item->{$_} ||= 0 for (qw( notforloan damaged itemlost withdrawn));
2138 
    $item->{permanent_location} = $item->{location} unless ($item->{permanent_location});
2138 
}
 2139 
}
2139 

          2140
          

        

        

          2140
          
=head2 _koha_new_item

          2141
          
=head2 _koha_new_item

        



(-)a/t/db_dependent/Circulation.t
      (-2 / +1 lines)




  

    
      
            Lines 645-651
          sub testReturnToShelvingCart {
      
      
        Link Here
      
    
  

        

          645
          
        $item->{biblionumber}

          645
          
        $item->{biblionumber}

        

        

          646
          
    );

          646
          
    );

        

        

          647
          
    my $addedItem = C4::Items::GetItem($addedItemnumber);

          647
          
    my $addedItem = C4::Items::GetItem($addedItemnumber);

        

          
            

              648
              
    ok($item->{permanent_location} eq $yetAnotherLocation && $item->{location} eq $yetAnotherLocation, "ReturnToShelvingCart: Adding a new Item with location also sets the permanent_location.");


              648
              
    ok($addedItem->{permanent_location} eq $yetAnotherLocation && $addedItem->{location} eq $yetAnotherLocation, "ReturnToShelvingCart: Adding a new Item with location also sets the permanent_location.");

            

        

          649
          

          649
          

        

        

          650
          
    C4::Context->set_preference('ReturnToShelvingCart', $originalReturnToShelvingCart) unless $originalReturnToShelvingCart; #Set it to the original value

          650
          
    C4::Context->set_preference('ReturnToShelvingCart', $originalReturnToShelvingCart) unless $originalReturnToShelvingCart; #Set it to the original value

        

        

          651
          
}

          651
          
}

        

            

              652
              
- 

              
              
            






  

  Return to bug 13540