diff options
| author | Juanma Barranquero <lekktu@gmail.com> | 2009-09-22 00:06:28 +0000 |
|---|---|---|
| committer | Juanma Barranquero <lekktu@gmail.com> | 2009-09-22 00:06:28 +0000 |
| commit | 245be23c669af9fa2a241531a74522b5cccc884c (patch) | |
| tree | d13c3e21ece6a0c278ddaa04e3ce51b17f802b6f /lisp/linum.el | |
| parent | 91fdbd6fdc7a68a9832166d4e35e8b0ed31d72e0 (diff) | |
| download | emacs-245be23c669af9fa2a241531a74522b5cccc884c.tar.gz | |
* linum.el (linum-delete-overlays, linum-update-window):
Do not modify the right margin. (Bug#3971)
Diffstat (limited to 'lisp/linum.el')
| -rw-r--r-- | lisp/linum.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/linum.el b/lisp/linum.el index 9e0e54a49e1..81b48e99067 100644 --- a/lisp/linum.el +++ b/lisp/linum.el @@ -113,7 +113,7 @@ and you have to scroll or press \\[recenter-top-bottom] to update the numbers." (mapc #'delete-overlay linum-overlays) (setq linum-overlays nil) (dolist (w (get-buffer-window-list (current-buffer) nil t)) - (set-window-margins w 0))) + (set-window-margins w 0 (cdr (window-margins w))))) (defun linum-update-current () "Update line numbers for the current buffer." @@ -168,7 +168,7 @@ and you have to scroll or press \\[recenter-top-bottom] to update the numbers." (overlay-put ov 'linum-str str)))) (forward-line) (setq line (1+ line))) - (set-window-margins win width))) + (set-window-margins win width (cdr (window-margins win))))) (defun linum-after-change (beg end len) ;; update overlays on deletions, and after newlines are inserted |