summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2005-06-03 08:00:56 +0000
committerPascal Rigaux <pixel@mandriva.com>2005-06-03 08:00:56 +0000
commit7d0ebe6797caaf042fa31f1bbd789a47ad6874c5 (patch)
tree50c0bea8b16241381b5db006b0271caf75c895ae
parent52b5d6a401c525faa45c93075f5844f7faf7c77b (diff)
downloaddrakx-7d0ebe6797caaf042fa31f1bbd789a47ad6874c5.tar
drakx-7d0ebe6797caaf042fa31f1bbd789a47ad6874c5.tar.gz
drakx-7d0ebe6797caaf042fa31f1bbd789a47ad6874c5.tar.bz2
drakx-7d0ebe6797caaf042fa31f1bbd789a47ad6874c5.tar.xz
drakx-7d0ebe6797caaf042fa31f1bbd789a47ad6874c5.zip
remove unused old code
-rw-r--r--perl-install/bootloader.pm7
1 files changed, 0 insertions, 7 deletions
diff --git a/perl-install/bootloader.pm b/perl-install/bootloader.pm
index 25e048fa7..1b1428b38 100644
--- a/perl-install/bootloader.pm
+++ b/perl-install/bootloader.pm
@@ -2,7 +2,6 @@ package bootloader; # $Id$
use diagnostics;
use strict;
-use vars qw(%vga_modes);
#-######################################################################################
#- misc imports
@@ -537,12 +536,6 @@ sub pack_append {
join(' ', @$simple, map { "$_->[0]=$_->[1]" } @$dict);
}
-sub normalize_append {
- my ($s) = @_;
- my ($simple, $dict) = unpack_append($s);
- pack_append($simple, $dict);
-}
-
sub modify_append {
my ($b, $f) = @_;