diff options
author | Olivier Blin <oblin@mandriva.com> | 2009-09-23 17:37:11 +0000 |
---|---|---|
committer | Olivier Blin <oblin@mandriva.com> | 2009-09-23 17:37:11 +0000 |
commit | 6a807f0361b38659906c4b7c1a407fa838d0beab (patch) | |
tree | 459064d935185560dfb037887a1af9b07ba515bd /perl-install/any.pm | |
parent | 0582ae37055b4e21015a4c16fbb9d3e4bc37f8cf (diff) | |
download | drakx-backup-do-not-use-6a807f0361b38659906c4b7c1a407fa838d0beab.tar drakx-backup-do-not-use-6a807f0361b38659906c4b7c1a407fa838d0beab.tar.gz drakx-backup-do-not-use-6a807f0361b38659906c4b7c1a407fa838d0beab.tar.bz2 drakx-backup-do-not-use-6a807f0361b38659906c4b7c1a407fa838d0beab.tar.xz drakx-backup-do-not-use-6a807f0361b38659906c4b7c1a407fa838d0beab.zip |
only write dm conf files if they exist before
Diffstat (limited to 'perl-install/any.pm')
-rw-r--r-- | perl-install/any.pm | 10 |
1 files changed, 6 insertions, 4 deletions
diff --git a/perl-install/any.pm b/perl-install/any.pm index 4bdb423fc..b71305b99 100644 --- a/perl-install/any.pm +++ b/perl-install/any.pm @@ -681,16 +681,18 @@ sub set_autologin { if $autologin->{user} && $autologin->{dm} eq 'xdm'; #- Configure KDM / MDKKDM - eval { common::update_gnomekderc_no_create(common::read_alternative('kdm4-config'), 'X-:0-Core' => ( + my $kdm_conffile = common::read_alternative('kdm4-config'); + eval { common::update_gnomekderc_no_create($kdm_conffile, 'X-:0-Core' => ( AutoLoginEnable => $do_autologin, AutoLoginUser => $autologin->{user}, - )) }; + )) } if -e $kdm_conffile; #- Configure GDM - eval { update_gnomekderc("$::prefix/etc/X11/gdm/custom.conf", daemon => ( + my $gdm_conffile = "$::prefix/etc/X11/gdm/custom.conf"; + eval { update_gnomekderc($gdm_conffile, daemon => ( AutomaticLoginEnable => $do_autologin, AutomaticLogin => $autologin->{user}, - )) }; + )) } if -e $gdm_conffile; my $xdm_autologin_cfg = "$::prefix/etc/sysconfig/autologin"; if ($autologin->{dm} eq 'xdm') { |