[Netpass-devel] NetPass/lib/NetPass Config.pm,1.53,1.54 Network.pm,1.7,1.8

[jeff m. <jef...@us...>]

Update of /cvsroot/netpass/NetPass/lib/NetPass
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv17502/lib/NetPass

Modified Files:
	Config.pm Network.pm 
Log Message:
resetport fixes, install script fix

Index: Config.pm
===================================================================
RCS file: /cvsroot/netpass/NetPass/lib/NetPass/Config.pm,v
retrieving revision 1.53
retrieving revision 1.54
diff -u -d -r1.53 -r1.54
--- Config.pm	22 Aug 2005 19:26:07 -0000	1.53
+++ Config.pm	22 Dec 2005 18:31:03 -0000	1.54
@@ -90,7 +90,7 @@
 
 	    _log ("DEBUG", "config changed. reloading. cur=".
 		  $self->{'cfg_from_db'}->{'rev'}.
-		  " new=".$newCfg->{'rev'});
+		  " new=".$newCfg->{'rev'}."\n");
 
 	    $self->{'cfg'} = new Config::General(-String           => $newCfg->{'config'},
 						 -AutoTrue         => 1,

Index: Network.pm
===================================================================
RCS file: /cvsroot/netpass/NetPass/lib/NetPass/Network.pm,v
retrieving revision 1.7
retrieving revision 1.8
diff -u -d -r1.7 -r1.8
--- Network.pm	6 Sep 2005 20:29:18 -0000	1.7
+++ Network.pm	22 Dec 2005 18:31:03 -0000	1.8
@@ -182,8 +182,9 @@
 	my $res   = new Net::DNS::Resolver;
 	my $query = $res->search($hn);
 	
+
 	return $hn if ($hn =~ /^\d{1,3}\.\d{1,3}\.\d{1,3}\.\d{1,3}$/);
-	
+
 	my $addr;
 	
 	if ($query) {