diff options
| author | JSDurand <mmemmew@gmail.com> | 2021-01-27 18:34:52 +0800 |
|---|---|---|
| committer | JSDurand <mmemmew@gmail.com> | 2021-01-27 18:39:30 +0800 |
| commit | 43afe6c5db55704f787aaee4cedd7f4c69206b8b (patch) | |
| tree | bbaa1c90455801023c9f99ccfa175b1c5c121e9c /init.el | |
| parent | 4108bfb79643248821fb1d62cae9a4ac7146f1bc (diff) | |
Further configurations
* basic.el (eval-expression-print-length):
(eval-expression-print-level): Now echo are will print without limits.
(winner): Enable winner-mode at start up.
(input-decode-map):
(key-translation-map): Translate ESC to make the following key
modified by control.
(bookmark-completing-read):
(durand-bookmark-completing-read): Now it won't ask me for
confirmation about my choices.
* init.el ("durand-chercher-pdf"): Further enhance the convenience of
viewing PDFs.
("embark-conf.el"): Now I don't use embark anymore.
* view-conf.el (durand-view-map): Add my own way of viewing things.
(durand-open-targets): These are the things I can open.
(durand-open-object): Open things quickly.
Diffstat (limited to 'init.el')
| -rw-r--r-- | init.el | 16 |
1 files changed, 14 insertions, 2 deletions
@@ -110,6 +110,7 @@ If FUNCTION-NAME is already a valid function, this won't do anything." (use-package "durand-chercher-pdf" 'durand-chercher-pdf (define-key durand-pdf-mode-map (vector ?q) 'quit-window) + (define-key durand-pdf-mode-map (vector ?x) #'durand-chercher-pdf-exit) (define-key durand-pdf-mode-map (vector ?N) 'forward-line) (define-key durand-pdf-mode-map (vector ?n) 'durand-pdf-next-pdf-line) (define-key durand-pdf-mode-map (vector ?P) (lambda () (interactive) (forward-line -1))) @@ -118,7 +119,18 @@ If FUNCTION-NAME is already a valid function, this won't do anything." (define-key durand-pdf-mode-map (vector 32) 'durand-pdf-open-or-scroll-up) (define-key durand-pdf-mode-map (vector 'backspace) 'durand-pdf-open-or-scroll-down) (define-key durand-pdf-mode-map (vector ?o) 'kill-other-buffer-window) - (define-key durand-pdf-mode-map (vector ?k) 'kill-current-buffer)) + (define-key durand-pdf-mode-map (vector ?k) 'kill-current-buffer) + (cond + ((assoc durand-chercher-pdf-buffer-name display-buffer-alist #'string-match) + (setcdr (assoc durand-chercher-pdf-buffer-name + display-buffer-alist #'string-match) + '((display-buffer-in-tab durand-display-in-one-window) + (tab-name . "chercher pdf")))) + (t + (add-to-list 'display-buffer-alist + `(,(rx-to-string `(seq bos ,durand-chercher-pdf-buffer-name eos)) + (display-buffer-in-tab durand-display-in-one-window) + (tab-name . "chercher pdf")))))) ;;; gnus @@ -162,7 +174,7 @@ If FUNCTION-NAME is already a valid function, this won't do anything." ;;; embark -(load-config "embark-conf.el") +;; (load-config "embark-conf.el") ;;; magit |