diff options
| author | tslil clingman <tslil@posteo.de> | 2023-09-12 21:07:47 +0200 |
|---|---|---|
| committer | tslil clingman <tslil@posteo.de> | 2023-09-12 21:08:54 +0200 |
| commit | 8607fd0b5d3cb9efcd4bd805321128713823271d (patch) | |
| tree | a8e977963943f56f42388449fc2a334a58f550eb /emacs/inits/60-misc-configs.el | |
| parent | f749a8ac8423e11739ff1315d1ff50256f565d95 (diff) | |
[emacs] misc config updates
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)))))) |