Update nyquist-plug-in-installer.ny
Fix newlines from \n to ~%
This commit is contained in:
parent
ff07130ac4
commit
29c7133dd9
|
@ -185,11 +185,11 @@ $control overwrite (_ "Allow overwriting") choice ((_ "Disallow") (_ "Allow")) 0
|
||||||
;; Format results and display in human readable form.
|
;; Format results and display in human readable form.
|
||||||
(cond
|
(cond
|
||||||
((isempty install-success)
|
((isempty install-success)
|
||||||
(setf msg (_ "Error.\n")))
|
(setf msg (_ "Error.~%")))
|
||||||
((isempty install-fail)
|
((isempty install-fail)
|
||||||
(setf msg (format nil (_ "Success.~%Files written to:~%~s~%")
|
(setf msg (format nil (_ "Success.~%Files written to:~%~s~%")
|
||||||
(get '*system-dir* 'user-plug-in))))
|
(get '*system-dir* 'user-plug-in))))
|
||||||
(t (setf msg (_ "Warning.\nFailed to copy some files:\n"))))
|
(t (setf msg (_ "Warning.~%Failed to copy some files:~%"))))
|
||||||
(setf results (append install-success install-fail))
|
(setf results (append install-success install-fail))
|
||||||
(setf results (sort-results results))
|
(setf results (sort-results results))
|
||||||
(let ((status -1))
|
(let ((status -1))
|
||||||
|
@ -213,7 +213,7 @@ $control overwrite (_ "Allow overwriting") choice ((_ "Disallow") (_ "Allow")) 0
|
||||||
;; This allows result messages to be grouped according to installation status.
|
;; This allows result messages to be grouped according to installation status.
|
||||||
(case num
|
(case num
|
||||||
;; Success
|
;; Success
|
||||||
(0 (_ "Plug-ins installed.\n(Use the Plug-in Manager to enable effects):"))
|
(0 (_ "Plug-ins installed.~%(Use the Plug-in Manager to enable effects):"))
|
||||||
(1 (_ "Plug-ins updated:"))
|
(1 (_ "Plug-ins updated:"))
|
||||||
(2 (_ "Files copied to plug-ins folder:"))
|
(2 (_ "Files copied to plug-ins folder:"))
|
||||||
;; Fail
|
;; Fail
|
||||||
|
|
Loading…
Reference in New Issue