Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- (defvar my-keys-minor-mode-map
- (let ((map (make-sparse-keymap)))
- (define-key map (kbd "C-i") 'some-function)
- map)
- "my-keys-minor-mode keymap.")
- (define-minor-mode my-keys-minor-mode
- "A minor mode so that my key settings override annoying major modes."
- :init-value t
- :lighter " my-keys")
- (my-keys-minor-mode 1)
- (defun my-minibuffer-setup-hook ()
- (my-keys-minor-mode 0))
- (add-hook 'minibuffer-setup-hook 'my-minibuffer-setup-hook)
Advertisement
Add Comment
Please, Sign In to add comment