code.delx.au - dotemacs/blob - lisp/my-keys.el

   1 ;;; -*- lexical-binding: t -*-
   2
   3 ;; Disable suspend-frame, it's annoying
   4 (global-set-key (kbd "C-z") nil)
   5 (global-set-key (kbd "C-x C-z") nil)
   6
   7 ;; General commands
   8 (global-set-key (kbd "M-x") 'counsel-M-x)
   9
  10 ;; Search
  11 (global-set-key (kbd "C-s") 'swiper)
  12 (global-set-key (kbd "C-r") 'ivy-resume)
  13
  14 ;; Files/buffers
  15 (global-set-key (kbd "C-x C-f") 'counsel-find-file)
  16 (global-set-key (kbd "C-x f") 'counsel-git)
  17 (global-set-key (kbd "C-x g") 'counsel-git-grep)
  18 (global-set-key (kbd "C-x c") 'my/kill-buffers-not-in-frame)
  19 (global-set-key (kbd "C-x C-b") 'ibuffer)
  20 (global-set-key (kbd "C-x C-r") 'ivy-recentf)
  21 (global-set-key (kbd "C-c g d") 'git-gutter:popup-hunk)
  22 (global-set-key (kbd "C-c g p") 'git-gutter:previous-hunk)
  23 (global-set-key (kbd "C-c g n") 'git-gutter:next-hunk)
  24 (global-set-key (kbd "C-c g a") 'git-gutter:stage-hunk)
  25 (global-set-key (kbd "C-c g u") 'git-gutter:revert-hunk)
  26 (global-set-key (kbd "C-c g r") 'my/git-reset-buffer)
  27
  28 ;; Windows/frames
  29 (global-set-key (kbd "<C-up>") 'windmove-up)
  30 (global-set-key (kbd "<C-down>") 'windmove-down)
  31 (global-set-key (kbd "<C-left>") 'windmove-left)
  32 (global-set-key (kbd "<C-right>") 'windmove-right)
  33
  34 ;; Movement
  35 (global-set-key (kbd "M-g M-j") 'avy-goto-char-timer)
  36 (global-set-key (kbd "M-g M-l") 'avy-goto-char-in-line)
  37 (global-set-key (kbd "M-g M-w") 'avy-goto-word-1)
  38 (global-set-key (kbd "M-g M-g") 'avy-goto-line)
  39
  40 ;; Text formatting
  41 (global-set-key (kbd "M-/") 'hippie-expand)
  42 (global-set-key (kbd "M-;") 'my/comment-dwim)
  43 (global-set-key (kbd "M-i") 'change-inner)
  44 (global-set-key (kbd "C-o") 'my/open-line-above)
  45 (global-set-key (kbd "M-o") 'my/open-line-below)
  46 (global-set-key (kbd "C-c c") 'my/copy-line)
  47 (global-set-key (kbd "C-c d") 'my/duplicate-line)
  48
  49 ;; Marking
  50 (global-set-key (kbd "C-=") 'er/expand-region)
  51 (global-set-key (kbd "C-c l") 'mc/edit-lines)
  52 (global-set-key (kbd "C-c m") 'mc/mark-more-like-this-extended)
  53
  54 ;; Killing and deleting
  55 (global-set-key (kbd "C-y") 'my/yank)
  56 (global-set-key (kbd "M-y") 'counsel-yank-pop)
  57 (global-set-key (kbd "M-z") 'zap-up-to-char)
  58 (global-set-key (kbd "C-c k") 'kill-whole-line)
  59 (global-set-key (kbd "C-c s") 'my/substitute-line)
  60
  61 ;; Mode switching
  62 (global-set-key (kbd "C-x C-j") 'direx-project:jump-to-project-root-other-window)
  63 (global-set-key (kbd "<f8>") 'flyspell-mode)
  64 (global-set-key (kbd "<f9>") 'whitespace-mode)
  65 (global-set-key (kbd "<f10>") 'toggle-truncate-lines)