From: Richard Jones <rjones@trick.home.annexia.org>
Date: Wed, 29 Jul 2009 14:55:17 +0000 (+0100)
Subject: Run cpio with --quiet option so it doesn't print 'xx blocks'
X-Git-Tag: 1.0.65~4
X-Git-Url: http://git.annexia.org/?p=libguestfs.git;a=commitdiff_plain;h=b742f0874798050d31ef31fb7f66053e34d36194

Run cpio with --quiet option so it doesn't print 'xx blocks'
---

diff --git a/perl/lib/Sys/Guestfs/Lib.pm b/perl/lib/Sys/Guestfs/Lib.pm
index 7a734aa..601b3f4 100644
--- a/perl/lib/Sys/Guestfs/Lib.pm
+++ b/perl/lib/Sys/Guestfs/Lib.pm
@@ -433,7 +433,7 @@ sub file_architecture
 	$g->download ($path, "$dir/initrd");
 
 	my $bins = join " ", map { "bin/$_" } @_initrd_binaries;
-	my $cmd = "cd $dir && $zcat initrd | cpio -id $bins";
+	my $cmd = "cd $dir && $zcat initrd | cpio --quiet -id $bins";
 	my $r = system ($cmd);
 	die __x("cpio command failed: {error}", error => $?)
 	    unless $r == 0;