From 6bb761965c24814d3d5666b0cf5abddee38f48fd Mon Sep 17 00:00:00 2001 From: Jim Myhrberg Date: Mon, 19 Mar 2012 10:17:16 +0000 Subject: [PATCH] I'm not convinced relative line numbers is for me, so I'm disabling them for a while --- behavior.el | 20 ++++++++++---------- 1 file changed, 10 insertions(+), 10 deletions(-) diff --git a/behavior.el b/behavior.el index 16468a6..0d9b2c6 100644 --- a/behavior.el +++ b/behavior.el @@ -46,13 +46,13 @@ (global-set-key [mouse-5] 'scroll-up-line)) ;; Relative line numbers -- from: http://stackoverflow.com/a/6928112/42146 -(defvar my-linum-current-line-number 0) -(setq linum-format 'my-linum-relative-line-numbers) -(defun my-linum-relative-line-numbers (line-number) - (propertize - (number-to-string (abs (- line-number my-linum-current-line-number))) - 'face 'linum)) -(defadvice linum-update (around my-linum-update) - (let ((my-linum-current-line-number (line-number-at-pos))) - ad-do-it)) -(ad-activate 'linum-update) +;; (defvar my-linum-current-line-number 0) +;; (setq linum-format 'my-linum-relative-line-numbers) +;; (defun my-linum-relative-line-numbers (line-number) +;; (propertize +;; (number-to-string (abs (- line-number my-linum-current-line-number))) +;; 'face 'linum)) +;; (defadvice linum-update (around my-linum-update) +;; (let ((my-linum-current-line-number (line-number-at-pos))) +;; ad-do-it)) +;; (ad-activate 'linum-update)