aboutsummaryrefslogtreecommitdiff
path: root/IkiWiki/Plugin/rename.pm
diff options
context:
space:
mode:
authorintrigeri <intrigeri@boum.org>2008-12-30 22:55:04 +0100
committerintrigeri <intrigeri@boum.org>2008-12-30 22:55:04 +0100
commit5738f30a2954705f7954e7fb99205f5a08d35ccb (patch)
treef42c9816f0df6622bb04ad5d78ae69b19cf9cce6 /IkiWiki/Plugin/rename.pm
parentc01485ae1ad751ac87eb3cfa392f6d276d5b1157 (diff)
downloadikiwiki-5738f30a2954705f7954e7fb99205f5a08d35ccb.tar
ikiwiki-5738f30a2954705f7954e7fb99205f5a08d35ccb.tar.gz
the rename hook can now change the list of pages to rename
Signed-off-by: intrigeri <intrigeri@boum.org>
Diffstat (limited to 'IkiWiki/Plugin/rename.pm')
-rw-r--r--IkiWiki/Plugin/rename.pm10
1 files changed, 3 insertions, 7 deletions
diff --git a/IkiWiki/Plugin/rename.pm b/IkiWiki/Plugin/rename.pm
index 2200235f6..227f59bfa 100644
--- a/IkiWiki/Plugin/rename.pm
+++ b/IkiWiki/Plugin/rename.pm
@@ -291,6 +291,8 @@ sub sessioncgi ($$) {
required => 1,
};
+ IkiWiki::run_hooks(rename => sub { shift->(\@torename); });
+
# See if any subpages need to be renamed.
if ($q->param("subpages") && $src ne $dest) {
foreach my $p (keys %pagesources) {
@@ -338,16 +340,10 @@ sub sessioncgi ($$) {
sprintf(gettext("rename %s to %s"), $srcfile, $destfile),
$session->param("name"), $ENV{REMOTE_ADDR}) if $config{rcs};
+ # Then link fixups.
foreach my $rename (@torename) {
next if $rename->{src} eq $rename->{dest};
next if $rename->{error};
- IkiWiki::run_hooks(rename => sub {
- shift->(
- oldpage => $src,
- newpage => $dest,
- );
- });
- # Then link fixups.
foreach my $p (fixlinks($rename, $session)) {
# map old page names to new
foreach my $r (@torename) {