summaryrefslogtreecommitdiffstats
path: root/perl-install/standalone/drakfont
diff options
context:
space:
mode:
authorThierry Vignaud <tvignaud@mandriva.org>2003-05-20 09:55:46 +0000
committerThierry Vignaud <tvignaud@mandriva.org>2003-05-20 09:55:46 +0000
commitabaa2334ba2c5e9ae8bd7205e2607113fa3c732d (patch)
tree61bc19d57cde691ad734fb9e9db9b8ad9e501760 /perl-install/standalone/drakfont
parent65cd9aa62666d55c293dd84319dc07db3b9b749f (diff)
downloaddrakx-backup-do-not-use-abaa2334ba2c5e9ae8bd7205e2607113fa3c732d.tar
drakx-backup-do-not-use-abaa2334ba2c5e9ae8bd7205e2607113fa3c732d.tar.gz
drakx-backup-do-not-use-abaa2334ba2c5e9ae8bd7205e2607113fa3c732d.tar.bz2
drakx-backup-do-not-use-abaa2334ba2c5e9ae8bd7205e2607113fa3c732d.tar.xz
drakx-backup-do-not-use-abaa2334ba2c5e9ae8bd7205e2607113fa3c732d.zip
(file_ok_sel) prevent potential crash in perl regexp engine if sg bad
happenned in the translation
Diffstat (limited to 'perl-install/standalone/drakfont')
-rwxr-xr-xperl-install/standalone/drakfont2
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/standalone/drakfont b/perl-install/standalone/drakfont
index 57b672958..4c8a6ae09 100755
--- a/perl-install/standalone/drakfont
+++ b/perl-install/standalone/drakfont
@@ -722,7 +722,7 @@ sub font_choice() {
sub file_ok_sel {
my ($_widget, $file_selection) = @_;
my $file_name = $file_selection->get_filename();
- if ($file_name =~ /$select_font_msg/) {
+ if ($file_name =~ /\Q$select_font_msg/) {
create_dialog(N("Error"), N("You've not selected any font"));
} else {
print "-- @install\n";