summaryrefslogtreecommitdiffstats
path: root/perl-install/lang.pm
diff options
context:
space:
mode:
authorThierry Vignaud <tv@mageia.org>2012-12-10 03:14:04 +0000
committerThierry Vignaud <tv@mageia.org>2012-12-10 03:14:04 +0000
commit11a86e8a32cfcbe8866305e25f031fe298b6cf17 (patch)
tree83f70640329fed8523d706168d90f85949dc1d33 /perl-install/lang.pm
parenteb3e28558d0fb1702736e051c913062012a50693 (diff)
downloaddrakx-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.pm2
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 {