From: Dirk Koopman <djk@tobit.co.uk>
Date: Fri, 19 Nov 2021 17:12:20 +0000 (+0000)
Subject: force all channels to default width 80 columns
X-Git-Url: http://dxcluster.org/gitweb/gitweb.cgi?a=commitdiff_plain;h=8832827e5bec29e9a9e2a62201c6ac7baf9b2fa3;p=spider.git

force all channels to default width 80 columns
---

diff --git a/perl/DXChannel.pm b/perl/DXChannel.pm
index cbb5477a..2d43b0f0 100644
--- a/perl/DXChannel.pm
+++ b/perl/DXChannel.pm
@@ -168,6 +168,7 @@ sub alloc
 	$self->{oldstate} = 0;
 	$self->{lang} = $main::lang if !$self->{lang};
 	$self->{func} = "";
+	$self->{width} = 80;
 
 	# add in all the dxcc, itu, zone info
 	my @dxcc = Prefix::extract($call);