From 29c7133dd9b35dd3fa9fcd092600f2458fe24ec4 Mon Sep 17 00:00:00 2001 From: Thomas De Rocker Date: Sat, 3 Apr 2021 20:04:06 +0200 Subject: [PATCH] Update nyquist-plug-in-installer.ny Fix newlines from \n to ~% --- plug-ins/nyquist-plug-in-installer.ny | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/plug-ins/nyquist-plug-in-installer.ny b/plug-ins/nyquist-plug-in-installer.ny index f951b60ce..6fc2f0f4f 100644 --- a/plug-ins/nyquist-plug-in-installer.ny +++ b/plug-ins/nyquist-plug-in-installer.ny @@ -185,11 +185,11 @@ $control overwrite (_ "Allow overwriting") choice ((_ "Disallow") (_ "Allow")) 0 ;; Format results and display in human readable form. (cond ((isempty install-success) - (setf msg (_ "Error.\n"))) + (setf msg (_ "Error.~%"))) ((isempty install-fail) (setf msg (format nil (_ "Success.~%Files written to:~%~s~%") (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 (sort-results results)) (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. (case num ;; 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:")) (2 (_ "Files copied to plug-ins folder:")) ;; Fail