diff options
| author | Thierry Vignaud <tv@mageia.org> | 2012-03-24 15:36:56 +0000 |
|---|---|---|
| committer | Thierry Vignaud <tv@mageia.org> | 2012-03-24 15:36:56 +0000 |
| commit | 1b4611bb481bb90dae60f9927f24be01f39a00a1 (patch) | |
| tree | d15ac0ccbb3450bdc86ef4426794b1354d2de84d /lib/Iurt/File.pm | |
| parent | 01a4b0117922c61b6d663938788b6a2ff9b9210b (diff) | |
| download | iurt-1b4611bb481bb90dae60f9927f24be01f39a00a1.tar iurt-1b4611bb481bb90dae60f9927f24be01f39a00a1.tar.gz iurt-1b4611bb481bb90dae60f9927f24be01f39a00a1.tar.bz2 iurt-1b4611bb481bb90dae60f9927f24be01f39a00a1.tar.xz iurt-1b4611bb481bb90dae60f9927f24be01f39a00a1.zip | |
(check_upload_tree) kill unused arg
Diffstat (limited to 'lib/Iurt/File.pm')
| -rw-r--r-- | lib/Iurt/File.pm | 2 |
1 files changed, 1 insertions, 1 deletions
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; |