From e5ca3cefba6261b01c448d641f197df8ec6f6a71 Mon Sep 17 00:00:00 2001 From: SteveDaulton Date: Fri, 29 Jan 2021 11:42:13 +0000 Subject: [PATCH] Whitespace corrections in Nyquist plug-ins --- plug-ins/SpectralEditMulti.ny | 2 +- plug-ins/adjustable-fade.ny | 2 +- plug-ins/eq-xml-to-txt-converter.ny | 2 +- plug-ins/nyquist-plug-in-installer.ny | 10 +++++----- plug-ins/sample-data-export.ny | 6 +++--- plug-ins/sample-data-import.ny | 2 +- 6 files changed, 12 insertions(+), 12 deletions(-) diff --git a/plug-ins/SpectralEditMulti.ny b/plug-ins/SpectralEditMulti.ny index 72b9855ce..369eabf97 100644 --- a/plug-ins/SpectralEditMulti.ny +++ b/plug-ins/SpectralEditMulti.ny @@ -39,7 +39,7 @@ $copyright (_ "Released under terms of the GNU General Public License version 2" (cond ((not (or f0 f1)) ; This should never happen for a 'spectral' effect. (throw 'error-message - (format nil (_ "~aPlease select frequencies.") p-err))) + (format nil (_ "~aPlease select frequencies.") p-err))) ((and f0 f1 (= f0 f1)) (throw 'error-message (format nil (_ "~aBandwidth is zero (the upper and lower~%~ diff --git a/plug-ins/adjustable-fade.ny b/plug-ins/adjustable-fade.ny index 61e317ab3..cbb1a8c0f 100644 --- a/plug-ins/adjustable-fade.ny +++ b/plug-ins/adjustable-fade.ny @@ -68,7 +68,7 @@ $control preset (_ "Handy Presets (override controls)") choice (("None" (_ "None ((or (> x 100)(> y 100)) (throw 'err (format nil (_ "~adB values cannot be more than +100 dB.~%~%~ Hint: 6 dB doubles the amplitude~%~ - -6 dB halves the amplitude.") err)))))) + -6 dB halves the amplitude.") err)))))) ;;; Select and apply fade (defun fade (sig type curve g0 g1) diff --git a/plug-ins/eq-xml-to-txt-converter.ny b/plug-ins/eq-xml-to-txt-converter.ny index d960d96c8..3da421bea 100644 --- a/plug-ins/eq-xml-to-txt-converter.ny +++ b/plug-ins/eq-xml-to-txt-converter.ny @@ -21,7 +21,7 @@ $control fxname (_ "Select target EQ effect") choice (("Graphic" (_ "Graphic EQ" ("FilterCurve" (_ "Filter Curve EQ"))) 0 $control infile (_ "Equalization XML file") file "" "*default*/EQCurves.xml" (((_ "XML file") (xml XML)) - ((_ "All files") (""))) "open,exists" + ((_ "All files") (""))) "open,exists" $control overwrite (_ "If output text file exists") choice (("Append" (_ "Append number")) ("Overwrite" (_ "Overwrite")) diff --git a/plug-ins/nyquist-plug-in-installer.ny b/plug-ins/nyquist-plug-in-installer.ny index 8aca53c92..f951b60ce 100644 --- a/plug-ins/nyquist-plug-in-installer.ny +++ b/plug-ins/nyquist-plug-in-installer.ny @@ -18,11 +18,11 @@ $copyright (_ "Released under terms of the GNU General Public License version 2" ;i18n-hint: "Browse..." is text on a button that launches a file browser. $control files (_ "Select file(s) to install") file (_ "Browse...") "~/Desktop/" (((_ "Plug-in") (ny NY)) - ((_ "Lisp file") (lsp LSP)) - ((_ "HTML file") (htm HTM html HTML)) - ((_ "Text file") (txt TXT)) - ((_ "All supported") (ny NY lsp LSP htm HTM html HTML txt TXT)) - ((_ "All files") (""))) "open,exists,multiple" + ((_ "Lisp file") (lsp LSP)) + ((_ "HTML file") (htm HTM html HTML)) + ((_ "Text file") (txt TXT)) + ((_ "All supported") (ny NY lsp LSP htm HTM html HTML txt TXT)) + ((_ "All files") (""))) "open,exists,multiple" $control overwrite (_ "Allow overwriting") choice ((_ "Disallow") (_ "Allow")) 0 diff --git a/plug-ins/sample-data-export.ny b/plug-ins/sample-data-export.ny index 6e4cacd90..d08b47a50 100644 --- a/plug-ins/sample-data-export.ny +++ b/plug-ins/sample-data-export.ny @@ -13,9 +13,9 @@ $copyright (_ "Released under terms of the GNU General Public License version 2" $control number (_ "Limit output to first") int-text (_ "samples") 100 1 1000000 $control units (_ "Measurement scale") choice ((_ "dB") (_ "Linear")) 0 $control filename (_ "Export data to") file (_ "Select a file") "*default*/sample-data.txt" (((_ "Text file") (txt TXT)) - ((_ "CSV files") (csv CSV)) - ((_ "HTML files") (html HTML htm HTM)) - ((_ "All files") (""))) "save,overwrite" + ((_ "CSV files") (csv CSV)) + ((_ "HTML files") (html HTML htm HTM)) + ((_ "All files") (""))) "save,overwrite" $control fileformat (_ "Index (text files only)") choice ((_ "None") ("Count" (_ "Sample Count")) ("Time" (_ "Time Indexed"))) diff --git a/plug-ins/sample-data-import.ny b/plug-ins/sample-data-import.ny index 3df9f0d3f..8ccdc73b0 100644 --- a/plug-ins/sample-data-import.ny +++ b/plug-ins/sample-data-import.ny @@ -9,7 +9,7 @@ $release 2.3.0 $copyright (_ "Released under terms of the GNU General Public License version 2") $control filename (_ "Select file") file "" "*default*/sample-data.txt" (((_ "Text file") (txt TXT)) - ((_ "All files") (""))) "open,exists" + ((_ "All files") (""))) "open,exists" $control bad-data (_ "Invalid data handling") choice (("ThrowError" (_ "Throw Error")) ("ReadAsZero" (_ "Read as Zero"))) 0