Autres/audacity
1
0
Fork 0
mirror of https://github.com/cookiengineer/audacity synced 2025-10-11 09:03:36 +02: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

10
plug-ins/sample-data-export.ny
View File

@@ -582,14 +582,14 @@ Daulton") " (<a href=
(putprop 'info
(cond
((and (= fileformat 3)(= chan 0)) ; csv, channel in column
(_"One column per channel.\n"))
(format nil (_"One column per channel.~%")))
((and (= fileformat 3)(= chan 2)) ; csv, channel in row
(_"One row per channel.\n"))
(format nil (_"One row per channel.~%")))
((or (soundp s)(= fileformat 4)) ; mono soundor HTML
"")
((= chan 0) (_"Left channel then Right channel on same line.\n"))
((= chan 1) (_"Left and right channels on alternate lines.\n"))
((= chan 2) (_"Left channel first then right channel.\n"))
((= chan 0) (format nil (_"Left channel then Right channel on same line.~%")))
((= chan 1) (format nil (_"Left and right channels on alternate lines.~%")))
((= chan 2) (format nil (_"Left channel first then right channel.~%")))
(T (_"Unspecified channel order")))
'chan-order))