diff options
author | Thierry Vignaud <tv@mageia.org> | 2012-12-10 03:14:04 +0000 |
---|---|---|
committer | Thierry Vignaud <tv@mageia.org> | 2012-12-10 03:14:04 +0000 |
commit | 11a86e8a32cfcbe8866305e25f031fe298b6cf17 (patch) | |
tree | 83f70640329fed8523d706168d90f85949dc1d33 /perl-install/lang.pm | |
parent | eb3e28558d0fb1702736e051c913062012a50693 (diff) | |
download | drakx-backup-do-not-use-11a86e8a32cfcbe8866305e25f031fe298b6cf17.tar drakx-backup-do-not-use-11a86e8a32cfcbe8866305e25f031fe298b6cf17.tar.gz drakx-backup-do-not-use-11a86e8a32cfcbe8866305e25f031fe298b6cf17.tar.bz2 drakx-backup-do-not-use-11a86e8a32cfcbe8866305e25f031fe298b6cf17.tar.xz drakx-backup-do-not-use-11a86e8a32cfcbe8866305e25f031fe298b6cf17.zip |
(charset2pango_font) simplify
Diffstat (limited to 'perl-install/lang.pm')
-rw-r--r-- | perl-install/lang.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/lang.pm b/perl-install/lang.pm index 3de0a1a14..96f963bab 100644 --- a/perl-install/lang.pm +++ b/perl-install/lang.pm @@ -957,7 +957,7 @@ my %charset2pango_font = ( sub charset2pango_font { my ($charset) = @_; - $charset2pango_font{exists $charset2pango_font{$charset} ? $charset : 'default'}; + $charset2pango_font{$charset} || $charset2pango_font{default}; } sub l2pango_font { |