Hello community,

here is the log from the commit of package perl-Bootloader for openSUSE:Factory 
checked in at 2012-07-14 10:21:04
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Comparing /work/SRC/openSUSE:Factory/perl-Bootloader (Old)
 and      /work/SRC/openSUSE:Factory/.perl-Bootloader.new (New)
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++

Package is "perl-Bootloader", Maintainer is "snw...@suse.com"

Changes:
--------
--- /work/SRC/openSUSE:Factory/perl-Bootloader/perl-Bootloader.changes  
2012-07-09 09:59:55.000000000 +0200
+++ /work/SRC/openSUSE:Factory/.perl-Bootloader.new/perl-Bootloader.changes     
2012-07-14 11:51:11.000000000 +0200
@@ -1,0 +2,7 @@
+Fri Jul 13 15:45:47 CEST 2012 - mch...@suse.com
+
+- fix new menuentry format introduced by 2.0
+- support failsafe kernel parameters
+- 0.6.7
+
+-------------------------------------------------------------------

Old:
----
  perl-Bootloader-0.6.6.tar.bz2

New:
----
  perl-Bootloader-0.6.7.tar.bz2

++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++

Other differences:
------------------
++++++ perl-Bootloader.spec ++++++
--- /var/tmp/diff_new_pack.zZ9IS7/_old  2012-07-14 11:51:13.000000000 +0200
+++ /var/tmp/diff_new_pack.zZ9IS7/_new  2012-07-14 11:51:13.000000000 +0200
@@ -17,7 +17,7 @@
 
 
 Name:           perl-Bootloader
-Version:        0.6.6
+Version:        0.6.7
 Release:        0
 Requires:       perl-base = %{perl_version}
 Requires:       e2fsprogs

++++++ perl-Bootloader-0.6.6.tar.bz2 -> perl-Bootloader-0.6.7.tar.bz2 ++++++
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/perl-Bootloader-0.6.6/perl-Bootloader.changes 
new/perl-Bootloader-0.6.7/perl-Bootloader.changes
--- old/perl-Bootloader-0.6.6/perl-Bootloader.changes   2012-07-06 
14:20:59.000000000 +0200
+++ new/perl-Bootloader-0.6.7/perl-Bootloader.changes   2012-07-13 
15:46:49.000000000 +0200
@@ -1,4 +1,11 @@
 -------------------------------------------------------------------
+Fri Jul 13 15:45:47 CEST 2012 - mch...@suse.com
+
+- fix new menuentry format introduced by 2.0
+- support failsafe kernel parameters
+- 0.6.7
+
+-------------------------------------------------------------------
 Fri Jul  6 14:18:45 CEST 2012 - mch...@suse.com
 
 - use 'auto' for default gfxmode
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/perl-Bootloader-0.6.6/src/Core/GRUB2.pm 
new/perl-Bootloader-0.6.7/src/Core/GRUB2.pm
--- old/perl-Bootloader-0.6.6/src/Core/GRUB2.pm 2012-07-06 14:20:59.000000000 
+0200
+++ new/perl-Bootloader-0.6.7/src/Core/GRUB2.pm 2012-07-13 15:46:49.000000000 
+0200
@@ -474,9 +474,23 @@
 
     my @confs = @{$files{Bootloader::Path::Grub2_conf()} || []};
     my @entries = ();
+    my $submenu = "";
     foreach my $conf (@confs) {
-        if ($conf =~ /^menuentry\s+['"](.*)['"]\s+/) {
-           push @entries, { "menuentry" =>  $1 };
+        my $menuentry = "";
+
+        if ($conf =~ /^menuentry\s+['"](.*?)['"]\s+/) {
+            $menuentry = $1;
+            $submenu = "";
+        } elsif ($conf =~ m/^submenu\s+['"](.*?)['"]\s+/) {
+            $submenu = $1;
+        }
+        if ($submenu ne "") {
+            if ($conf =~ m/^\s+menuentry\s+['"](.*?)['"]\s+/) {
+                $menuentry = "$submenu>$1"
+            }
+        }
+        if ($menuentry ne "") {
+           push @entries, { "menuentry" =>  $menuentry };
         }
     }
 
@@ -702,6 +716,8 @@
             $ret{"gfxtheme"} = $val;
         } elsif ($key =~ m/@?GRUB_DISTRIBUTOR/) {
             $ret{"distributor"} = $val;
+        } elsif ($key =~ m/@?GRUB_CMDLINE_LINUX_RECOVERY$/) {
+            $ret{"append_failsafe"} = $val;
         }
     }
 
@@ -779,6 +795,13 @@
                 'value' => 'quiet splash=silent',
             },
             {
+                'key' => 'GRUB_CMDLINE_LINUX_RECOVERY',
+                'value' => 'single',
+                'comment_before' => [
+                  '# kernel command line options for failsafe mode',
+                ],
+            },
+            {
                 'key' => 'GRUB_CMDLINE_LINUX',
                 'value' =>  '""',
             },
@@ -844,6 +867,7 @@
     my $gfxmode = delete $globinfo{"gfxmode"} || "";
     my $gfxtheme = delete $globinfo{"gfxtheme"} || "";
     my $distributor = delete $globinfo{"distributor"} || "";
+    my $append_failsafe = delete $globinfo{"append_failsafe"} || "";
     # $root = " root=$root" if $root ne "";
     $vga = " vga=$vga" if $vga ne "";
     $append = " $append" if $append ne "";
@@ -905,6 +929,9 @@
         } elsif ($key =~ m/@?GRUB_DISTRIBUTOR/) {
             $line_ref->{"value"} = "$distributor" if "$distributor" ne "";
             $distributor = "";
+        } elsif ($key =~ m/@?GRUB_CMDLINE_LINUX_RECOVERY$/) {
+            $line_ref->{"value"} = "$append_failsafe" if "$append_failsafe" ne 
"";
+            $append_failsafe = "";
         }
         defined $line_ref ? $line_ref : ();
     } @lines;
