[elpa] externals/org 93492b8619: org-compile-file: Ensure whitespace before ERR-MSG

[ELPA Syncer]

branch: externals/org
commit 93492b86192b4354c1fac406b7d265ca21503fcc
Author: Ihor Radchenko <yantar92@posteo.net>
Commit: Ihor Radchenko <yantar92@posteo.net>

    org-compile-file: Ensure whitespace before ERR-MSG
    
    * lisp/org-macs.el (org-compile-file): Make sure that ERR-MSG has
    lading whitespace and no trailing whitepace when displaying error.
    
    Reported-by: Niall Dooley <dooleyn@gmail.com>
    Link:
    
https://orgmode.org/list/CADS3Lq5Uv4gK0U93H2EX9r=g43BbhzHT33oXbWVg7bAURmFvFw@mail.gmail.com
---
 lisp/org-macs.el | 8 +++++++-
 1 file changed, 7 insertions(+), 1 deletion(-)

diff --git a/lisp/org-macs.el b/lisp/org-macs.el
index 0ac8ec8a9d..2258d8322b 100644
--- a/lisp/org-macs.el
+++ b/lisp/org-macs.el
@@ -396,7 +396,13 @@ it for output."
       (when (bound-and-true-p org-batch-test)
         (message "org-compile-file log ::\n-----\n%s\n-----\n"
                  (with-current-buffer log-buf (buffer-string))))
-      (error (format "File %S wasn't produced%s" output err-msg)))
+      (error
+       (format
+        "File %S wasn't produced%s"
+        output
+        (if (org-string-nw-p err-msg)
+            (concat "  " (org-trim err-msg))
+          err-msg))))
     output))
 
 (defun org-compile-file-commands (source process ext &optional spec err-msg)