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

(-)a/Koha/Patron/Modifications.pm (-13 lines)
Lines 29-46 use C4::Debug; Link Here
29
29
30
use base qw(Koha::Objects);
30
use base qw(Koha::Objects);
31
31
32
sub new {
33
    my ( $self, %args ) = @_;
34
35
    $self = $self->SUPER::new(@_);
36
37
    foreach my $key ( keys %args ) {
38
        $self->{$key} = $args{$key};
39
    }
40
41
    return $self;
42
}
43
44
=head2 AddModifications
32
=head2 AddModifications
45
33
46
Koha::Patron::Modifications->AddModifications( $data );
34
Koha::Patron::Modifications->AddModifications( $data );
47
- 

Return to bug 14757