--- loncom/loncron 2005/01/02 18:57:06 1.54 +++ loncom/loncron 2005/01/20 16:27:40 1.55 @@ -2,7 +2,7 @@ # Housekeeping program, started by cron, loncontrol and loncron.pl # -# $Id: loncron,v 1.54 2005/01/02 18:57:06 www Exp $ +# $Id: loncron,v 1.55 2005/01/20 16:27:40 albertel Exp $ # # Copyright Michigan State University Board of Trustees # @@ -463,7 +463,7 @@ sub test_connections { foreach my $tryserver (sort(keys(%{$hostname}))) { print("."); my $result; - my $answer=reply("pong",$tryserver); + my $answer=reply("ping",$tryserver); if ($answer eq "$tryserver:$perlvar{'lonHostID'}") { $result="ok"; $good++;