From 2455ee778145294c011771f8988b8f14a2e2b7ff Mon Sep 17 00:00:00 2001
From: Thierry Vignaud <tvignaud@mandriva.org>
Date: Fri, 23 Jan 2004 10:07:20 +0000
Subject: (search_dir_font) kill unused variable

---
 perl-install/standalone/drakfont | 2 --
 1 file changed, 2 deletions(-)

diff --git a/perl-install/standalone/drakfont b/perl-install/standalone/drakfont
index b38c7bfbb..b07afae31 100755
--- a/perl-install/standalone/drakfont
+++ b/perl-install/standalone/drakfont
@@ -233,11 +233,9 @@ sub is_a_font($) {
 sub search_dir_font() {
     foreach my $fn (@install) {
         my @font_list_tmp;
-        my $dir;
         if (!(-e $fn)) { print "$fn :: no such file or directory \n" }
         else {
             if (-d $fn) {
-                $dir = $fn;
                 foreach my $i (all($fn)) {
                     if (is_a_font($i)) {
                         push @font_list_tmp, $i;
-- 
cgit v1.2.1