summaryrefslogtreecommitdiffstats
path: root/perl/t/070-optargs.t
diff options
context:
space:
mode:
Diffstat (limited to 'perl/t/070-optargs.t')
-rw-r--r--perl/t/070-optargs.t10
1 files changed, 5 insertions, 5 deletions
diff --git a/perl/t/070-optargs.t b/perl/t/070-optargs.t
index 885f0cc4..460fb192 100644
--- a/perl/t/070-optargs.t
+++ b/perl/t/070-optargs.t
@@ -21,14 +21,14 @@ use Test::More tests => 4;
use Sys::Guestfs;
-my $h = Sys::Guestfs->new ();
-ok ($h);
+my $g = Sys::Guestfs->new ();
+ok ($g);
-$h->add_drive ("/dev/null");
+$g->add_drive ("/dev/null");
ok (1);
-$h->add_drive ("/dev/null", readonly => 1);
+$g->add_drive ("/dev/null", readonly => 1);
ok (1);
-$h->add_drive ("/dev/null", format => "raw", readonly => 0);
+$g->add_drive ("/dev/null", format => "raw", readonly => 0);
ok (1);