From ce6db430312bb290dd8af003a47cecbe63f0d9ee Mon Sep 17 00:00:00 2001 From: Thierry Vignaud Date: Thu, 20 Mar 2008 16:06:16 +0000 Subject: (list_fontpath) typo fix --- perl-install/standalone/drakfont | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/perl-install/standalone/drakfont b/perl-install/standalone/drakfont index cf70a1b54..c643f6c22 100755 --- a/perl-install/standalone/drakfont +++ b/perl-install/standalone/drakfont @@ -165,7 +165,7 @@ my @installed_fonts_full_path; # full path list of fonts to uninstall sub list_fontpath() { foreach (uniq((map { expand_symlinks($_) } glob_("$fontpathd_dir/*")), - (-x $chkfontpath ? grep { /\d+:\s/ } `$chkfontpath -l`) : ()) { + (-x $chkfontpath ? grep { /\d+:\s/ } `$chkfontpath -l` : ()))) { chomp; s/\d+:\s//gi; s/:\w*$//gi; -- cgit v1.2.1