# This is the base class for all channel operations, which is everything to do
# with input and output really.
#
-# The instance variable in the outside world will be generally be called $dxchann
+# The instance variable in the outside world will be generally be called $dxchan
#
# This class is 'inherited' (if that is the goobledegook for what I am doing)
# by various other modules. The point to understand is that the 'instance variable'
use Filter;
use strict;
-use vars qw(%channels %valid);
+use vars qw(%channels %valid @ISA);
%channels = ();
# the above regexp must work
unless (defined $sort && defined $call && defined $line) {
- $data =~ s/([\x00-\x1f\x7f-\xff])/uc sprintf("%%%02x",ord($1))/eg;
+# $data =~ s/([\x00-\x1f\x7f-\xff])/uc sprintf("%%%02x",ord($1))/eg;
dbg('err', "DUFF Line on $chcall: $data");
return ();
}