summaryrefslogtreecommitdiff
path: root/basic.el
diff options
context:
space:
mode:
Diffstat (limited to 'basic.el')
-rw-r--r--basic.el11
1 files changed, 9 insertions, 2 deletions
diff --git a/basic.el b/basic.el
index f8dd47f..eb7ab1e 100644
--- a/basic.el
+++ b/basic.el
@@ -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)