X-Git-Url: http://www.dxcluster.org/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2FDXUser.pm;h=e5a6a3b241c37915a9e75b4073abbf28ede33631;hb=a204e3cd89e849e97db25879b4ddf62b770bd227;hp=dec317a1928623ca40e004819cd473fdb53bda53;hpb=2145c6711ead2e9bc0e599044343c5c9064c3ddc;p=spider.git

diff --git a/perl/DXUser.pm b/perl/DXUser.pm
index dec317a1..e5a6a3b2 100644
--- a/perl/DXUser.pm
+++ b/perl/DXUser.pm
@@ -79,7 +79,8 @@ $lrusize = 2000;
 		  wantpc90 => '1,Req PC90,yesno',
 		  wantnp => '1,Req New Protocol,yesno',
 		  wantpc16 => '9,Want Users from node,yesno',
-		  wantsendpc16 => '9,Send users to node,yesno',
+		  wantsendpc16 => '9,Send PC16,yesno',
+		  wantroutepc19 => '9,Route PC19,yesno',
 		  lastoper => '9,Last for/oper,cldatetime',
 		  nothere => '0,Not Here Text',
 		  registered => '9,Registered?,yesno',
@@ -589,6 +590,11 @@ sub wantsendpc16
 	return _want('sendpc16', @_);
 }
 
+sub wantroutepc16
+{
+	return _want('routepc16', @_);
+}
+
 sub wantlogininfo
 {
 	my $self = shift;