1
0
Fork 0

fix(emacs): use keymap-global-set instead of deprecated global-set-key

Signed-off-by: Lucas Sta Maria <lucas@priime.dev>
This commit is contained in:
Lucas Sta Maria 2024-01-22 23:55:36 -05:00
parent 57fb029217
commit 6d91530d1a
No known key found for this signature in database
GPG key ID: F07FB16A826E3B47
3 changed files with 14 additions and 14 deletions

View file

@ -91,15 +91,15 @@
(setq sentence-end-double-space nil) (setq sentence-end-double-space nil)
;; Keybindings ;; Keybindings
(global-set-key (kbd "C-M-j") (lambda () (interactive) (scroll-up 1))) (keymap-global-set "C-M-j" (lambda () (interactive) (scroll-up 1)))
(global-set-key (kbd "C-M-k") (lambda () (interactive) (scroll-down 1))) (keymap-global-set "C-M-k" (lambda () (interactive) (scroll-down 1)))
(global-unset-key (kbd "C-x f")) (keymap-global-unset "C-x f")
(global-set-key (kbd "C-x f f") #'set-fill-column) (keymap-global-set "C-x f f" #'set-fill-column)
(global-set-key (kbd "C-x f i") #'display-fill-column-indicator-mode) (keymap-global-set "C-x f i" #'display-fill-column-indicator-mode)
(global-set-key (kbd "C-x f a") #'auto-fill-mode) (keymap-global-set "C-x f a" #'auto-fill-mode)
(global-set-key (kbd "C-x f n") #'toggle-display-line-numbers) (keymap-global-set "C-x f n" #'toggle-display-line-numbers)
(global-set-key (kbd "C-v") #'View-scroll-half-page-forward) (keymap-global-set "C-v" #'View-scroll-half-page-forward)
(global-set-key (kbd "M-v") #'View-scroll-half-page-backward) (keymap-global-set "M-v" #'View-scroll-half-page-backward)
(defun toggle-display-line-numbers () (defun toggle-display-line-numbers ()
"Toggle the display of line numbers." "Toggle the display of line numbers."

View file

@ -93,8 +93,8 @@
("https://blog.cleancoder.com/atom.xml" blog))) ("https://blog.cleancoder.com/atom.xml" blog)))
;; Magit ;; Magit
(global-set-key (kbd "C-c g g") #'magit) (keymap-global-set "C-c g g" #'magit)
(global-set-key (kbd "C-c g b") #'magit-blame) (keymap-global-set "C-c g b" #'magit-blame)
(setq auth-sources '("~/.authinfo")) (setq auth-sources '("~/.authinfo"))
;; Projectile ;; Projectile
@ -114,7 +114,7 @@
(neotree-hide) (neotree-hide)
(neotree-dir current-directory)))) (neotree-dir current-directory))))
(global-set-key (kbd "C-c t") #'neotree-toggle-current-directory) (keymap-global-set "C-c t" #'neotree-toggle-current-directory)
(setq neo-theme 'icon) (setq neo-theme 'icon)
;; Orderless ;; Orderless

View file

@ -36,8 +36,8 @@
(setq org-refile-targets '(("~/org/gtd.org" :maxlevel . 3) (setq org-refile-targets '(("~/org/gtd.org" :maxlevel . 3)
("~/org/someday.org" :level . 1) ("~/org/someday.org" :level . 1)
("~/org/tickler.org" :maxlevel . 2))) ("~/org/tickler.org" :maxlevel . 2)))
(global-set-key (kbd "C-c a") #'org-agenda) (keymap-global-set "C-c a" #'org-agenda)
(global-set-key (kbd "C-c c") #'org-capture) (keymap-global-set "C-c c" #'org-capture)
(setq org-todo-keywords '((sequence "TODO(t)" "WAITING(w)" "|" "DONE(d)" "CANCELLED(c)"))) (setq org-todo-keywords '((sequence "TODO(t)" "WAITING(w)" "|" "DONE(d)" "CANCELLED(c)")))
(defmacro η (fnc) (defmacro η (fnc)