;;; Custom keybindings made in minor mode so they won't be override by major modes. ;;;###autoload (define-minor-mode my-keys-mode "Custom minor mode mainly to make keybindings." :lighter " MK" ; show chars on modeline. :init-value t ; set init-value to `t' to make it enabled in Fundamental mode. :keymap (let ((map (make-sparse-keymap))) (define-key map (kbd "M-h") 'windmove-left) (define-key map (kbd "M-l") 'windmove-right) (define-key map (kbd "M-j") 'windmove-down) (define-key map (kbd "M-k") 'windmove-up) ; (define-key map (kbd "C-c C-n") 'tabbar-forward) ; (define-key map (kbd "C-c C-p") 'tabbar-backward) map) ;; set command as alt on Mac (when (eq system-type 'darwin) (setq mac-command-modifier 'meta))) ;;;###autoload (define-globalized-minor-mode global-my-keys-mode my-keys-mode (lambda () (progn (my-keys-mode t) (column-number-mode t)))) (provide 'my-minor-mode)