Commit f21f03c6 authored by Leigh B. Stoller's avatar Leigh B. Stoller
Browse files

Minor fix for ixpboot.

parent 4269dad1
...@@ -1073,7 +1073,7 @@ sub dorouterconfig (;$) ...@@ -1073,7 +1073,7 @@ sub dorouterconfig (;$)
CLOSETMCC($TM); CLOSETMCC($TM);
if (! @stuff) { if (! @stuff) {
return 0; return @routes;
} }
# #
...@@ -1097,7 +1097,7 @@ sub dorouterconfig (;$) ...@@ -1097,7 +1097,7 @@ sub dorouterconfig (;$)
print RC "true\n"; print RC "true\n";
close(RC); close(RC);
chmod(0755, TMROUTECONFIG); chmod(0755, TMROUTECONFIG);
return 0; return @routes;
} }
# #
...@@ -1764,7 +1764,7 @@ sub dorpms () ...@@ -1764,7 +1764,7 @@ sub dorpms ()
# to avoid the stupid changing-exports-file server race # to avoid the stupid changing-exports-file server race
# (install-tarfile knows how to deal with said race when copying). # (install-tarfile knows how to deal with said race when copying).
# #
my $installoption = "-c"; my $installoption = (REMOTE() ? "-t" : "-c");
open(RPM, ">" . TMRPM) open(RPM, ">" . TMRPM)
or die("Could not open " . TMRPM . ": $!"); or die("Could not open " . TMRPM . ": $!");
...@@ -1813,7 +1813,7 @@ sub dotarballs () ...@@ -1813,7 +1813,7 @@ sub dotarballs ()
# to avoid the stupid changing-exports-file server race # to avoid the stupid changing-exports-file server race
# (install-tarfile knows how to deal with said race when copying). # (install-tarfile knows how to deal with said race when copying).
# #
my $installoption = "-c"; my $installoption = (REMOTE() ? "-t" : "-c");
open(TARBALL, ">" . TMTARBALLS) open(TARBALL, ">" . TMTARBALLS)
or die("Could not open " . TMTARBALLS . ": $!"); or die("Could not open " . TMTARBALLS . ": $!");
......
...@@ -1073,7 +1073,7 @@ sub dorouterconfig (;$) ...@@ -1073,7 +1073,7 @@ sub dorouterconfig (;$)
CLOSETMCC($TM); CLOSETMCC($TM);
if (! @stuff) { if (! @stuff) {
return 0; return @routes;
} }
# #
...@@ -1097,7 +1097,7 @@ sub dorouterconfig (;$) ...@@ -1097,7 +1097,7 @@ sub dorouterconfig (;$)
print RC "true\n"; print RC "true\n";
close(RC); close(RC);
chmod(0755, TMROUTECONFIG); chmod(0755, TMROUTECONFIG);
return 0; return @routes;
} }
# #
...@@ -1764,7 +1764,7 @@ sub dorpms () ...@@ -1764,7 +1764,7 @@ sub dorpms ()
# to avoid the stupid changing-exports-file server race # to avoid the stupid changing-exports-file server race
# (install-tarfile knows how to deal with said race when copying). # (install-tarfile knows how to deal with said race when copying).
# #
my $installoption = "-c"; my $installoption = (REMOTE() ? "-t" : "-c");
open(RPM, ">" . TMRPM) open(RPM, ">" . TMRPM)
or die("Could not open " . TMRPM . ": $!"); or die("Could not open " . TMRPM . ": $!");
...@@ -1813,7 +1813,7 @@ sub dotarballs () ...@@ -1813,7 +1813,7 @@ sub dotarballs ()
# to avoid the stupid changing-exports-file server race # to avoid the stupid changing-exports-file server race
# (install-tarfile knows how to deal with said race when copying). # (install-tarfile knows how to deal with said race when copying).
# #
my $installoption = "-c"; my $installoption = (REMOTE() ? "-t" : "-c");
open(TARBALL, ">" . TMTARBALLS) open(TARBALL, ">" . TMTARBALLS)
or die("Could not open " . TMTARBALLS . ": $!"); or die("Could not open " . TMTARBALLS . ": $!");
......
Supports Markdown
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment