diff options
author | Daouda Lo <daouda@mandriva.com> | 2004-09-29 02:36:44 +0000 |
---|---|---|
committer | Daouda Lo <daouda@mandriva.com> | 2004-09-29 02:36:44 +0000 |
commit | 6f1c10fcbb5df27e0b36f83438f0fe2379ea4e00 (patch) | |
tree | 969e41e51eaa55451ed0ac2874e65a2d8e4bbf1a | |
parent | ca189e381e962249375c6ebe70998a6c609dd076 (diff) | |
download | mgaonline-6f1c10fcbb5df27e0b36f83438f0fe2379ea4e00.tar mgaonline-6f1c10fcbb5df27e0b36f83438f0fe2379ea4e00.tar.gz mgaonline-6f1c10fcbb5df27e0b36f83438f0fe2379ea4e00.tar.bz2 mgaonline-6f1c10fcbb5df27e0b36f83438f0fe2379ea4e00.tar.xz mgaonline-6f1c10fcbb5df27e0b36f83438f0fe2379ea4e00.zip |
- nlogin
-rwxr-xr-x | mdkonline_tui | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/mdkonline_tui b/mdkonline_tui index b8d08183..3d961812 100755 --- a/mdkonline_tui +++ b/mdkonline_tui @@ -58,7 +58,7 @@ sub read_conf() { my %t = getVarsFromSh($wideconf); my $host = chomp_(`hostname`); $t{MACHINE} ||= $1 if $host =~ /(\w+)(.*)/; - $login = defined $nlogin ? $nlogin : $t{LOGIN}; $boxname = $t{MACHINE} + $login = $t{LOGIN}; $boxname = $t{MACHINE} } sub check_login { my ($log, $pass, $box) = @_; |