Cleanup whitespace warnings in Lib.pm
authorMatthew Booth <mbooth@redhat.com>
Mon, 3 Aug 2009 10:43:38 +0000 (11:43 +0100)
committerMatthew Booth <mbooth@redhat.com>
Mon, 3 Aug 2009 10:43:38 +0000 (11:43 +0100)
perl/lib/Sys/Guestfs/Lib.pm

index ba5aea6..8e20593 100644 (file)
@@ -506,7 +506,7 @@ described in more detail below, but at the top level looks like:
    '/dev/VG/Root1' => \%os1,
    '/dev/VG/Root2' => \%os2,
  }
    '/dev/VG/Root1' => \%os1,
    '/dev/VG/Root2' => \%os2,
  }
+
  %os1 = {
    os => 'linux',
    mounts => {
  %os1 = {
    os => 'linux',
    mounts => {
@@ -792,7 +792,7 @@ sub _check_linux_root
            $r->{os_minor_version} = "$2" if(defined($2));
            $r->{package_management} = "yum";
        }
            $r->{os_minor_version} = "$2" if(defined($2));
            $r->{package_management} = "yum";
        }
-        
+
         elsif (/(Red Hat Enterprise Linux|CentOS|Scientific Linux)/) {
             my $distro = $1;
 
         elsif (/(Red Hat Enterprise Linux|CentOS|Scientific Linux)/) {
             my $distro = $1;
 
@@ -1051,7 +1051,7 @@ like:
  %oses = {
    '/dev/VG/Root' => \%os,
  }
  %oses = {
    '/dev/VG/Root' => \%os,
  }
+
 (There can be multiple roots for a multi-boot VM).
 
 The C<\%os> hash contains the following keys (any can be omitted):
 (There can be multiple roots for a multi-boot VM).
 
 The C<\%os> hash contains the following keys (any can be omitted):
@@ -1701,7 +1701,7 @@ sub _inspect_initrd
         $initrd_modules = {};
         $os->{initrd_modules} = $initrd_modules;
     }
         $initrd_modules = {};
         $os->{initrd_modules} = $initrd_modules;
     }
-    
+
     $initrd_modules->{$version} = \@modules;
 
     return \@modules;
     $initrd_modules->{$version} = \@modules;
 
     return \@modules;