larstvei/emacs
1
1
Fork 0
mirror of https://github.com/larstvei/dot-emacs.git synced 2025-11-04 01:20:11 +00:00
Code Issues Actions Packages Projects Releases Wiki Activity

Organize keybindings with use-package

Browse Source
This commit is contained in:
larstvei 2023-06-24 11:21:31 +02:00
parent d6bce5d846
commit 5136c9bb80
1 changed files with 25 additions and 23 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

48
init.org
View File

@ -1962,13 +1962,15 @@
#+begin_src emacs-lisp
(define-key custom-bindings-map (kbd "M-u") 'upcase-dwim)
(define-key custom-bindings-map (kbd "M-c") 'capitalize-dwim)
(define-key custom-bindings-map (kbd "M-l") 'downcase-dwim)
(define-key custom-bindings-map (kbd "M-]") 'other-frame)
(define-key custom-bindings-map (kbd "C-j") 'newline-and-indent)
(define-key custom-bindings-map (kbd "C-c s") 'ispell-word)
(define-key custom-bindings-map (kbd "C-c v") 'visible-mode)
(use-package emacs
:bind (:map custom-bindings-map
("M-u" . upcase-dwim)
("M-c" . capitalize-dwim)
("M-l" . downcase-dwim)
("M-]" . other-frame)
("C-j" . newline-and-indent)
("C-c s" . ispell-word)
("C-c v" . visible-mode)))
#+end_src
@ -1976,22 +1978,22 @@
#+begin_src emacs-lisp
(define-key global-map (kbd "M-p") 'jump-to-previous-like-this)
(define-key global-map (kbd "M-n") 'jump-to-next-like-this)
(define-key custom-bindings-map (kbd "M-,") 'jump-to-previous-like-this)
(define-key custom-bindings-map (kbd "M-.") 'jump-to-next-like-this)
(define-key custom-bindings-map (kbd "C-c .") (cycle-themes))
(define-key custom-bindings-map (kbd "C-x k") 'kill-this-buffer-unless-scratch)
(define-key custom-bindings-map (kbd "C-c C-0") 'global-scale-default)
(define-key custom-bindings-map (kbd "C-c C-=") 'global-scale-up)
(define-key custom-bindings-map (kbd "C-c C-+") 'global-scale-up)
(define-key custom-bindings-map (kbd "C-c C--") 'global-scale-down)
(define-key custom-bindings-map (kbd "C-c j") 'cycle-spacing-delete-newlines)
(define-key custom-bindings-map (kbd "C-c d") 'duplicate-thing)
(define-key custom-bindings-map (kbd "<C-tab>") 'tidy)
(with-eval-after-load 'org
(define-key org-mode-map (kbd "C-'") 'org-sync-pdf))
(use-package emacs
:bind (("M-p" . jump-to-previous-like-this)
("M-n" . jump-to-next-like-this)
:map custom-bindings-map
("M-," . jump-to-previous-like-this)
("M-." . jump-to-next-like-this)
("C-x k" . kill-this-buffer-unless-scratch)
("C-c C-0" . global-scale-default)
("C-c C-=" . global-scale-up)
("C-c C-+" . global-scale-up)
("C-c C--" . global-scale-down)
("C-c j" . cycle-spacing-delete-newlines)
("C-c d" . duplicate-thing)
("<C-tab>" . tidy))
:config
(define-key custom-bindings-map (kbd "C-c .") (cycle-themes)))
#+end_src