diff options
| -rw-r--r-- | basic.el | 11 | ||||
| -rw-r--r-- | init.el | 3 |
2 files changed, 11 insertions, 3 deletions
@@ -6,6 +6,11 @@ (set 'eval-expression-print-length nil) ;; A value of nil means no limit. (set 'eval-expression-print-level nil) ;; A value of nil means no limit. +;;; Setting the direction of the text can speed things up. + +(set-default 'bidi-paragraph-direction 'left-to-right) +(set 'bidi-inhibit-bpa t) + ;;; resize horizontally (set 'fit-window-to-buffer-horizontally t) @@ -374,8 +379,10 @@ window horizontally." (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) +;; otherwise it would be interpreted as a string quote. Here #x22 = 34 +;; is the character code of the quote, and bitwise or with (ash 1 23) +;; is the effect of super. +(define-key global-map (vector (logior (ash 1 23) #x22)) #'split-window-right) (define-key global-map (vector ?\s-à) #'delete-window) (define-key global-map (vector ?\C-+) #'durand-enlarge-window) (define-key global-map (vector ?\C-=) #'durand-shrink-window) @@ -184,7 +184,8 @@ no effect." (use-package "rlist" 'rlist (define-key global-map (vector ?\C-x ?r ?L) #'rlist-list-registers) - (setq rlist-expert t)) + (setq rlist-expert t) + (setq rlist-verbose t)) ;;; ibuffer |