@@ -964,6 +991,13 @@
             "value" => "$distributor",
         }
     }
+
+    if ("$append_failsafe" ne "") {
+        push @lines, {
+            "key" => "GRUB_CMDLINE_LINUX_RECOVERY",
+            "value" => "$append_failsafe",
+        }
+    }
     return \@lines;
 }
 
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/perl-Bootloader-0.6.6/src/Core/GRUB2EFI.pm 
new/perl-Bootloader-0.6.7/src/Core/GRUB2EFI.pm
--- old/perl-Bootloader-0.6.6/src/Core/GRUB2EFI.pm      2012-07-06 
14:20:59.000000000 +0200
+++ new/perl-Bootloader-0.6.7/src/Core/GRUB2EFI.pm      2012-07-13 
15:46:49.000000000 +0200
@@ -137,9 +137,23 @@
 
     my @confs = @{$files{Bootloader::Path::Grub2_eficonf()} || []};
     my @entries = ();
+    my $submenu = "";
     foreach my $conf (@confs) {
-        if ($conf =~ /^menuentry\s+['"](.*)['"]\s+/) {
-           push @entries, { "menuentry" =>  $1 };
+        my $menuentry = "";
+
+        if ($conf =~ /^menuentry\s+['"](.*?)['"]\s+/) {
+            $menuentry = $1;
+            $submenu = "";
+        } elsif ($conf =~ m/^submenu\s+['"](.*?)['"]\s+/) {
+            $submenu = $1;
+        }
+        if ($submenu ne "") {
+            if ($conf =~ m/^\s+menuentry\s+['"](.*?)['"]\s+/) {
+                $menuentry = "$submenu>$1"
+            }
+        }
+        if ($menuentry ne "") {
+           push @entries, { "menuentry" =>  $menuentry };
         }
     }
 
@@ -242,6 +256,8 @@
             $ret{"gfxtheme"} = $val;
         } elsif ($key =~ m/@?GRUB_DISTRIBUTOR/) {
             $ret{"distributor"} = $val;
+        } elsif ($key =~ m/@?GRUB_CMDLINE_LINUX_RECOVERY$/) {
+            $ret{"append_failsafe"} = $val;
         }
     }
 
@@ -318,6 +334,13 @@
                 'value' => 'quiet splash=silent',
             },
             {
+                'key' => 'GRUB_CMDLINE_LINUX_RECOVERY',
+                'value' => 'single',
+                'comment_before' => [
+                  '# kernel command line options for failsafe mode',
+                ],
+            },
+            {
                 'key' => 'GRUB_CMDLINE_LINUX',
                 'value' =>  '""',
             },
@@ -383,6 +406,7 @@
     my $gfxmode = delete $globinfo{"gfxmode"} || "";
     my $gfxtheme = delete $globinfo{"gfxtheme"} || "";
     my $distributor = delete $globinfo{"distributor"} || "";
+    my $append_failsafe = delete $globinfo{"append_failsafe"} || "";
     # $root = " root=$root" if $root ne "";
     $vga = " vga=$vga" if $vga ne "";
     $append = " $append" if $append ne "";
@@ -444,6 +468,9 @@
         } elsif ($key =~ m/@?GRUB_DISTRIBUTOR/) {
             $line_ref->{"value"} = "$distributor" if "$distributor" ne "";
             $distributor = "";
+        } elsif ($key =~ m/@?GRUB_CMDLINE_LINUX_RECOVERY$/) {
+            $line_ref->{"value"} = "$append_failsafe" if "$append_failsafe" ne 
"";
+            $append_failsafe = "";
         }
         defined $line_ref ? $line_ref : ();
     } @lines;
@@ -503,6 +530,13 @@
             "value" => "$distributor",
         }
     }
+
+    if ("$append_failsafe" ne "") {
+        push @lines, {
+            "key" => "GRUB_CMDLINE_LINUX_RECOVERY",
+            "value" => "$append_failsafe",
+        }
+    }
     return \@lines;
 }
 
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/perl-Bootloader-0.6.6/version 
new/perl-Bootloader-0.6.7/version
--- old/perl-Bootloader-0.6.6/version   2012-07-06 14:20:59.000000000 +0200
+++ new/perl-Bootloader-0.6.7/version   2012-07-13 15:46:49.000000000 +0200
@@ -1 +1 @@
-0.6.6
+0.6.7

-- 
To unsubscribe, e-mail: opensuse-commit+unsubscr...@opensuse.org
For additional commands, e-mail: opensuse-commit+h...@opensuse.org

Reply via email to