aboutsummaryrefslogtreecommitdiffstats
path: root/lib
diff options
context:
space:
mode:
Diffstat (limited to 'lib')
-rw-r--r--lib/Iurt/File.pm6
1 files changed, 3 insertions, 3 deletions
diff --git a/lib/Iurt/File.pm b/lib/Iurt/File.pm
index cc5077e..ba5f718 100644
--- a/lib/Iurt/File.pm
+++ b/lib/Iurt/File.pm
@@ -18,7 +18,7 @@ Return true.
=cut
sub check_upload_tree {
- my ($_run, $todo, $func, $o_post) = @_;
+ my ($_run, $todo, $func, $post) = @_;
# Squash double slashes for cosmetics
$todo =~ s!/+!/!g;
@@ -49,11 +49,11 @@ sub check_upload_tree {
}
}
# cleaning
- if ($o_post) {
+ if ($post) {
opendir my $submedia_dir, "$todo/$f/$m/$s";
foreach my $r (readdir $submedia_dir) {
$r =~ /^\.{1,2}$/ and next;
- $o_post->($todo, $f, $m, $s, $r);
+ $post->($todo, $f, $m, $s, $r);
}
}
} else {