From d0b280ab098497a7013807e869e4c641cbfcfc94 Mon Sep 17 00:00:00 2001
From: minima <minima>
Date: Sat, 12 Mar 2005 10:28:59 +0000
Subject: [PATCH] change touser login in gen_DXProt

---
 perl/DXProtVars.pm  | 2 +-
 perl/Thingy/Ping.pm | 2 +-
 2 files changed, 2 insertions(+), 2 deletions(-)

diff --git a/perl/DXProtVars.pm b/perl/DXProtVars.pm
index 05f02bb7..95acac91 100644
--- a/perl/DXProtVars.pm
+++ b/perl/DXProtVars.pm
@@ -15,7 +15,7 @@ package DXProt;
 $pc50_interval = 14*60;
 
 # the version of DX cluster (tm) software I am masquerading as
-$myprot_version = 5252;
+$myprot_version = 5253;
 
 # default hopcount to use
 $def_hopcount = 30;
diff --git a/perl/Thingy/Ping.pm b/perl/Thingy/Ping.pm
index a1ab4599..902347dc 100644
--- a/perl/Thingy/Ping.pm
+++ b/perl/Thingy/Ping.pm
@@ -59,7 +59,7 @@ sub gen_DXProt
 	    $from ||= $thing->{user} if Route::Node::get($thing->{user});
 		$from ||= $thing->{origin};
 		my $to = $thing->{o} unless $thing->{out};
-		$to ||= $thing->{touser} if Route::Node::get($thing->{touser});
+		$to ||= $thing->{touser} unless Route::User::get($thing->{touser});
 		$to ||= $thing->{group};
 
 		
-- 
2.43.0