Commit e0b9d8fe authored by Leigh B. Stoller's avatar Leigh B. Stoller

Change call to event_register(); Now connect on localhost:BOSSEVENTPORT.

parent 77007260
#!/usr/bin/perl -w
#
# EMULAB-COPYRIGHT
# Copyright (c) 2003-2003 University of Utah and the Flux Group.
# Copyright (c) 2003-2004 University of Utah and the Flux Group.
# All rights reserved.
#
......@@ -52,7 +52,7 @@ use libdb;
# by the caller
# Don't my them, or it won't work!
$server = "";
$port = "";
$port = TB_BOSSEVENTPORT();
$URL = "";
$debug = 0;
......@@ -81,7 +81,7 @@ sub initStateWait( $@ ) {
print "initStateWait: states=(".join(",",@$states).
") nodes=(".join(",",@nodes).")\n";
}
if ($server eq "") { $server = TB_BOSSNODE; }
if ($server eq "") { $server = "localhost"; }
if ($URL eq "") { $URL = "elvin://$server"; }
if ($port ne "") { $URL .= ":$port"; }
......
......@@ -67,7 +67,8 @@ my $last_reload = time;
my $dbtag = "";
my $debug = 0;
my $nolog = 0;
my ($server,$port);
my $server = "localhost";
my $port = @BOSSEVENTPORT@;
my $lockfile;
my $pidfile;
......@@ -106,8 +107,6 @@ if (@ARGV) {
if ($opt{s}) {
$server = $opt{s};
} else {
$server = $BOSSNODE;
}
if ($opt{p}) {
$port = $opt{p};
......
Markdown is supported
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