diff options
author | B. Watson <urchlay@slackware.uk> | 2024-04-09 14:33:36 -0400 |
---|---|---|
committer | B. Watson <urchlay@slackware.uk> | 2024-04-09 14:33:36 -0400 |
commit | 88b93bea080061d68cd0faeee8032293d011d655 (patch) | |
tree | e9b0c54228ace3e3935bf9e56d03fd1d10688971 | |
parent | b2dced78f6bd35756195a88aacdfc22e449e0bcc (diff) | |
download | misc-scripts-88b93bea080061d68cd0faeee8032293d011d655.tar.gz |
soxdial: add -Y/--no-random.
-rwxr-xr-x | soxdial | 7 |
1 files changed, 7 insertions, 0 deletions
@@ -83,6 +83,11 @@ Randomize the timing. Digit length (B<-l>), inter-digit timing specified. This does a pretty good impression of a human dialling a number manually. +=item B<-Y>, B<--no-random> + +Disable randomized timing. This is the default; this option exists +to turn off a prior B<-X>, B<--random> option. + =item B<-S>, B<--stereo> Output stereo audio. The left and right channels will contain the same @@ -532,6 +537,8 @@ for ($argc = 0; $argc < @ARGV; $argc++) { } elsif(/^--?(?:X|random)$/) { # sorry I had to use -X for this, -R was already taken. $random = 1; + } elsif(/^--?(?:Y|no-random)$/) { + $random = 0; } elsif(/^--?f(?:ast)?$/) { $intertime /= 2; $digittime /= 2; |