evilified: rebind : to |

This commit is contained in:
syl20bnr 2015-09-29 21:27:21 -04:00
parent 347fc731a6
commit 14bad7b99c

View file

@ -219,10 +219,10 @@ Each pair KEYn FUNCTIONn is defined in MAP after the evilification of it."
(cond
;; space
((equal event 32) nil)
((equal event ?:) nil)
;; C-g (cannot remap C-g)
((equal event ?\a) nil)
((equal event ?/) ?\\)
((equal event ?:) ?|)
((and (<= ?a event) (<= event ?z)) (- event 32))
;; don't shadow C-g, G is mapped directly to C-S-g
((equal event ?G) (+ (expt 2 25) ?\a))