rename: remove duplicates that hook functions may have added to @torename

Signed-off-by: intrigeri <intrigeri@boum.org>

diff --git a/IkiWiki/Plugin/rename.pm b/IkiWiki/Plugin/rename.pm
index 38cebdba50d6e0c4a58376f0738c3df44a031103..d3ca8bd3a4b585d67b6792207bc1a89f76ade3e0 100644 (file)
--- a/IkiWiki/Plugin/rename.pm
+++ b/IkiWiki/Plugin/rename.pm
@@ -318,8 +318,14 @@ sub sessioncgi ($$) {
                                cgi => $q,
                                session => $session,
                        );
-                       # FIXME: remove duplicates (based on src or srcfile key)
-                       # from @torename
+
+                       # remove duplicates from @torename
+                       my %seen=();
+                       my @uniq_torename;
+                       foreach my $item (@torename) {
+                               push(@uniq_torename, $item) unless $seen{$item->{src}}++;
+                       }
+                       @torename=@uniq_torename;
 
                        require IkiWiki::Render;
                        IkiWiki::disable_commit_hook() if $config{rcs};