X-Git-Url: https://sipb.mit.edu/gitweb.cgi/ikiwiki.git/blobdiff_plain/e7ce86db11174606d06a6cfabfa9c41aa3cbd50e..d85c9660c5ce6f9749f3afc5c51342caf7713263:/IkiWiki/Plugin/external.pm?ds=sidebyside diff --git a/IkiWiki/Plugin/external.pm b/IkiWiki/Plugin/external.pm index 2650a8cd1..4c2e5d2fe 100644 --- a/IkiWiki/Plugin/external.pm +++ b/IkiWiki/Plugin/external.pm @@ -128,9 +128,10 @@ sub setvar ($$$;@) { #{{{ 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; } #}}} @@ -149,8 +150,22 @@ sub setstate ($$$$;@) { #{{{ 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 ($) { #{{{ + my $plugin=shift; + + return \@ARGV; +} #}}} + +sub setargv ($@) { #{{{ + my $plugin=shift; + my $array=shift; + + @ARGV=@$array; } #}}} sub inject ($@) { #{{{