X-Git-Url: http://www.dxcluster.org/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2FDXUser.pm;h=2c562ac70ed538d12373150fd08b2e15944a1b4f;hb=1006337e105ab06a0e468bc483332fd385dd5240;hp=f31b79e6da0ee167b0bd83e9de92d73ccbad73ea;hpb=22df46c61d3f1ae4115224bcc230ffe7ed6aff99;p=spider.git diff --git a/perl/DXUser.pm b/perl/DXUser.pm index f31b79e6..2c562ac7 100644 --- a/perl/DXUser.pm +++ b/perl/DXUser.pm @@ -78,8 +78,8 @@ $lrusize = 2000; wantann_talk => '0,Talklike Anns,yesno', wantpc90 => '1,Req PC90,yesno', wantnp => '1,Req New Protocol,yesno', - wantusers => '9,Want Users from node,yesno', - wantsendusers => '9,Send users to node,yesno', + wantpc16 => '9,Want Users from node,yesno', + wantsendpc16 => '9,Send users to node,yesno', lastoper => '9,Last for/oper,cldatetime', nothere => '0,Not Here Text', registered => '9,Registered?,yesno', @@ -585,14 +585,14 @@ sub wantann_talk return _want('ann_talk', @_); } -sub wantusers +sub wantpc16 { - return _want('users', @_); + return _want('pc16', @_); } -sub wantsendusers +sub wantsendpc16 { - return _want('annsendusers', @_); + return _want('sendpc16', @_); } sub wantlogininfo