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) = @_;