diff options
Diffstat (limited to 'perl-install')
| -rw-r--r-- | perl-install/NEWS | 3 | ||||
| -rwxr-xr-x | perl-install/standalone/finish-install | 5 |
2 files changed, 8 insertions, 0 deletions
diff --git a/perl-install/NEWS b/perl-install/NEWS index c805a9051..6cd64c304 100644 --- a/perl-install/NEWS +++ b/perl-install/NEWS @@ -1,3 +1,6 @@ +- finish-install: + o finit support + Version 11.71.8 - 25 February 2009 - harddrake service: diff --git a/perl-install/standalone/finish-install b/perl-install/standalone/finish-install index 504399611..2f2317068 100755 --- a/perl-install/standalone/finish-install +++ b/perl-install/standalone/finish-install @@ -147,6 +147,11 @@ sub ask_users() { any::add_users($users, $authentication); any::set_autologin($in->do_pkgs, $users->[0]{name}, $autologin_first) if $autologin_first; + my $finit_conf = "/etc/finit.conf"; + substInFile { + s/^user .*//; + $_ .= "user $users->[0]{name}\n" if eof; + } $finit_conf if -e $finit_conf; if ($old_user) { #- replace home path in user config files my $old_home = "/home/$old_user"; |