save-the-pinky.el

;; force myself to use arrow keys so that I don't
;; mash the control key with my pinky 90% of the time I am using
;; emacs.
(defun save-the-pinky ()
  "Echo out message to echo area"
  (interactive)
  (message "Use the arrow keys!")
)

(global-set-key [(control n)] 'save-the-pinky)
(global-set-key [(control p)] 'save-the-pinky)                                                                                                                                                                                              
(global-set-key [(control f)] 'save-the-pinky)
(global-set-key [(control b)] 'save-the-pinky)