diff options
Diffstat (limited to 'emacs/inits/60-misc-configs.el')
| -rw-r--r-- | emacs/inits/60-misc-configs.el | 29 |
1 files changed, 20 insertions, 9 deletions
diff --git a/emacs/inits/60-misc-configs.el b/emacs/inits/60-misc-configs.el index 4df81e0..1da810e 100644 --- a/emacs/inits/60-misc-configs.el +++ b/emacs/inits/60-misc-configs.el @@ -1,22 +1,33 @@ -;; Time-stamp: <2021-09-27 08h49 EDT (hobbies)> +;; Time-stamp: <2022-11-16 07h55 CET (anker)> (use-package dired :defer t :config (setq dired-listing-switches "--group-directories-first -alh" - dired-auto-revert-buffer t - dired-dwim-target t - ;; ??? - ;; dired-guess-shell-alist-user '(("\\.djvu\\'" "zathura") - ;; ("\\.pdf\\'" "zathura") - ;; ("\\.ps\\'" "zathura")) - )) + dired-auto-revert-buffer t + dired-dwim-target t + ;; ??? + ;; dired-guess-shell-alist-user '(("\\.djvu\\'" "zathura") + ;; ("\\.pdf\\'" "zathura") + ;; ("\\.ps\\'" "zathura")) + )) (use-package browse-url :defer t :config (setq browse-url-generic-program "firefox" - browse-url-browser-function 'browse-url-default-browser)) + browse-url-browser-function 'browse-url-default-browser)) (setq backup-directory-alist `((".*" . ,temporary-file-directory)) auto-save-file-name-transforms `((".*" ,temporary-file-directory t))) + + +(defun set-selective-display-dlw (&optional level) + "Fold text indented same of more than the cursor. +If level is set, set the indent level to LEVEL. +If 'selective-display' is already set to LEVEL, clicking +F5 again will unset 'selective-display' by setting it to 0." + (interactive "P") + (if (eq selective-display (1+ (current-column))) + (set-selective-display 0) + (set-selective-display (or level (1+ (current-column)))))) |