aboutsummaryrefslogtreecommitdiffstats
path: root/lib
diff options
context:
space:
mode:
authorPascal Terjan <pterjan@gmail.com>2014-04-13 20:33:12 +0000
committerPascal Terjan <pterjan@gmail.com>2014-04-13 20:33:12 +0000
commitddf4f3f2a50d2f9f5aabd2ab0a9a96cee4df8412 (patch)
tree3b6691a8589999b232c856ecd7c0540501446245 /lib
parentb52260abf811704d8f8fb824c8218f54b2fd9cb1 (diff)
downloadiurt-ddf4f3f2a50d2f9f5aabd2ab0a9a96cee4df8412.tar
iurt-ddf4f3f2a50d2f9f5aabd2ab0a9a96cee4df8412.tar.gz
iurt-ddf4f3f2a50d2f9f5aabd2ab0a9a96cee4df8412.tar.bz2
iurt-ddf4f3f2a50d2f9f5aabd2ab0a9a96cee4df8412.tar.xz
iurt-ddf4f3f2a50d2f9f5aabd2ab0a9a96cee4df8412.zip
Please perl by adding some parenthesis
Diffstat (limited to 'lib')
-rw-r--r--lib/Iurt/File.pm2
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/Iurt/File.pm b/lib/Iurt/File.pm
index 9eb00f7..618aab2 100644
--- a/lib/Iurt/File.pm
+++ b/lib/Iurt/File.pm
@@ -16,7 +16,7 @@ sub check_upload_tree {
# Squash double slashes for cosmetics
$todo =~ s!/+!/!g;
- opendir my $dir, $todo;
+ opendir (my $dir, $todo);
plog('INFO', "check dir: $todo");
foreach my $f (readdir $dir) {