my $plugin=shift;
my $varname="IkiWiki::".shift;
my $key=shift;
+ my $value=shift;
no strict 'refs';
- my $ret=$varname->{$key}=@_;
+ my $ret=$varname->{$key}=$value;
use strict 'refs';
return $ret;
} #}}}
my $page=shift;
my $id=shift;
my $key=shift;
+ my $value=shift;
- return $IkiWiki::pagestate{$page}{$id}{$key}=@_;
+ return $IkiWiki::pagestate{$page}{$id}{$key}=$value;
} #}}}
sub getargv ($) { #{{{
sub setargv ($@) { #{{{
my $plugin=shift;
+ my $array=shift;
- @ARGV=@_;
+ @ARGV=@$array;
} #}}}
sub inject ($@) { #{{{