summaryrefslogtreecommitdiffstats
path: root/mdkonline
diff options
context:
space:
mode:
Diffstat (limited to 'mdkonline')
-rwxr-xr-xmdkonline8
1 files changed, 1 insertions, 7 deletions
diff --git a/mdkonline b/mdkonline
index 86ec9e26..bb434ae0 100755
--- a/mdkonline
+++ b/mdkonline
@@ -199,6 +199,7 @@ sub checkErrors {
}
sub setEntryWithConf {
my %t = getVarsFromSh($wideconf);
+ $t{MACHINE} ||= chomp_(`hostname`);
foreach (qw(login machine)) { $o->{$_}->get_text or $o->{$_}->set_text($t{uc($_)}) }
}
sub sendConfig {
@@ -411,11 +412,4 @@ MACHINE=$boxname
COUNTRY=$country
LASTCHECK=$d
);
- my $user = $ENV{INITIAL_USER} || $ENV{USER};
- my $confpers = $user eq 'root' ? '/root/.mdkonline' : "/home/$user/.mdkonline";
- my ($uid, $gid) = (getpwnam($user) || $user, getgrnam($user) || $user);
- output_with_perm $confpers, 644,
- qq(AUTOSTART=TRUE
-);
- chown $uid, $gid, $confpers;
}