From 1d7968318f8b42a85da193ab658ea106e8ee47d3 Mon Sep 17 00:00:00 2001 From: Thierry Vignaud Date: Fri, 23 Mar 2012 19:50:53 +0000 Subject: (prepare_minimal_root) get rid of useless arg (spot by perl_checker) --- perl-install/fs/any.pm | 3 +-- 1 file changed, 1 insertion(+), 2 deletions(-) (limited to 'perl-install/fs') diff --git a/perl-install/fs/any.pm b/perl-install/fs/any.pm index c84dc6a38..431a22531 100644 --- a/perl-install/fs/any.pm +++ b/perl-install/fs/any.pm @@ -88,8 +88,7 @@ sub create_minimal_files() { chmod 0666, "$::prefix/dev/null"; } -sub prepare_minimal_root { - my ($_all_hds) = @_; +sub prepare_minimal_root() { fs::any::create_minimal_files(); -- cgit v1.2.1