Bug 14757 [QA Followup] - Don't overload new for Modifications

Signed-off-by: Jonathan Druart <jonathan.druart@bugs.koha-community.org>
Signed-off-by: Kyle M Hall <kyle@bywatersolutions.com>

diff --git a/Koha/Patron/Modifications.pm b/Koha/Patron/Modifications.pm
index 31fd61b..7e17289 100644 (file)
--- a/Koha/Patron/Modifications.pm
+++ b/Koha/Patron/Modifications.pm
@@ -29,18 +29,6 @@ use C4::Debug;
 
 use base qw(Koha::Objects);
 
-sub new {
-    my ( $self, %args ) = @_;
-
-    $self = $self->SUPER::new(@_);
-
-    foreach my $key ( keys %args ) {
-        $self->{$key} = $args{$key};
-    }
-
-    return $self;
-}
-
 =head2 AddModifications
 
 Koha::Patron::Modifications->AddModifications( $data );