aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorJuanma Barranquero2008-01-31 10:59:14 +0000
committerJuanma Barranquero2008-01-31 10:59:14 +0000
commit08cf830bbd55a241619a6d0a4b53ad44c8d187c6 (patch)
tree490bed3e2041138e9e2d12013593ea5d8624aa14
parent868a6b71bd3bbddeb57ada174555172177b6e9e2 (diff)
downloademacs-08cf830bbd55a241619a6d0a4b53ad44c8d187c6.tar.gz
emacs-08cf830bbd55a241619a6d0a4b53ad44c8d187c6.zip
(linum-unload-function): New function.
-rw-r--r--lisp/ChangeLog7
-rw-r--r--lisp/linum.el6
2 files changed, 11 insertions, 2 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 469ff08d652..22db4c3fe86 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
12008-01-31 Juanma Barranquero <lekktu@gmail.com>
2
3 * linum.el (linum-unload-function): New function.
4
12008-01-30 Juanma Barranquero <lekktu@gmail.com> 52008-01-30 Juanma Barranquero <lekktu@gmail.com>
2 6
3 * emacs-lisp/check-declare.el (check-declare-directory): 7 * emacs-lisp/check-declare.el (check-declare-directory):
@@ -70,8 +74,7 @@
70 74
71 * image-mode.el (image-mode-current-vscroll) 75 * image-mode.el (image-mode-current-vscroll)
72 (image-mode-current-hscroll): New variables. 76 (image-mode-current-hscroll): New variables.
73 (image-set-window-hscroll, image-set-window-vscroll): New 77 (image-set-window-hscroll, image-set-window-vscroll): New functions.
74 functions.
75 (image-forward-hscroll, image-next-line, image-bol, image-eol) 78 (image-forward-hscroll, image-next-line, image-bol, image-eol)
76 (image-bob, image-eob): Use them. 79 (image-bob, image-eob): Use them.
77 (image-reset-current-vhscroll): New function. 80 (image-reset-current-vhscroll): New function.
diff --git a/lisp/linum.el b/lisp/linum.el
index 078645c4120..2aa79e0442e 100644
--- a/lisp/linum.el
+++ b/lisp/linum.el
@@ -190,6 +190,12 @@ and you have to scroll or press \\[recenter-top-bottom] to update the numbers."
190(defun linum-after-config () 190(defun linum-after-config ()
191 (walk-windows (lambda (w) (linum-update (window-buffer))) nil 'visible)) 191 (walk-windows (lambda (w) (linum-update (window-buffer))) nil 'visible))
192 192
193(defun linum-unload-function ()
194 "Unload the Linum library."
195 (global-linum-mode -1)
196 ;; continue standard unloading
197 nil)
198
193(provide 'linum) 199(provide 'linum)
194 200
195;; arch-tag: dea45631-ed3c-4867-8b49-1c41c80aec6a 201;; arch-tag: dea45631-ed3c-4867-8b49-1c41c80aec6a