diff options
| author | Stew Benedict <stewb@mandriva.org> | 2004-02-10 02:08:12 +0000 |
|---|---|---|
| committer | Stew Benedict <stewb@mandriva.org> | 2004-02-10 02:08:12 +0000 |
| commit | 48eab0364f67282f0c5944263cb5d6e23913bc55 (patch) | |
| tree | b180718dc03c8726b1a67665ac072adb8cf140ab /perl-install/standalone/drakTermServ | |
| parent | acd3d524619595306525a3c04be60d31dfbf99fe (diff) | |
| download | drakx-backup-do-not-use-48eab0364f67282f0c5944263cb5d6e23913bc55.tar drakx-backup-do-not-use-48eab0364f67282f0c5944263cb5d6e23913bc55.tar.gz drakx-backup-do-not-use-48eab0364f67282f0c5944263cb5d6e23913bc55.tar.bz2 drakx-backup-do-not-use-48eab0364f67282f0c5944263cb5d6e23913bc55.tar.xz drakx-backup-do-not-use-48eab0364f67282f0c5944263cb5d6e23913bc55.zip | |
Undo some of the breakage, format is still wrong :(
Diffstat (limited to 'perl-install/standalone/drakTermServ')
| -rwxr-xr-x | perl-install/standalone/drakTermServ | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/perl-install/standalone/drakTermServ b/perl-install/standalone/drakTermServ index 6b1fe4a0d..863259a1e 100755 --- a/perl-install/standalone/drakTermServ +++ b/perl-install/standalone/drakTermServ @@ -1736,7 +1736,8 @@ sub update_hosts_allow { sub format_client_entry { #- create a client entry, in proper format my ($client, %ts_clients) = @_; - my $pxe_img = $ts_clients{$client}{filename} =~ /boot-(.*?)\./ . ".zimg.pxe"; + my ($pxe_img) = $ts_clients{$client}{filename} =~ /boot-(.*?)\./; + $pxe_img .= ".zimg.pxe"; my $pxe = -f "$tftpboot/$pxe_img"; my $entry = "host $client {\n"; $entry .= "\thardware ethernet\t$ts_clients{$client}{hardware};\n"; @@ -1748,7 +1749,7 @@ sub format_client_entry { \t\tfilename\t\t"$pxe_img"; \t} \telse if substring (option vendor-class-identifier, 0, 9) = "Etherboot" -\t{\n\t)), +\t{)), qq(\tfilename\t\t"$ts_clients{$client}{filename}";), if_($pxe, qq(\t}))) . "\n"; } |