[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/transient d056a6c013 3/5: transient--pp-to-file: Use co
From: |
Jonas Bernoulli |
Subject: |
[elpa] externals/transient d056a6c013 3/5: transient--pp-to-file: Use consistent format across Emacs releases |
Date: |
Wed, 16 Aug 2023 10:43:56 -0400 (EDT) |
branch: externals/transient
commit d056a6c013b9e7160a676365bcf29905bfe65093
Author: Jonas Bernoulli <jonas@bernoul.li>
Commit: Jonas Bernoulli <jonas@bernoul.li>
transient--pp-to-file: Use consistent format across Emacs releases
---
lisp/transient.el | 5 ++++-
1 file changed, 4 insertions(+), 1 deletion(-)
diff --git a/lisp/transient.el b/lisp/transient.el
index 3e9924e527..64e73d8f31 100644
--- a/lisp/transient.el
+++ b/lisp/transient.el
@@ -68,6 +68,7 @@
(defvar display-line-numbers) ; since Emacs 26.1
(defvar Man-notify-method)
+(defvar pp-default-function) ; since Emacs 29.1
(defmacro transient--with-emergency-exit (&rest body)
(declare (indent defun))
@@ -566,7 +567,9 @@ the previous prefix."
(setq list (cl-sort (copy-sequence list) #'string< :key #'car))
(with-temp-file file
(let ((print-level nil)
- (print-length nil))
+ (print-length nil)
+ (pp-default-function 'pp-28)
+ (fill-column 999))
(pp list (current-buffer)))))
(defvar transient-values