diff options
author | Thierry Vignaud <thierry.vignaud@gmail.com> | 2014-01-07 22:00:35 +0100 |
---|---|---|
committer | Thierry Vignaud <thierry.vignaud@gmail.com> | 2014-01-07 22:00:35 +0100 |
commit | 687d11bf2825b8143fc682e98dd09a189ebeeccc (patch) | |
tree | 629d1c452852027234a9bd431a2fbb66d0efb852 /perl-install | |
parent | 264e9201b28e330594b581ce1649b744c8c10036 (diff) | |
download | drakx-687d11bf2825b8143fc682e98dd09a189ebeeccc.tar drakx-687d11bf2825b8143fc682e98dd09a189ebeeccc.tar.gz drakx-687d11bf2825b8143fc682e98dd09a189ebeeccc.tar.bz2 drakx-687d11bf2825b8143fc682e98dd09a189ebeeccc.tar.xz drakx-687d11bf2825b8143fc682e98dd09a189ebeeccc.zip |
perl_checker cleanups including fixing wrong variable name (mga#11746)
Diffstat (limited to 'perl-install')
-rw-r--r-- | perl-install/any.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/perl-install/any.pm b/perl-install/any.pm index 232880047..bcbb990a0 100644 --- a/perl-install/any.pm +++ b/perl-install/any.pm @@ -685,8 +685,8 @@ sub get_autologin() { my %conf = read_gnomekderc($kdm_file, 'X-:0-Core'); $autologin_user = text2bool($conf{AutoLoginEnable}) && $conf{AutoLoginUser}; } elsif ($dm eq "lightdm") { - my %conf = read_gnomekderc($lightdm_file, 'SeatDefaults'); - $autologin_user = text2bool($conf{'#dummy-autologin'}) && $conf{autologin-user}; + my %conf = read_gnomekderc($lightdm_conffile, 'SeatDefaults'); + $autologin_user = text2bool($conf{'#dummy-autologin'}) && $conf{"autologin-user"}; } else { my %conf = getVarsFromSh($autologin_file); $autologin_user = text2bool($conf{AUTOLOGIN}) && $conf{USER}; |