urosm
/
ikiwiki
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

simplifiy

master
Joey Hess 2009-03-27 15:23:36 -04:00
parent f9fd71df88
commit 529a06b7cc
1 changed files with 23 additions and 26 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
IkiWiki/Plugin/rename.pm
View File

@ -486,8 +486,9 @@ sub rename_hook (@) {
my $q=$params{cgi};
my $session=$params{session};
return () unless @torename;
my @nextset;
if (@torename) {
foreach my $torename (@torename) {
unless (exists $done{$torename->{src}} && $done{$torename->{src}}) {
IkiWiki::run_hooks(rename => sub {
@ -507,14 +508,10 @@ sub rename_hook (@) {
session => $session,
);
# remove duplicates from @torename
# dedup
my %seen;
return grep { ! $seen{$_->{src}}++ } @torename;
}
else {
return ();
}
}
sub do_rename ($$$) {
my $rename=shift;