[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/emacs-gc-stats e40279002a 1/3: emacs-gc-stats-save-sess
From: |
ELPA Syncer |
Subject: |
[elpa] externals/emacs-gc-stats e40279002a 1/3: emacs-gc-stats-save-session: Fix writing long lines |
Date: |
Fri, 16 Jun 2023 09:58:20 -0400 (EDT) |
branch: externals/emacs-gc-stats
commit e40279002a3a43bd2ebec30292685e55b3ff0c84
Author: Ihor Radchenko <yantar92@posteo.net>
Commit: Ihor Radchenko <yantar92@posteo.net>
emacs-gc-stats-save-session: Fix writing long lines
* emacs-gc-stats.el (emacs-gc-stats-save-session): Set print settings
to print completely.
---
emacs-gc-stats.el | 13 ++++++++++++-
1 file changed, 12 insertions(+), 1 deletion(-)
diff --git a/emacs-gc-stats.el b/emacs-gc-stats.el
index 2bfece0845..6773d23da3 100644
--- a/emacs-gc-stats.el
+++ b/emacs-gc-stats.el
@@ -163,7 +163,18 @@ Otherwise, collect symbol."
(with-temp-buffer
(insert-file-contents emacs-gc-stats-file)
(ignore-errors (read (current-buffer))))))
- (session (reverse emacs-gc-stats--data)))
+ (session (reverse emacs-gc-stats--data))
+ (write-region-inhibit-fsync t)
+ ;; We set UTF-8 here to avoid the overhead from
+ ;; `find-auto-coding'.
+ (coding-system-for-write 'utf-8)
+ print-level
+ print-length
+ print-quoted
+ (print-escape-control-characters t)
+ (print-escape-nonascii t)
+ (print-continuous-numbering t)
+ print-number-table)
;; remove end data in case if we continue recording.
(pop emacs-gc-stats--data)
(with-temp-file emacs-gc-stats-file