scottk/wlan-lanforge-scripts
1
0
Fork 0
mirror of https://github.com/Telecominfraproject/wlan-lanforge-scripts.git synced 2025-10-30 18:27:53 +00:00
Code Issues Packages Projects Releases Wiki Activity

WIP: fixes ever growing whitepsace

Browse Source
This commit is contained in:
Jed Reynolds
2019-05-21 18:05:15 -07:00
parent edc1e39292
commit 75980515e1
1 changed files with 6 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
adjust_apache.pl
View File

@@ -45,10 +45,16 @@ my @host_lines = `cat /etc/hosts`;
chomp (@host_lines);
@host_lines = ("127.0.0.1 localhost", @host_lines)
if (@host_lines < 1);
my $removed = 0;
for (my $i =$#host_lines-1; $i>=0; $i--) {
my $line = $host_lines[$i];
if ($line =~ /$MgrHostname/) {
splice(@host_lines, $i, 1);
$removed++;
}
if (($removed < 2) && ( $line eq "" || $line eq "\n")) {
splice(@host_lines, $i, 1);
$removed++;
}
}
@host_lines = (@host_lines, ("$ip $MgrHostname", "\n"));