diff --git a/src/svxlink/svxlink/CW.tcl b/src/svxlink/svxlink/CW.tcl index a3aaf80ff..9a8d9b7d4 100644 --- a/src/svxlink/svxlink/CW.tcl +++ b/src/svxlink/svxlink/CW.tcl @@ -167,7 +167,7 @@ proc loadDefaults {} { # pitch - The CW pitch in Hz # amp - The CW amplitude in dBFS # -proc play {txt {cpm 0} {pitch 0} {amp 0}} { +proc play {txt {cpm 0} {pitch 0} {amp -1000000}} { variable short_len; variable long_len; variable char_spacing; @@ -186,7 +186,7 @@ proc play {txt {cpm 0} {pitch 0} {amp 0}} { setPitch $pitch set load_defaults 1 } - if {$amp > 0} { + if {$amp > -1000000} { setAmplitude $amp set load_defaults 1 } diff --git a/src/versions b/src/versions index bb43e1ac6..b532845a9 100644 --- a/src/versions +++ b/src/versions @@ -8,7 +8,7 @@ LIBECHOLIB=1.3.3 LIBASYNC=1.5.99.1 # SvxLink versions -SVXLINK=1.6.99.8 +SVXLINK=1.6.99.9 MODULE_HELP=1.0.0 MODULE_PARROT=1.1.1 MODULE_ECHOLINK=1.4.99.0