emacs-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[Emacs-diffs] master a95d614 2/4: Tweak how byte-compile-print-syms fill


From: Glenn Morris
Subject: [Emacs-diffs] master a95d614 2/4: Tweak how byte-compile-print-syms fills
Date: Sun, 16 Jun 2019 20:37:38 -0400 (EDT)

branch: master
commit a95d614c96fbe224babc2a17d3f175ab26da003e
Author: Glenn Morris <address@hidden>
Commit: Glenn Morris <address@hidden>

    Tweak how byte-compile-print-syms fills
    
    * lisp/emacs-lisp/bytecomp.el (byte-compile-print-syms):
    Use fill-column from the compile log buffer.
---
 lisp/emacs-lisp/bytecomp.el | 5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)

diff --git a/lisp/emacs-lisp/bytecomp.el b/lisp/emacs-lisp/bytecomp.el
index 13d563b..b917b71 100644
--- a/lisp/emacs-lisp/bytecomp.el
+++ b/lisp/emacs-lisp/bytecomp.el
@@ -1601,7 +1601,10 @@ extra args."
           (while syms
             (setq s (symbol-name (pop syms))
                   L (+ L (length s) 2))
-            (if (< L (1- fill-column))
+            (if (< L (1- (buffer-local-value 'fill-column
+                                              (or (get-buffer
+                                                   byte-compile-log-buffer)
+                                                  (current-buffer)))))
                 (setq str (concat str " " s (and syms ",")))
               (setq str (concat str "\n    " s (and syms ","))
                     L (+ (length s) 4))))



reply via email to

[Prev in Thread] Current Thread [Next in Thread]