Created
October 26, 2012 19:38
-
-
Save sorenmacbeth/3960982 to your computer and use it in GitHub Desktop.
When you need to go HAM
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
(defconst ham-mode-keymap (make-sparse-keymap) "Keymap used in ham mode") | |
(define-key ham-mode-keymap (kbd "C-c C-0") 'go-ham) | |
(defgroup ham-mode nil | |
"HAM minor mode.") | |
(defun go-ham () | |
(interactive) | |
(message "HARD AS A MOTHERFUCKER")) | |
;;;###autoload | |
(define-minor-mode ham-mode | |
"Minor mode for going HAM" | |
:lighter " HAM" | |
:keymap ham-mode-keymap) | |
(provide 'ham-mode) |
Sign up for free
to join this conversation on GitHub.
Already have an account?
Sign in to comment