diff options
| author | Sebastien Dupont <sdupont@mandriva.com> | 2001-10-10 14:40:44 +0000 |
|---|---|---|
| committer | Sebastien Dupont <sdupont@mandriva.com> | 2001-10-10 14:40:44 +0000 |
| commit | 3663ae5fcb8d9df672cb65ef4b2c1a8a36d67e8f (patch) | |
| tree | 40fa513a77628873f3ae82b5c11735db34e4ae66 /perl-install/standalone/drakfont | |
| parent | 315f4fb4b22a7b7ab340cd774f8806316bb3dbc7 (diff) | |
| download | drakx-backup-do-not-use-3663ae5fcb8d9df672cb65ef4b2c1a8a36d67e8f.tar drakx-backup-do-not-use-3663ae5fcb8d9df672cb65ef4b2c1a8a36d67e8f.tar.gz drakx-backup-do-not-use-3663ae5fcb8d9df672cb65ef4b2c1a8a36d67e8f.tar.bz2 drakx-backup-do-not-use-3663ae5fcb8d9df672cb65ef4b2c1a8a36d67e8f.tar.xz drakx-backup-do-not-use-3663ae5fcb8d9df672cb65ef4b2c1a8a36d67e8f.zip | |
better for --install
Diffstat (limited to 'perl-install/standalone/drakfont')
| -rwxr-xr-x | perl-install/standalone/drakfont | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/perl-install/standalone/drakfont b/perl-install/standalone/drakfont index f38cdd960..76d6392cd 100755 --- a/perl-install/standalone/drakfont +++ b/perl-install/standalone/drakfont @@ -152,14 +152,13 @@ sub search_dir_font { push @font_list_tmp, "$fn"; } } - print "Fonts in directory : ".$_."\n" foreach (@font_list_tmp); # @font_list = grep !$_, @font_list_tmp foreach @installed_fonts; foreach my $i (@installed_fonts) { foreach my $j (@font_list_tmp) { - if ( $i =~ /$j/) { push @font_list, "$i" ;} + if ( $j =~ /$i/) { push @font_list, "$i" ;} } } |