Remove unused Perl modules.

[libguestfs.git] / tools / virt-ls

diff --git a/tools/virt-ls b/tools/virt-ls
index a55f6c3..6ab6021 100755 (executable)
--- a/tools/virt-ls
+++ b/tools/virt-ls
@@ -202,8 +202,8 @@ unless ($mode) {
     my $r;
     my $line;
     while (($r = read (F, $line, 1024)) > 0) {
-       $line =~ tr{\0}{\n};
-       print $line;
+        $line =~ tr{\0}{\n};
+        print $line;
     }
     close F;
 }