larstvei/emacs
1
1
Fork 0
mirror of https://github.com/larstvei/dot-emacs.git synced 2024-11-26 07:28:31 +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 #+begin_src emacs-lisp
(define-key custom-bindings-map (kbd "M-u") 'upcase-dwim) (use-package emacs
(define-key custom-bindings-map (kbd "M-c") 'capitalize-dwim) :bind (:map custom-bindings-map
(define-key custom-bindings-map (kbd "M-l") 'downcase-dwim) ("M-u" . upcase-dwim)
(define-key custom-bindings-map (kbd "M-]") 'other-frame) ("M-c" . capitalize-dwim)
(define-key custom-bindings-map (kbd "C-j") 'newline-and-indent) ("M-l" . downcase-dwim)
(define-key custom-bindings-map (kbd "C-c s") 'ispell-word) ("M-]" . other-frame)
(define-key custom-bindings-map (kbd "C-c v") 'visible-mode) ("C-j" . newline-and-indent)
("C-c s" . ispell-word)
("C-c v" . visible-mode)))
#+end_src #+end_src
@ -1976,22 +1978,22 @@
#+begin_src emacs-lisp #+begin_src emacs-lisp
(define-key global-map (kbd "M-p") 'jump-to-previous-like-this) (use-package emacs
(define-key global-map (kbd "M-n") 'jump-to-next-like-this) :bind (("M-p" . jump-to-previous-like-this)
(define-key custom-bindings-map (kbd "M-,") 'jump-to-previous-like-this) ("M-n" . jump-to-next-like-this)
(define-key custom-bindings-map (kbd "M-.") 'jump-to-next-like-this) :map custom-bindings-map
(define-key custom-bindings-map (kbd "C-c .") (cycle-themes)) ("M-," . jump-to-previous-like-this)
(define-key custom-bindings-map (kbd "C-x k") 'kill-this-buffer-unless-scratch) ("M-." . jump-to-next-like-this)
(define-key custom-bindings-map (kbd "C-c C-0") 'global-scale-default) ("C-x k" . kill-this-buffer-unless-scratch)
(define-key custom-bindings-map (kbd "C-c C-=") 'global-scale-up) ("C-c C-0" . global-scale-default)
(define-key custom-bindings-map (kbd "C-c C-+") 'global-scale-up) ("C-c C-=" . global-scale-up)
(define-key custom-bindings-map (kbd "C-c C--") 'global-scale-down) ("C-c C-+" . global-scale-up)
(define-key custom-bindings-map (kbd "C-c j") 'cycle-spacing-delete-newlines) ("C-c C--" . global-scale-down)
(define-key custom-bindings-map (kbd "C-c d") 'duplicate-thing) ("C-c j" . cycle-spacing-delete-newlines)
(define-key custom-bindings-map (kbd "<C-tab>") 'tidy) ("C-c d" . duplicate-thing)
("<C-tab>" . tidy))
(with-eval-after-load 'org :config
(define-key org-mode-map (kbd "C-'") 'org-sync-pdf)) (define-key custom-bindings-map (kbd "C-c .") (cycle-themes)))
#+end_src #+end_src