X-Git-Url: http://git.vanrenterghem.biz/git.ikiwiki.info.git/blobdiff_plain/529a06b7cc4991f6e78fc59855398f986d2dc21e..ef69a6cce5a09e9972441b034e24076027fbc479:/IkiWiki/Plugin/rename.pm diff --git a/IkiWiki/Plugin/rename.pm b/IkiWiki/Plugin/rename.pm index 09250af81..8dad92be3 100644 --- a/IkiWiki/Plugin/rename.pm +++ b/IkiWiki/Plugin/rename.pm @@ -10,7 +10,7 @@ sub import { hook(type => "formbuilder_setup", id => "rename", call => \&formbuilder_setup); hook(type => "formbuilder", id => "rename", call => \&formbuilder); hook(type => "sessioncgi", id => "rename", call => \&sessioncgi); - hook(type => "rename", id => "rename", call => \&rename); + hook(type => "rename", id => "rename", call => \&rename_subpages); } sub getsetup () { @@ -414,7 +414,7 @@ sub sessioncgi ($$) { } # Add subpages to the list of pages to be renamed, if needed. -sub rename(@) { +sub rename_subpages (@) { my %params = @_; my %torename = %{$params{torename}}; @@ -501,6 +501,7 @@ sub rename_hook (@) { $done{$torename->{src}}=1; } } + push @torename, rename_hook( torename => \@nextset, done => \%done, @@ -532,7 +533,7 @@ sub do_rename ($$$) { IkiWiki::rcs_rename($rename->{srcfile}, $rename->{destfile}); } else { - if (! CORE::rename($config{srcdir}."/".$rename->{srcfile}, + if (! rename($config{srcdir}."/".$rename->{srcfile}, $config{srcdir}."/".$rename->{destfile})) { error("rename: $!"); }