make it (seem to) work under perl 5.10

[spider.git] / perl / DXProtout.pm

diff --git a/perl/DXProtout.pm b/perl/DXProtout.pm
index 8c5e56d9abe3cdf5da625734b33670350bbc189b..6ee0c4984a40799ccf9833e19ebe794d36ea930a 100644 (file)
--- a/perl/DXProtout.pm
+++ b/perl/DXProtout.pm
@@ -11,7 +11,7 @@
 
 package DXProt;
 
-@ISA = qw(DXProt DXChannel);
+@ISA = qw(DXChannel);
 
 use DXUtil;
 use DXM;
@@ -422,7 +422,7 @@ sub pc92d
 # send a config
 sub pc92c
 {
-       return _gen_pc92('C', 0, @_);
+       return _gen_pc92('C', 1, @_);
 }
 
 # send a keep alive