diff options
| author | intrigeri <intrigeri@boum.org> | 2009-01-26 23:02:31 +0100 |
|---|---|---|
| committer | intrigeri <intrigeri@boum.org> | 2009-01-26 23:02:31 +0100 |
| commit | f02672c113813c37a659991ae984a2368e15b8db (patch) | |
| tree | 0594363b50f3ffb9ffa6fee6d0965538ae367977 /IkiWiki/Plugin/rename.pm | |
| parent | e0e94d47162840b01677f4a97c5f581d194ff0fb (diff) | |
only pass named parameters to the canrename hook
Signed-off-by: intrigeri <intrigeri@boum.org>
Diffstat (limited to 'IkiWiki/Plugin/rename.pm')
| -rw-r--r-- | IkiWiki/Plugin/rename.pm | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/IkiWiki/Plugin/rename.pm b/IkiWiki/Plugin/rename.pm index 37f643eef..b43c5282a 100644 --- a/IkiWiki/Plugin/rename.pm +++ b/IkiWiki/Plugin/rename.pm @@ -91,8 +91,9 @@ sub check_canrename ($$$$$$) { my $canrename; IkiWiki::run_hooks(canrename => sub { return if defined $canrename; - my $ret=shift->($q, $session, src => $src, srcfile => $srcfile, - dest => $dest, destfile => $destfile); + my $ret=shift->(cgi => $q, session => $session, + src => $src, srcfile => $srcfile, + dest => $dest, destfile => $destfile); if (defined $ret) { if ($ret eq "") { $canrename=1; |