use strict;
use Sys::Guestfs;
-use Sys::Guestfs::Lib qw(open_guest get_partitions resolve_windows_path
- inspect_all_partitions inspect_partition
- inspect_operating_systems mount_operating_system inspect_in_detail);
+use Sys::Guestfs::Lib qw(open_guest get_partitions);
use Pod::Usage;
use Getopt::Long;
use Locale::TextDomain 'virt-tools';
eval {
$g->mount_ro ($partition, "/");
my $dir;
- my @dirs = ("/var/run/virt-tools", "/run/virt-tools");
+ my @dirs = ("/var/lib/virt-tools", "/lib/virt-tools");
foreach $dir (@dirs) {
if ($g->is_dir ($dir)) {
my @names = $g->ls ($dir);