From 1b4611bb481bb90dae60f9927f24be01f39a00a1 Mon Sep 17 00:00:00 2001
From: Thierry Vignaud <tv@mageia.org>
Date: Sat, 24 Mar 2012 15:36:56 +0000
Subject: (check_upload_tree) kill unused arg

---
 lib/Iurt/File.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'lib/Iurt/File.pm')

diff --git a/lib/Iurt/File.pm b/lib/Iurt/File.pm
index ba5f718..91feb49 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, $post) = @_;
+    my ($todo, $func, $post) = @_;
 
     # Squash double slashes for cosmetics
     $todo =~ s!/+!/!g;
-- 
cgit v1.2.1