emacs-elpa-diffs
[Top][All Lists]
Advanced

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

[nongnu] elpa/visual-fill-column a93dc5fc64 117/137: Do not set `visual-


From: ELPA Syncer
Subject: [nongnu] elpa/visual-fill-column a93dc5fc64 117/137: Do not set `visual-fill-column--min-margins` if already set.
Date: Sun, 2 Jan 2022 22:59:19 -0500 (EST)

branch: elpa/visual-fill-column
commit a93dc5fc64340d8abda1272f67d46d4cc09a4c85
Author: Joost Kremers <joostkremers@fastmail.fm>
Commit: Joost Kremers <joostkremers@fastmail.fm>

    Do not set `visual-fill-column--min-margins` if already set.
    
    This should hopefully prevent the window parameter `min-margins` from 
getting a
    value that prevents `split-window-right` from working. See Github issue #49.
---
 visual-fill-column.el | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

diff --git a/visual-fill-column.el b/visual-fill-column.el
index 2d2c56cd12..bcea0eed12 100644
--- a/visual-fill-column.el
+++ b/visual-fill-column.el
@@ -165,8 +165,9 @@ that actually visit a file."
 
   (when (version< "27.1" emacs-version)
     (let ((margins (window-margins (selected-window))))
-      (setq visual-fill-column--min-margins (cons (or (car margins) 0)
-                                                  (or (cdr margins) 0)))))
+      (unless visual-fill-column--min-margins
+        (setq visual-fill-column--min-margins (cons (or (car margins) 0)
+                                                    (or (cdr margins) 0))))))
 
   (visual-fill-column--adjust-window (selected-window)))
 



reply via email to

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