X-Git-Url: https://git.camperquake.de/gitweb.cgi?a=blobdiff_plain;f=videosite%2FGetterBase.pm;h=c7d56de528da09131c37f2e5d5f21826eb101c21;hb=b211d3075c2cf9856a7440b90ba628a8191a095e;hp=c391ed874f2c666db541d16c01989d946ae4c7e3;hpb=2044d5ff60e639a2eafbeed3a70224564e94c84c;p=videosite.git diff --git a/videosite/GetterBase.pm b/videosite/GetterBase.pm index c391ed8..c7d56de 100644 --- a/videosite/GetterBase.pm +++ b/videosite/GetterBase.pm @@ -1,16 +1,18 @@ # (c) 2007 by Ralf Ertzinger # licensed under GNU GPL v2 -package GetterBase; +package videosite::GetterBase; -use Base; -@ISA = qw(Base); +use videosite::Base; +@ISA = qw(videosite::Base); use strict; sub new { my $class = shift; - my $self = { + my $self = $class->SUPER::new(); + + $self = {%{$self}, NAME => 'FlashGetter', TYPE => 'getter' };