diff options
author | Thierry Vignaud <tvignaud@mandriva.org> | 2004-01-23 10:07:20 +0000 |
---|---|---|
committer | Thierry Vignaud <tvignaud@mandriva.org> | 2004-01-23 10:07:20 +0000 |
commit | 2455ee778145294c011771f8988b8f14a2e2b7ff (patch) | |
tree | f3ba7043a0fec80903b5359a4254af3e422154ff /perl-install | |
parent | db1b3977c13216ee414ee6474e2fb3f0c7ea7931 (diff) | |
download | drakx-2455ee778145294c011771f8988b8f14a2e2b7ff.tar drakx-2455ee778145294c011771f8988b8f14a2e2b7ff.tar.gz drakx-2455ee778145294c011771f8988b8f14a2e2b7ff.tar.bz2 drakx-2455ee778145294c011771f8988b8f14a2e2b7ff.tar.xz drakx-2455ee778145294c011771f8988b8f14a2e2b7ff.zip |
(search_dir_font) kill unused variable
Diffstat (limited to 'perl-install')
-rwxr-xr-x | perl-install/standalone/drakfont | 2 |
1 files changed, 0 insertions, 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; |