X-Git-Url: http://git.annexia.org/?p=libguestfs.git;a=blobdiff_plain;f=cat%2Fvirt-cat.pl;h=748dbb8c6130fa93f8c1f0c981584c5350189cf1;hp=10178760f5392208b67dc57a04c1ba43dd72d96b;hb=d15195bad9e50f4d80e84c39100a217a260fc806;hpb=2f1a50d81671810256dce0852e6b1e0810ac44af

diff --git a/cat/virt-cat.pl b/cat/virt-cat.pl
index 1017876..748dbb8 100755
--- a/cat/virt-cat.pl
+++ b/cat/virt-cat.pl
@@ -25,9 +25,6 @@ use Sys::Guestfs::Lib qw(open_guest get_partitions resolve_windows_path
   inspect_operating_systems mount_operating_system);
 use Pod::Usage;
 use Getopt::Long;
-use Data::Dumper;
-use File::Temp qw/tempdir/;
-use XML::Writer;
 use Locale::TextDomain 'libguestfs';
 
 =encoding utf8
@@ -140,7 +137,6 @@ if ($uri) {
 }
 
 $g->launch ();
-$g->wait_ready ();
 
 # List of possible filesystems.
 my @partitions = get_partitions ($g);