X-Git-Url: https://git.camperquake.de/gitweb.cgi?a=blobdiff_plain;f=videosite%2FBase.pm;h=51b091c5ed9b55ff28219c97de48bf0d062214b8;hb=9cfabbf047871e6671aca65e9313cb4f2ce23124;hp=8e9658569a7dc136a2ea92a7cc9ad89525555a7e;hpb=5390845618e68d90232d695e28d3056c56d23c04;p=videosite.git diff --git a/videosite/Base.pm b/videosite/Base.pm index 8e96585..51b091c 100644 --- a/videosite/Base.pm +++ b/videosite/Base.pm @@ -20,9 +20,11 @@ sub new { sub error { my $self = shift; - my @data = @_; + my $t; - Irssi::print(sprintf(shift(@_), @_)); + $t = sprintf(shift(@_), @_); + $t =~ s/%/%%/g; + Irssi::print($t); } sub debug { @@ -53,7 +55,7 @@ sub _prepare_parameters { my $self = shift; my $p; - $self->{'_CONFIG'} = {'option' => {}}; + $self->{'_CONFIG'} = {'option' => {'enabled' => {'content' => '1'}}}; foreach $p (keys(%{$self->{'_PARAMS'}})) { $self->{'_CONFIG'}->{'option'}->{$p}->{'content'} = $self->{'_PARAMS'}->{$p}->[0];