From 8008dcc21de9f12627af2968feb0ed7abea64b76 Mon Sep 17 00:00:00 2001
From: Olivier Blin <oblin@mandriva.org>
Date: Wed, 23 Jun 2004 07:10:53 +0000
Subject: remove unused variable

---
 perl-install/standalone/drakboot | 4 +---
 1 file changed, 1 insertion(+), 3 deletions(-)

(limited to 'perl-install')

diff --git a/perl-install/standalone/drakboot b/perl-install/standalone/drakboot
index 6fdb5a60d..d69a41607 100755
--- a/perl-install/standalone/drakboot
+++ b/perl-install/standalone/drakboot
@@ -116,12 +116,10 @@ if (-r $themes{sysconfig}) {
     close($SYSF);
 }
 
-my @thms;
 my @boot_thms = if_(!$themes{default}, qw(default));
-chdir($themes{path}); #- we must change directory for correct @thms assignement
+chdir($themes{path}); #- we must change directory for correct @boot_thms assignement
 foreach (all('.')) {
     if (-d "$themes{path}$_" && m/^[^.]/) {
-        push @thms, $_;
         -f "$themes{path}$_$themes{boot}{path}bootsplash-$cur_res.jpg" and push @boot_thms, $_;
     }
 }
-- 
cgit v1.2.1