diff options
| author | Rafael Garcia-Suarez <rgarciasuarez@mandriva.org> | 2006-03-20 12:52:15 +0000 |
|---|---|---|
| committer | Rafael Garcia-Suarez <rgarciasuarez@mandriva.org> | 2006-03-20 12:52:15 +0000 |
| commit | 759a5637b788c6d04cbdffb5fe02c2ba58e842db (patch) | |
| tree | 220dd521065c892d38909aad888c602d8d9a65d7 | |
| parent | f926b14f2e010c3b48e8dffb573d313df0371cd8 (diff) | |
| download | rpmtools-759a5637b788c6d04cbdffb5fe02c2ba58e842db.tar rpmtools-759a5637b788c6d04cbdffb5fe02c2ba58e842db.tar.gz rpmtools-759a5637b788c6d04cbdffb5fe02c2ba58e842db.tar.bz2 rpmtools-759a5637b788c6d04cbdffb5fe02c2ba58e842db.tar.xz rpmtools-759a5637b788c6d04cbdffb5fe02c2ba58e842db.zip | |
Add a --norecursive option to genhdlist (Michael Scherer)
| -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 |