summaryrefslogtreecommitdiffstats
path: root/inspector
diff options
context:
space:
mode:
authorRichard W.M. Jones <rjones@redhat.com>2009-06-24 20:04:58 +0100
committerRichard W.M. Jones <rjones@redhat.com>2009-06-24 20:04:58 +0100
commit215041c7178922341ecbfdb23eb203f2bb8c29c4 (patch)
treed0468a7876da8f1b66b97f8456bf2ca996146f2d /inspector
parentefdf252102a65b691e405f80de4261dfc8a0035b (diff)
downloadlibguestfs-215041c7178922341ecbfdb23eb203f2bb8c29c4.tar.gz
libguestfs-215041c7178922341ecbfdb23eb203f2bb8c29c4.tar.xz
libguestfs-215041c7178922341ecbfdb23eb203f2bb8c29c4.zip
Fix detection of optional libvirt support in virt-inspector.
Diffstat (limited to 'inspector')
-rwxr-xr-xinspector/virt-inspector.pl6
1 files changed, 4 insertions, 2 deletions
diff --git a/inspector/virt-inspector.pl b/inspector/virt-inspector.pl
index c645cbdc..6aa63ad3 100755
--- a/inspector/virt-inspector.pl
+++ b/inspector/virt-inspector.pl
@@ -206,8 +206,10 @@ if (-e $ARGV[0]) {
}
}
} else {
- die "no libvirt support (install Sys::Virt)"
- unless exists $INC{"Sys/Virt.pm"};
+ die "virt-inspector: no libvirt support (install Sys::Virt, XML::XPath and XML::XPath::XMLParser)\n"
+ unless exists $INC{"Sys/Virt.pm"} &&
+ exists $INC{"XML/XPath.pm"} &&
+ exists $INC{"XML/XPath/XMLParser.pm"};
pod2usage ("$0: too many domains listed on command line") if @ARGV > 1;