BUGFIX for K3NG keyer in Alpha_139.

1 post / 0 new
PB4PT
BUGFIX for K3NG keyer in Alpha_139.

It appears that my CW keyer (K3NG on /dev/ttyACM0 on a RPi5) wasn't working.

**** DEBUG LEVEL -8 ****

OS:
Linux version 6.12.47+rpt-rpi-2712 (serge@raspberrypi.com) (aarch64-linux-gnu-gc
/usr/local/bin/mysqld
Radio1 CW settings:
CW init keyer type:3
Device:
Last error nr: 9
Last error desc:Bad file number
18
CW keyer reloaded by TRControl radio1 change

Refreshing some of my very ancient PASCAL skills I found cause, and got it to work with this change:

diff --git a/src/fNewQSO.pas b/src/fNewQSO.pas
index 93dee4a..d68ebee 100644
--- a/src/fNewQSO.pas
+++ b/src/fNewQSO.pas
@@ -7634,8 +7634,8 @@ begin
CWint.DebugMode := ((abs(dmData.DebugLevel) and 8) = 8 )
else
CWint.DebugMode := dmData.DebugLevel>=1;
- CWint.Port := cqrini.ReadString('CW'+n,'K3NGPort'+n,'');
- CWint.Device := cqrini.ReadString('CW'+n,'K3NGPort'+n,'');
+ CWint.Port := cqrini.ReadString('CW'+n,'K3NGPort','');
+ CWint.Device := cqrini.ReadString('CW'+n,'K3NGPort','');
CWint.MinSpeed := cqrini.ReadInteger('CW'+n, 'K3NG_min', 5);
CWint.MaxSpeed := cqrini.ReadInteger('CW'+n, 'K3NG_max', 60);
CWint.PortSpeed := cqrini.ReadInteger('CW'+n,'K3NGSerSpeed',115200);