diff options
Diffstat (limited to 'basic.el')
| -rw-r--r-- | basic.el | 27 |
1 files changed, 26 insertions, 1 deletions
@@ -211,7 +211,7 @@ I stole from Protesilaos' dotemacs.") ;;; Hide auto-revert-mode ;; The original is auto-revert-mode-text -(durand-hide-minor-mode auto-revert-mode) +(durand-hide-minor-mode auto-revert-mode autorevert) ;;; enable all commands @@ -226,13 +226,38 @@ I stole from Protesilaos' dotemacs.") (set 'comment-multi-line t) (set 'comment-style 'multi-line) +;;; Toggle line numbers + +(define-key global-map (vector 'f9) #'durand-display-line-numbers) + +;;;###autoload +(defun durand-display-line-numbers (&optional arg) + "Display absolute line numbers or not. +With a positive ARG, display in relative style. +With a negative ARG, display in visual style. +With zero ARG, disable line numbers. +See `display-line-numbers' for details." + (interactive "P") + (setq display-line-numbers + (cond + ((null arg) (not display-line-numbers)) + ((> (prefix-numeric-value arg) 0) 'relative) + ((< (prefix-numeric-value arg) 0) 'visual)))) + ;;; Windows (define-key global-map (vector ?\s-o) #'other-window) (define-key global-map (vector ?\s-&) #'delete-other-windows) +(define-key global-map (vector ?\s-é) #'split-window-below) +;; The following binds the key ?\s-" represented as a number, since +;; otherwise it would be interpreted as a string quote. +(define-key global-map (vector 8388642) #'split-window-right) (define-key global-map (vector ?\s-à) #'delete-window) (define-key global-map (vector ?\C-+) #'enlarge-window) (define-key global-map (vector ?\s-f) #'find-file) +(define-key global-map (vector ?\s-F) #'find-file-other-window) +(define-key global-map (vector ?\s-d) #'dired) +(define-key global-map (vector ?\s-D) #'dired-other-window) (define-key global-map (vector ?\s-v) #'durand-focus-completion-or-minibuffer) ;;; Package management |