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

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

[elpa] master 8db62bf 17/24: Make *LV* window fixed size


From: Oleh Krehel
Subject: [elpa] master 8db62bf 17/24: Make *LV* window fixed size
Date: Fri, 01 May 2015 14:27:19 +0000

branch: master
commit 8db62bff7a3fd9f90fa8e68de8bcd82131a925bc
Author: Oleh Krehel <address@hidden>
Commit: Oleh Krehel <address@hidden>

    Make *LV* window fixed size
    
    * lv.el (lv-window): Prevent `balance-windows' and the like from messing
      things up.
    (lv-message): Bind `window-size-fixed' to nil for
    `fit-window-to-buffer'.
    
    Fixes #64
---
 lv.el |    4 +++-
 1 files changed, 3 insertions(+), 1 deletions(-)

diff --git a/lv.el b/lv.el
index f03e73b..4634757 100644
--- a/lv.el
+++ b/lv.el
@@ -68,6 +68,7 @@ Only the background color is significant."
             (switch-to-buffer buf)
           (switch-to-buffer "*LV*")
           (set-window-hscroll lv-wnd 0)
+          (setq window-size-fixed t)
           (setq mode-line-format nil)
           (setq cursor-type nil)
           (set-window-dedicated-p lv-wnd t)
@@ -96,7 +97,8 @@ Only the background color is significant."
            (propertize "\n" 'face 'lv-separator 'line-height t)))
         (setq-local window-min-height n-lines)
         (setq truncate-lines (> n-lines 1))
-        (let ((window-resize-pixelwise t))
+        (let ((window-resize-pixelwise t)
+              (window-size-fixed nil))
           (fit-window-to-buffer nil nil 1)))
       (goto-char (point-min)))))
 



reply via email to

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