X-Git-Url: http://dxcluster.org/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2FDXChannel.pm;h=8ab5a6fbc7e4695974050d5e87d1fb3909ed22be;hb=7ac0ed9d6ff3a1953cdd6b210854381e3978f330;hp=98617515981c8821f8590031aa41984ef277c253;hpb=aeb4c8591de710bd8de14f33817d2f0aabbd5e28;p=spider.git

diff --git a/perl/DXChannel.pm b/perl/DXChannel.pm
index 98617515..8ab5a6fb 100644
--- a/perl/DXChannel.pm
+++ b/perl/DXChannel.pm
@@ -119,15 +119,10 @@ $count = 0;
 		  lastmsgpoll => '0,Last Msg Poll,atime',
 		  inscript => '9,In a script,yesno',
 		  handle_xml => '9,Handles XML,yesno',
-		  do_pc92 => '9,Handles PC92,yesno',
-		  do_pc93 => '9,Handles PC93,yesno',
+		  do_pc9x => '9,Handles PC9x,yesno',
 		  inqueue => '9,Input Queue,parray',
 		 );
 
-
-use vars qw($VERSION $BRANCH);
-($VERSION, $BRANCH) = dxver(q$Revision$);
-
 # object destruction
 sub DESTROY
 {