summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
authorThierry Vignaud <thierry.vignaud@gmail.com>2016-05-02 08:28:37 +0200
committerThierry Vignaud <thierry.vignaud@gmail.com>2016-05-04 11:52:34 +0200
commita273deba589e8ea78399f6641f7846624d72470c (patch)
tree6648c2407670a8004b82a8d3d7178c389141892c /perl-install
parent671171d1c00ad62e761b7dfcf4bd99187c01a7d4 (diff)
downloaddrakx-a273deba589e8ea78399f6641f7846624d72470c.tar
drakx-a273deba589e8ea78399f6641f7846624d72470c.tar.gz
drakx-a273deba589e8ea78399f6641f7846624d72470c.tar.bz2
drakx-a273deba589e8ea78399f6641f7846624d72470c.tar.xz
drakx-a273deba589e8ea78399f6641f7846624d72470c.zip
detect plasma
Diffstat (limited to 'perl-install')
-rw-r--r--perl-install/lang.pm2
1 files changed, 2 insertions, 0 deletions
diff --git a/perl-install/lang.pm b/perl-install/lang.pm
index 7deafa956..a5e12becd 100644
--- a/perl-install/lang.pm
+++ b/perl-install/lang.pm
@@ -741,6 +741,7 @@ XIM server; or a Qt plugin if exists)
my @IM_i18n_fields = qw(XMODIFIERS XIM GTK_IM_MODULE XIM_PROGRAM QT_IM_MODULE);
my ($is_kde4);
+my $is_plasma;
=item my %IM_config;
@@ -970,6 +971,7 @@ sub IM2packages {
require any;
my @sessions = any::sessions();
$is_kde4 = member('KDE4', @sessions);
+ $is_plasma = any { /plasma/ } @sessions;
my $per_lang = $IM_config{$locale->{IM}}{packages} || {};
my $main_lang = analyse_locale_name($locale->{lang})->{main};
my $packages = $per_lang->{$main_lang} || $per_lang->{generic};