[Libguestfs] [PATCH] tests: fix two minor warnings

Chen Hanxiao chenhanxiao at cn.fujitsu.com
Tue Jun 30 09:45:14 UTC 2015


"my" variable $output masks earlier declaration in same scope at /home/libguestfs/tests/daemon/test-btrfs.pl line 66.
"my" variable @r masks earlier declaration in same scope at /home/libguestfs/tests/daemon/test-btrfs.pl line 72.

Also remove some redundant whitespace.

Signed-off-by: Chen Hanxiao <chenhanxiao at cn.fujitsu.com>
---
 tests/daemon/test-btrfs.pl | 10 +++++-----
 1 file changed, 5 insertions(+), 5 deletions(-)

diff --git a/tests/daemon/test-btrfs.pl b/tests/daemon/test-btrfs.pl
index 815ab1d..1430231 100755
--- a/tests/daemon/test-btrfs.pl
+++ b/tests/daemon/test-btrfs.pl
@@ -63,13 +63,13 @@ EOF
     die unless $r[2]->{btrfssubvolume_path} eq "test3";
 
     # Test btrfs_qgroup_show.
-    my $output = <<EOF;
-qgroupid rfer excl 
--------- ---- ---- 
-0/5      4096 4096 
+    $output = <<EOF;
+qgroupid rfer excl
+-------- ---- ----
+0/5      4096 4096
 EOF
     set_btrfs_output ($output);
-    my @r = $g->btrfs_qgroup_show ("/");
+    @r = $g->btrfs_qgroup_show ("/");
     die unless @r == 1;
     die unless $r[0]->{btrfsqgroup_id} == "0/5";
     die unless $r[0]->{btrfsqgroup_rfer} == 4096;
-- 
2.1.0




More information about the Libguestfs mailing list