Autres/audacity
1
0
Fork 0
mirror of https://github.com/cookiengineer/audacity synced 2025-11-27 07:40:10 +01:00
Code Issues Releases Wiki Activity

Don't use \n sequence inside Lisp strings needing translation...

Browse Source 
... Because xgettext will just remove the \, not replace \n with newline.

That's consistent with Lisp reader behavior in this documentation:
http://www.lispworks.com/documentation/lw70/CLHS/Body/02_de.htm

The XLisp reader, which replaces \n with newline, is nonstandard.

So, to accommodate xgettext, use (format nil "...~%...") instead, or where
you can't do that in a $ header line, just make a line break inside the ""

There are a few "\n" left alone in sample-data-export.ny which are neither
in $ lines nor inside (_ "...")
This commit is contained in:
Paul Licameli
2018-03-02 08:59:13 -05:00
parent da39cc451f
commit ac9148e48f
13 changed files with 38 additions and 27 deletions
Download Patch File Download Diff File Expand all files Collapse all files

5
plug-ins/adjustable-fade.ny
View File

@@ -23,7 +23,8 @@ $control curve (_"Mid-fade Adjust (%)") real "" 0 -100 100
$control units (_"Start/End as") choice ((_"% of Original") (_"dB Gain")) 0
$control gain0 (_"Start (or end)") float-text "" 0 nil nil
$control gain1 (_"End (or start)") float-text "" 100 nil nil
$control preset (_" Handy Presets\n(override controls)") choice (
$control preset (_" Handy Presets
(override controls)") choice (
(_"None Selected")
(_"Linear In") (_"Linear Out")
(_"Exponential In") (_"Exponential Out")
@@ -192,7 +193,7 @@ selection length, but preview only needs to process preview length."
(setf curve (/ curve 100.0))
(setf gain0 (gainscale gain0 units))
(setf gain1 (gainscale gain1 units))
(setf err (_"Error\n\n"))
(setf err (format nil (_"Error~%~%")))
(catch 'err (fade *track* type curve gain0 gain1))