commit perl-Bootloader for openSUSE:Factory
Hello community,
here is the log from the commit of package perl-Bootloader for openSUSE:Factory
checked in at Thu Dec 18 15:19:15 CET 2008.
--------
--- perl-Bootloader/perl-Bootloader.changes 2008-12-02 13:58:21.000000000 +0100
+++ /mounts/work_src_done/STABLE/perl-Bootloader/perl-Bootloader.changes 2008-12-18 09:28:55.620419000 +0100
@@ -1,0 +2,11 @@
+Thu Dec 18 09:25:45 CET 2008 - jreidinger@suse.cz
+
+- RT kernel special support (bnc #450153)
+- remove obsolete former default, which breaks changing flavor
+ (bnc #450880)
+- generate man page for kernel update script (bnc #450880)
+- change logging performance, especial on system with many
+ partition (bnc #447142)
+- 0.4.82
+
+-------------------------------------------------------------------
calling whatdependson for head-i586
Old:
----
perl-Bootloader-0.4.81.tar.bz2
New:
----
perl-Bootloader-0.4.82.tar.bz2
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Other differences:
------------------
++++++ perl-Bootloader.spec ++++++
--- /var/tmp/diff_new_pack.e12313/_old 2008-12-18 15:18:45.000000000 +0100
+++ /var/tmp/diff_new_pack.e12313/_new 2008-12-18 15:18:45.000000000 +0100
@@ -1,5 +1,5 @@
#
-# spec file for package perl-Bootloader (Version 0.4.81)
+# spec file for package perl-Bootloader (Version 0.4.82)
#
# Copyright (c) 2008 SUSE LINUX Products GmbH, Nuernberg, Germany.
#
@@ -19,7 +19,7 @@
Name: perl-Bootloader
-Version: 0.4.81
+Version: 0.4.82
Release: 1
Requires: perl-base = %{perl_version}
Requires: e2fsprogs
@@ -55,6 +55,7 @@
touch Makefile.PL
perl -MExtUtils::MakeMaker -e 'WriteMakefile (NAME => "Bootloader")'
make
+pod2man %{SOURCE1} | gzip > update-Bootloader.8.gz
%install
make DESTDIR=$RPM_BUILD_ROOT install_vendor
@@ -65,6 +66,8 @@
install -m 755 %{SOURCE2} $RPM_BUILD_ROOT/usr/lib/bootloader
install -d -m 755 $RPM_BUILD_ROOT/boot
install -m 644 %{SOURCE3} $RPM_BUILD_ROOT/boot/
+install -d -m 755 $RPM_BUILD_ROOT/usr/share/man/man8/
+install -m 644 update-Bootloader.8.gz $RPM_BUILD_ROOT/usr/share/man/man8/
%files
%defattr(-, root, root)
@@ -78,6 +81,14 @@
/boot/boot.readme
%changelog
+* Thu Dec 18 2008 jreidinger@suse.cz
+- RT kernel special support (bnc #450153)
+- remove obsolete former default, which breaks changing flavor
+ (bnc #450880)
+- generate man page for kernel update script (bnc #450880)
+- change logging performance, especial on system with many
+ partition (bnc #447142)
+- 0.4.82
* Tue Dec 02 2008 jreidinger@suse.cz
- fix menu section in grub and add it to test-suite (bnc #449863)
- create mapping of multipath to real device and back (bnc #448110)
++++++ perl-Bootloader-0.4.81.tar.bz2 -> perl-Bootloader-0.4.82.tar.bz2 ++++++
diff -urN --exclude=CVS --exclude=.cvsignore --exclude=.svn --exclude=.svnignore old/perl-Bootloader-0.4.81/lib/Bootloader/Core/GRUB.pm new/perl-Bootloader-0.4.82/lib/Bootloader/Core/GRUB.pm
--- old/perl-Bootloader-0.4.81/lib/Bootloader/Core/GRUB.pm 2008-12-01 13:30:49.000000000 +0100
+++ new/perl-Bootloader-0.4.82/lib/Bootloader/Core/GRUB.pm 2008-12-10 10:53:43.000000000 +0100
@@ -201,7 +201,6 @@
activate => "bool:Set active Flag in Partition Table for Boot Partition:true",
timeout => "int:Timeout in Seconds:8:0:3600",
default => "string:Default Boot Section:Linux",
- former_default_image_flavor => "string:Former default Image Flavor:default",
generic_mbr => "bool:Write generic Boot Code to MBR:true",
boot_custom => "selectdevice:Custom Boot Partition::" . $boot_partitions,
boot_mbr => "bool:Boot from Master Boot Record:false",
@@ -274,7 +273,6 @@
activate => "bool",
timeout => "",
default => "",
- former_default_image_flavor => "",
generic_mbr => "bool",
boot_custom => "",
boot_mbr => "bool",
@@ -1949,12 +1947,8 @@
my $defindex = 0+ $val;
$ret{"default"} = $sections[$defindex];
- # Parse flavor of former default image out of comment
- my $ff = $self->Comment2FormerFlavor ($line_ref->{"comment_before"});
- $ret{"former_default_image_flavor"} = $ff if ($ff ne "");
-
# Parse RemovedDefault image out of comment
- $ff = $self->Comment2RemovedDefault ($line_ref->{"comment_before"});
+ my $ff = $self->Comment2RemovedDefault ($line_ref->{"comment_before"});
$ret{"removed_default"} = 1 if ($ff == 1);
@@ -2061,12 +2055,8 @@
my @empty;
$line_ref->{"comment_before"} = \@empty;
- $line_ref = $self->CreateFormerDefaultImageLine (
- $line_ref, $globinfo{"former_default_image_flavor"});
- delete ($globinfo{"former_default_image_flavor"});
-
- $line_ref = $self->CreateRemovedDefaultLine (
- $line_ref, $globinfo{"removed_default"}) if
+ $line_ref = $self->CreateRemovedDefaultLine (
+ $line_ref ) if
delete ($globinfo{"removed_default"});
@@ -2265,8 +2255,6 @@
my $mountpoint = $grub_dev;
foreach $device (@devices) {
- $self->l_debug ("GRUB::GrubDev2MountPoint : finding for device $device");
-
while ((my $mp, my $d) = each (%{$self->{"mountpoints"}})) {
$self->l_debug ("GRUB::GrubDev2MountPoint : record $mp <-> $d");
if ($self->GetKernelDevice($d) eq $device) {
diff -urN --exclude=CVS --exclude=.cvsignore --exclude=.svn --exclude=.svnignore old/perl-Bootloader-0.4.81/lib/Bootloader/Core.pm new/perl-Bootloader-0.4.82/lib/Bootloader/Core.pm
--- old/perl-Bootloader-0.4.81/lib/Bootloader/Core.pm 2008-11-27 16:35:44.000000000 +0100
+++ new/perl-Bootloader-0.4.82/lib/Bootloader/Core.pm 2008-12-10 10:53:43.000000000 +0100
@@ -66,8 +66,6 @@
C<< $original_name = Bootloader::Core->Comment2FormerFlavor ($comment); >>
-C<< $line_ref = Bootloader::Core->CreateFormerDefaultImageLine (\%line, $former_flavor); >>
-
C<< $sectin_info_ref = Bootloader::Core->Section2Info (\@section_lines); >>
C<< $label = Bootloader::Core->FixSectionName ($name, \@existing, $orig_name); >>
@@ -158,12 +156,10 @@
my $self = shift;
my $message = shift;
- my @log = @{$self->{"log_records"}};
- push @log, {
+ push @{$self->{"log_records"}}, {
"message" => $message,
"level" => "debug",
};
- $self->{"log_records"} = \@log;;
}
=item
@@ -176,12 +172,10 @@
my $self = shift;
my $message = shift;
- my @log = @{$self->{"log_records"}};
- push @log, {
+ push @{$self->{"log_records"}}, {
"message" => $message,
"level" => "milestone",
};
- $self->{"log_records"} = \@log;;
}
=item
@@ -194,12 +188,10 @@
my $self = shift;
my $message = shift;
- my @log = @{$self->{"log_records"}};
- push @log, {
+ push @{$self->{"log_records"}}, {
"message" => $message,
"level" => "warning",
};
- $self->{"log_records"} = \@log;;
}
=item
@@ -212,12 +204,10 @@
my $self = shift;
my $message = shift;
- my @log = @{$self->{"log_records"}};
- push @log, {
+ push @{$self->{"log_records"}}, {
"message" => $message,
"level" => "error",
};
- $self->{"log_records"} = \@log;;
}
=item
@@ -1038,55 +1028,6 @@
}
=item
-C<< $original_name = Bootloader::Core->Comment2FormerFlavor ($comment); >>
-
-Gets the flavor of the former default image from the comment. As argument, takes
-the comment, returns the former flavor (if found in the comment), or empty
-string (otherwise).
-
-=cut
-
-my $former_flavor_comment = "###YaST update: former default image flavor: ";
-
-# string Comment2FormerFlavor (list<string> comment)
-sub Comment2FormerFlavor($) {
- my $self = shift;
- my $comment_lines_ref = shift || [];
- foreach (@{$comment_lines_ref}) {
- return $1
- if m/${former_flavor_comment}([^#]+?) *###/o;
- }
- return "";
-}
-
-=item
-C<< $line_ref = Bootloader::Core->CreateFormerDefaultImageLine (\%line, $former_flavor); >>
-
-Updates the 'default line' in globals so that it contains the former default
-image flavor inside the comment. As arguments, takes the line (hash reference)
-and the former flavor (string). If former flavor is set to undef or empty
-string, it is not set in the comment. Returns the updated line reference.
-
-=cut
-
-# map
participants (1)
-
root@Hilbert.suse.de