aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2007-09-25 10:49:25 +0000
committerPascal Rigaux <pixel@mandriva.com>2007-09-25 10:49:25 +0000
commit273309435f1deba09bd79d5b8110c7f539d59ee0 (patch)
treea2d642fc56b5991586bb0b770105f7d87a5cabe8
parent75da89ad1604dc88549f9e45318a35f176a43443 (diff)
downloadmga-youri-submit-273309435f1deba09bd79d5b8110c7f539d59ee0.tar
mga-youri-submit-273309435f1deba09bd79d5b8110c7f539d59ee0.tar.gz
mga-youri-submit-273309435f1deba09bd79d5b8110c7f539d59ee0.tar.bz2
mga-youri-submit-273309435f1deba09bd79d5b8110c7f539d59ee0.tar.xz
mga-youri-submit-273309435f1deba09bd79d5b8110c7f539d59ee0.zip
allow to unpack only some files (for release-notes.txt in mandriva-release-common)
-rw-r--r--lib/Youri/Submit/Action/Unpack.pm5
1 files changed, 3 insertions, 2 deletions
diff --git a/lib/Youri/Submit/Action/Unpack.pm b/lib/Youri/Submit/Action/Unpack.pm
index 9301c89..b6f06bc 100644
--- a/lib/Youri/Submit/Action/Unpack.pm
+++ b/lib/Youri/Submit/Action/Unpack.pm
@@ -26,7 +26,7 @@ sub _init {
croak "undefined source sub directory" unless $options{source_subdir};
croak "undefined destination directory" unless $options{dest_directory};
- foreach my $var ('name', 'dest_directory', 'source_subdir', 'unpack_inside_distribution_root') {
+ foreach my $var ('name', 'dest_directory', 'source_subdir', 'grep_files', 'unpack_inside_distribution_root') {
$self->{"_$var"} = $options{$var};
}
@@ -55,7 +55,8 @@ sub run {
}
foreach my $dest (@dests) {
- my $cmd = "cd $tempdir/$self->{_source_subdir}; find | cpio -pdu $dest";
+ my $find_grep = $self->{_grep_files} ? 'find | grep "$self->{_grep_files}"' : 'find';
+ my $cmd = "cd $tempdir/$self->{_source_subdir}; $find_grep | cpio -pdu $dest";
print "Submit::Action::Unpack: doing $cmd\n" if $self->{_verbose};
if (!$self->{_test}) {
my @l = glob("$tempdir/$self->{_source_subdir}");