From cedf27ad055e22462df4ac2da72e8dc0f31d39a9 Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Tue, 30 Sep 2003 18:54:15 +0000 Subject: don't check *all* for test_pms_all, skip horrible stuffs --- perl-install/standalone/drakfont | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'perl-install/standalone/drakfont') diff --git a/perl-install/standalone/drakfont b/perl-install/standalone/drakfont index 5f3dffa5c..3dd3010c6 100755 --- a/perl-install/standalone/drakfont +++ b/perl-install/standalone/drakfont @@ -325,7 +325,7 @@ sub convert_ttf_fonts { sub move_fonts { my ($src_dir, $dest_dir, @extensions) = @_; - my @fonts = map { s@.*/@@; $_ } map { glob("$src_dir/*.$_") } @extensions; + my @fonts = map { s!.*/!!; $_ } map { glob("$src_dir/*.$_") } @extensions; system("cd $src_dir && mv @fonts $dest_dir") if @fonts; } -- cgit v1.2.1