X-Git-Url: https://code.delx.au/dotemacs/blobdiff_plain/05f97637660b9f3068aa22340447970f70388e2a..f84b05a83397bb6c54af9796794190628bb867e7:/lisp/my-keys.el diff --git a/lisp/my-keys.el b/lisp/my-keys.el index 29c9f1e..b8c9469 100644 --- a/lisp/my-keys.el +++ b/lisp/my-keys.el @@ -2,6 +2,7 @@ ;; Disable suspend-frame, it's annoying (global-set-key (kbd "C-z") nil) +(global-set-key (kbd "C-x C-z") nil) ;; General commands (global-set-key (kbd "M-x") 'counsel-M-x) @@ -16,25 +17,26 @@ (global-set-key (kbd "C-x g") 'counsel-git-grep) (global-set-key (kbd "C-x c") 'my/kill-buffers-not-in-frame) (global-set-key (kbd "C-x C-b") 'ibuffer) -(global-set-key (kbd "C-x C-r") 'ivy-recentf) +(global-set-key (kbd "C-x C-r") 'counsel-recentf) +(global-set-key (kbd "C-x t") 'my/find-prod-or-test-file) (global-set-key (kbd "C-c g d") 'git-gutter:popup-hunk) (global-set-key (kbd "C-c g p") 'git-gutter:previous-hunk) (global-set-key (kbd "C-c g n") 'git-gutter:next-hunk) -(global-set-key (kbd "C-c g a") 'git-gutter:stage-hunk) -(global-set-key (kbd "C-c g u") 'git-gutter:revert-hunk) -(global-set-key (kbd "C-c g r") 'my/git-reset-buffer) +(global-set-key (kbd "C-c g r") 'git-gutter:revert-hunk) ;; Windows/frames +(global-set-key (kbd "C-x o") 'ace-window) +(global-set-key (kbd "C-x 9") 'my/window-resize-mode) (global-set-key (kbd "") 'windmove-up) (global-set-key (kbd "") 'windmove-down) (global-set-key (kbd "") 'windmove-left) (global-set-key (kbd "") 'windmove-right) ;; Movement -(global-set-key (kbd "M-g M-j") 'avy-goto-char-timer) -(global-set-key (kbd "M-g M-l") 'avy-goto-char-in-line) -(global-set-key (kbd "M-g M-w") 'avy-goto-word-1) +(global-set-key (kbd "M-g f") 'avy-goto-char-in-line) +(global-set-key (kbd "M-g g") 'avy-goto-line) (global-set-key (kbd "M-g M-g") 'avy-goto-line) +(global-set-key (kbd "M-g j") 'avy-goto-word-1) ;; Text formatting (global-set-key (kbd "M-/") 'hippie-expand) @@ -59,6 +61,20 @@ ;; Mode switching (global-set-key (kbd "C-x C-j") 'direx-project:jump-to-project-root-other-window) +(global-set-key (kbd "C-c g s") 'magit-status) +(global-set-key (kbd "C-c g g") 'magit-dispatch-popup) +(global-set-key (kbd "C-c g f") 'magit-file-popup) (global-set-key (kbd "") 'flyspell-mode) (global-set-key (kbd "") 'whitespace-mode) (global-set-key (kbd "") 'toggle-truncate-lines) + + +(defun my/window-resize-mode () + (interactive) + (message "Resize window with the arrow keys") + (let ((keymap (make-sparse-keymap))) + (define-key keymap [up] #'enlarge-window) + (define-key keymap [down] #'shrink-window) + (define-key keymap [left] #'shrink-window-horizontally) + (define-key keymap [right] #'enlarge-window-horizontally) + (set-transient-map keymap t)))