 						(define-key key-translation-map (kbd "M-K") (kbd "S-<down>"))
 						(define-key key-translation-map (kbd "M-J") (kbd "S-<left>"))		
 						(define-key key-translation-map (kbd "M-L") (kbd "S-<right>"))
-	
+
 						;; move cursor
 						(define-key map (kbd "M-n") 'scroll-up-command)
 						(define-key map (kbd "M-p") 'scroll-down-command)

;;; Code:


(require 'helm)

(define-minor-mode underi-mode
	"Keymap for the 21th century.

;; http://stackoverflow.com/a/12010437/6452961

(defun underi-minibuffer ()
	"Keymap for the minibuffer."
	(let ((map minibuffer-local-map))

		;; move cursor
