X-Git-Url: https://git.camperquake.de/gitweb.cgi?a=blobdiff_plain;f=videosite%2FGetterBase.pm;h=52e8a4db097284c12a52b17e31fe20dcfea6befe;hb=HEAD;hp=c7d56de528da09131c37f2e5d5f21826eb101c21;hpb=911eeb36e674f916d08b04cd9c48bb33e96bf108;p=videosite.git diff --git a/videosite/GetterBase.pm b/videosite/GetterBase.pm index c7d56de..52e8a4d 100644 --- a/videosite/GetterBase.pm +++ b/videosite/GetterBase.pm @@ -10,12 +10,11 @@ use strict; sub new { my $class = shift; - my $self = $class->SUPER::new(); - - $self = {%{$self}, + my $self = $class->SUPER::new( NAME => 'FlashGetter', - TYPE => 'getter' - }; + TYPE => 'getter', + @_, + ); return bless($self, $class); }