* linum.el (linum-delete-overlays, linum-update-window):

Do not modify the right margin.  (Bug#3971)
This commit is contained in:
Juanma Barranquero 2009-09-22 00:06:28 +00:00
parent 91fdbd6fdc
commit 245be23c66
2 changed files with 7 additions and 2 deletions

View file

@ -1,3 +1,8 @@
2009-09-22 Lennart Borgman <lennart.borgman@gmail.com>
* linum.el (linum-delete-overlays, linum-update-window):
Do not modify the right margin. (Bug#3971)
2009-09-21 Chong Yidong <cyd@stupidchicken.com>
* files.el (conf-mode-maybe, magic-fallback-mode-alist): Use

View file

@ -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