Teach Emacs about X11/modmap

1 files changed, 10 insertions, 0 deletions

diff --git a/.config/emacs/init.el b/.config/emacs/init.el
index eddd0b7..7b9be85 100644
--- a/.config/emacs/init.el
+++ b/.config/emacs/init.el
@@ -237,6 +237,16 @@ sh-script.el is broken."
       (smerge-mode 1))))
 (add-hook 'find-file-hook 'try-smerge-mode t)
 
+;; http://www.emacswiki.org/emacs/XModMapMode
+(when (not (fboundp 'xmodmap-mode))
+  (define-generic-mode 'xmodmap-mode
+    '(?!)
+    '("add" "clear" "keycode" "keysym" "pointer" "remove")
+    nil
+    '("[xX]modmap\\(rc\\)?\\'")
+    nil
+    "Simple mode for xmodmap files."))
+
 
 ;; All my weird mode-specific settings ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;