[elpa] externals-release/org ecdb442044: org-persist: Work around Emacs bug#58687

[ELPA Syncer]

branch: externals-release/org
commit ecdb44204439917f68ee0a192d82ac0789bdcf1d
Author: Ihor Radchenko <yantar92@posteo.net>
Commit: Ihor Radchenko <yantar92@posteo.net>

    org-persist: Work around Emacs bug#58687
    
    * lisp/org-persist.el (org-persist--write-elisp-file): Bind
    `pp-use-max-width' to nil when using `pp'.  Otherwise, printing
    quickly becomes slow.
    
    Reported-by: Michael Eliachevitch <m.eliachevitch@posteo.de>
    Link: https://orgmode.org/list/87wn8tb3zp.fsf@posteo.de
    Link: https://debbugs.gnu.org/cgi/bugreport.cgi?bug=58687
---
 lisp/org-persist.el | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/lisp/org-persist.el b/lisp/org-persist.el
index 336496efbf..a96f0fdc90 100644
--- a/lisp/org-persist.el
+++ b/lisp/org-persist.el
@@ -335,7 +335,8 @@ FORMAT and ARGS are passed to `message'."
       (make-directory (file-name-directory file) t))
     (with-temp-file file
       (if pp
-          (pp data (current-buffer))
+          (let ((pp-use-max-width nil)) ; Emacs bug#58687
+            (pp data (current-buffer)))
         (prin1 data (current-buffer))))
     (org-persist--display-time
      (- (float-time) start-time)