X-Git-Url: https://git.camperquake.de/gitweb.cgi?a=blobdiff_plain;f=videosite%2FBase.pm;h=855cb47ae89d57b3e9902dea497677b73f876009;hb=05fa914dcc1edf6aba1a8b047c458aab7f2f7d8e;hp=93ac841694476a6cdf09263f2b22eafc927ce5e1;hpb=dc2272fab9a91eec87587c1a17192ca9636017eb;p=videosite.git diff --git a/videosite/Base.pm b/videosite/Base.pm index 93ac841..855cb47 100644 --- a/videosite/Base.pm +++ b/videosite/Base.pm @@ -23,9 +23,11 @@ sub new { sub error { my $self = shift; - my $t; + my @data = @_; + + $data[0] = "(" . ref($self) . ") " . $data[0]; - $self->{'_OUT'}(@_); + $self->{'_OUT'}(@data); } sub debug {