diff options
| -rw-r--r-- | genhdlist | 8 |
1 files changed, 7 insertions, 1 deletions
@@ -25,6 +25,7 @@ GetOptions( nobadrpm => \$nobadrpm, noclean => \my $noclean, md5sum => \$md5sum, + norecursive => \my $norecursive, s => \$nooutput, 'subdir=s' => \$subdir, 'suffix=s' => \$suffix, @@ -69,6 +70,7 @@ foreach my $dir (@dir) { File::Find::find( { wanted => sub { + next if $norecursive && $File::Find::dir ne $dir; if (/^.*\.rpm$/ && -f) { push(@rpms, $File::Find::name); } @@ -156,6 +158,10 @@ Do not abort on bad rpms. Keep cache files. +=item --norecursive + +Do not recurse in subdirectories. + =item -s Silent mode. @@ -188,7 +194,7 @@ gendistrib(1), parsehdlist(1) Copyright (C) 1999, 2000, 2001, 2002, 2003, 2004, 2005 MandrakeSoft SA -Copyright (C) 2005 Mandriva SA +Copyright (C) 2005, 2006 Mandriva SA This program is free software; you can redistribute it and/or modify it under the terms of the GNU General Public License as published by |