move dedup code into function, simplify

1 files changed, 5 insertions, 10 deletions

diff --git a/IkiWiki/Plugin/rename.pm b/IkiWiki/Plugin/rename.pm
index d3ca8bd3a..de11e4cc9 100644
--- a/IkiWiki/Plugin/rename.pm
+++ b/IkiWiki/Plugin/rename.pm
@@ -319,14 +319,6 @@ sub sessioncgi ($$) {
 				session => $session,
 			);
 
-			# 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};
 			my %origpagesources=%pagesources;
@@ -514,13 +506,16 @@ sub rename_hook (@) {
 			cgi => $q,
 			session => $session,
 		);
-		return @torename;
+
+		# remove duplicates from @torename
+		my %seen;
+		return grep { ! $seen{$_->{src}}++ } @torename;
 	}
 	else {
 		return ();
 	}
 }
-			
+
 sub do_rename ($$$) {
 	my $rename=shift;
 	my $q=shift;