--- loncom/init.d/loncontrol	2011/05/15 01:10:02	1.43
+++ loncom/init.d/loncontrol	2015/09/20 18:31:33	1.44
@@ -1,6 +1,6 @@
 #!/usr/bin/perl
 #
-# $Id: loncontrol,v 1.43 2011/05/15 01:10:02 raeburn Exp $
+# $Id: loncontrol,v 1.44 2015/09/20 18:31:33 raeburn Exp $
 #
 # The LearningOnline Network with CAPA
 #
@@ -121,7 +121,7 @@ if (($command eq "restart") || ($command
             if ($daemon eq 'lonc') { $killallname='loncnew'; }
             &stop_daemon($daemon,$killallname);
         }
-        %iphost = &Apache::lonnet::get_iphost();
+        %iphost = &Apache::lonnet::get_iphost('',1);
         my $firewall_result =
             &LONCAPA::Firewall::firewall_close_port($iptables,\@fw_chains,
                                              $lond_port,\%iphost,[$lond_port]);
@@ -155,7 +155,7 @@ if (($command eq "restart") || ($command
         }
         &clean_sockets();
     } elsif ($command eq "start") {
-        %iphost = &Apache::lonnet::get_iphost();
+        %iphost = &Apache::lonnet::get_iphost('',1);
         my $firewall_result = 
             &LONCAPA::Firewall::firewall_open_port($iptables,\@fw_chains,$lond_port,\%iphost,[$lond_port]);
         if (($firewall_result eq 'ok') || ($firewall_result eq 'inactive firewall')) {