Fix key binding definitions

This commit is contained in:
Gergely Polonkai 2016-10-27 16:43:03 +02:00
parent cd2dd7b629
commit df2edfb7c8
1 changed files with 16 additions and 13 deletions

29
init.el
View File

@ -187,8 +187,9 @@
(helm-mode t) (helm-mode t)
:bind :bind
(("M-x" . helm-M-x) (("M-x" . helm-M-x)
("C-x C-f" . helm-find-files) :map ctl-x-map
("C-x b" . helm-mini))) ("C-f" . helm-find-files)
("b" . helm-mini)))
(use-package helm-swoop (use-package helm-swoop
:ensure t :ensure t
@ -308,7 +309,8 @@
(setq magit-auto-revert-mode nil) (setq magit-auto-revert-mode nil)
(setq magit-last-seen-setup-instructions "1.4.0") (setq magit-last-seen-setup-instructions "1.4.0")
:bind :bind
(("C-x g" . magit-status))) (:map ctl-x-map
("g" . magit-status)))
(use-package magithub (use-package magithub
:ensure t) :ensure t)
@ -323,7 +325,7 @@
:demand :demand
:config :config
(define-prefix-command 'origami-mode-map) (define-prefix-command 'origami-mode-map)
(global-set-key (kbd "C-x C-z") 'origami-mode-map) (define-key ctl-x-map (kbd "C-z") 'origami-mode-map)
(global-origami-mode) (global-origami-mode)
:bind :bind
(:map origami-mode-map (:map origami-mode-map
@ -343,7 +345,8 @@
(use-package helm-ag (use-package helm-ag
:ensure t :ensure t
:bind :bind
(("C-x M-a" . helm-do-ag))) (:map gpolonkai/pers-map
("s" . helm-do-ag)))
(use-package smartparens (use-package smartparens
:ensure t :ensure t
@ -403,7 +406,7 @@
(global-git-gutter-mode t) (global-git-gutter-mode t)
:bind :bind
(:map gpolonkai/pers-map (:map gpolonkai/pers-map
("gg" . "git-gutter:update-all-windows"))) ("gg" . git-gutter:update-all-windows)))
;; Org mode ;; Org mode
(use-package org (use-package org
@ -636,7 +639,7 @@
(use-package helm-smex (use-package helm-smex
:ensure t :ensure t
:bind :bind
(("M-X" . helm-smex))) (("M-S-x" . helm-smex)))
(use-package ediff (use-package ediff
:ensure t :ensure t
@ -835,7 +838,7 @@
:ensure t :ensure t
:bind :bind
(:map gpolonkai/pers-map (:map gpolonkai/pers-map
("w" . zygospore-toggle-delete-other-windows))) ("w" . zygospore-toggle-delete-other-windows)))
;; Load my own functions ;; Load my own functions
(load "gnu-c-header.el") (load "gnu-c-header.el")
@ -895,15 +898,15 @@
(setq c-offset-alist '((member-init-intro . ++))) (setq c-offset-alist '((member-init-intro . ++)))
;; Custom key bindings ;; Custom key bindings
(global-set-key (kbd "C-x _") 'maximize-window) (define-key ctl-x-map (kbd "_") 'maximize-window)
(global-set-key (kbd "C-c C-y") 'duplicate-line) (global-set-key (kbd "C-c C-y") 'duplicate-line)
(global-set-key (kbd "M-(") 'æ-enclose-region) (global-set-key (kbd "M-(") 'æ-enclose-region)
(global-set-key (kbd "C-x w") 'webjump) (define-key ctl-x-map (kbd "w") 'webjump)
(global-set-key (kbd "<C-return>") 'open-line-below) (global-set-key (kbd "<C-return>") 'open-line-below)
(global-set-key (kbd "<C-S-return>") 'open-line-above) (global-set-key (kbd "<C-S-return>") 'open-line-above)
(global-set-key (kbd "C-x C-r") 'rename-current-buffer-file) (define-key ctl-x-map (kbd "C-r") 'rename-current-buffer-file)
(global-set-key (kbd "C-x C-d") 'delete-current-buffer-file) (define-key ctl-x-map (kbd "C-d") 'delete-current-buffer-file)
(global-set-key (kbd "C-x ~") 'toggle-char-case) (define-key ctl-x-map (kbd "~") 'toggle-char-case)
(define-key isearch-mode-map (kbd "<C-return>") #'isearch-exit-other-end) (define-key isearch-mode-map (kbd "<C-return>") #'isearch-exit-other-end)
(define-key gpolonkai/pers-map (kbd "m") 'hidden-mode-line-mode) (define-key gpolonkai/pers-map (kbd "m") 'hidden-mode-line-mode)