diff options
-rw-r--r-- | init.el | 15 |
1 files changed, 15 insertions, 0 deletions
@@ -328,3 +328,18 @@ (page-break-lines-mode 1) (global-set-key (kbd "<C-prior>") 'backward-page) (global-set-key (kbd "<C-next>") 'forward-page) + + +;; http://whattheemacsd.com/key-bindings.el-01.html#disqus_thread +(global-set-key [remap goto-line] 'my/goto-line-with-feedback) +(defun my/goto-line-with-feedback () + "Show line numbers temporarily, while prompting for the line number input" + (interactive) + (let ((line-numbers-off-p (not linum-mode))) + (unwind-protect + (progn + (when line-numbers-off-p + (linum-mode 1)) + (call-interactively 'goto-line)) + (when line-numbers-off-p + (linum-mode -1))))) |