diff --git a/init.el b/init.el index 49ce44b..2a28fab 100644 --- a/init.el +++ b/init.el @@ -858,10 +858,12 @@ and eval it." (:map help-mode-map ("b" . help-go-back) ("f" . help-go-forward))) -(global-unset-key (kbd "M-[")) +;; (global-unset-key (kbd "M-'")) (general-def - "C-' r" (kbd "₹") - "C-' C-r" (kbd "₹") + :prefix "M-'" + "r -" [?₹] + "- r" [?₹] + "- -" [?—] "C-' e" (kbd "€") "C-' b" (kbd "←") "C-' f" (kbd "→") diff --git a/init.org b/init.org index 1324b3a..b910937 100644 --- a/init.org +++ b/init.org @@ -1155,10 +1155,12 @@ This is basically here because Boon hijacks the x key. #+END_SRC ** Unicode keys #+BEGIN_SRC emacs-lisp -(global-unset-key (kbd "M-[")) +;; (global-unset-key (kbd "M-'")) (general-def - "C-' r" (kbd "₹") - "C-' C-r" (kbd "₹") + :prefix "M-'" + "r -" [?₹] + "- r" [?₹] + "- -" [?—] "C-' e" (kbd "€") "C-' b" (kbd "←") "C-' f" (kbd "→") @@ -1168,6 +1170,15 @@ This is basically here because Boon hijacks the x key. "C-' F" (kbd "ƒ")) (setq default-input-method "devanagari-itrans") #+END_SRC + +Suggestion by lampilelo for extending =iso-transl-ctl-x-8-map= (https://dpaste.com/BAQUXSDVL.txt) +#+BEGIN_SRC emacs-lisp :tangle no +(eval-after-load 'iso-transl + '(let ((map (make-sparse-keymap))) + (define-key map (kbd "c") [?č]) + (define-key map (kbd "C") [?Č]) + (define-key iso-transl-ctl-x-8-map (kbd "v") map))) +#+END_SRC ** backup configuration #+BEGIN_SRC emacs-lisp (setq backup-by-copying t