summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
authorThierry Vignaud <tvignaud@mandriva.org>2004-01-23 10:07:20 +0000
committerThierry Vignaud <tvignaud@mandriva.org>2004-01-23 10:07:20 +0000
commit2455ee778145294c011771f8988b8f14a2e2b7ff (patch)
treef3ba7043a0fec80903b5359a4254af3e422154ff /perl-install
parentdb1b3977c13216ee414ee6474e2fb3f0c7ea7931 (diff)
downloaddrakx-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-xperl-install/standalone/drakfont2
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;