From 4987c3976a06c9013a5ded7f5823893efb78683f Mon Sep 17 00:00:00 2001 From: Swarsel Date: Sat, 31 Aug 2024 18:00:15 +0200 Subject: [PATCH] feat: add emacs productivity keybinds --- SwarselSystems.org | 5 ++++- programs/emacs/init.el | 5 ++++- 2 files changed, 8 insertions(+), 2 deletions(-) diff --git a/SwarselSystems.org b/SwarselSystems.org index 0b86820..900b9c5 100644 --- a/SwarselSystems.org +++ b/SwarselSystems.org @@ -9403,12 +9403,15 @@ I also define some keybinds to some combinations directly. Those are used mostly "md" '(dirvish :which-key "dirvish") "o" '(:ignore o :which-key "org") "op" '((lambda () (interactive) (org-present)) :which-key "org-present") + "oa" '((lambda () (interactive) (org-agenda)) :which-key "org-agenda") + "oa" '((lambda () (interactive) (org-refile)) :which-key "org-refile") "ob" '((lambda () (interactive) (org-babel-mark-block)) :which-key "Mark whole src-block") "ol" '((lambda () (interactive) (org-insert-link)) :which-key "insert link") "os" '((lambda () (interactive) (org-store-link)) :which-key "store link") "od" '((lambda () (interactive) (org-babel-demarcate-block)) :which-key "demarcate (split) src-block") "on" '((lambda () (interactive) (nixpkgs-fmt-region)) :which-key "format nix-block") - ;; "c" '(:ignore c :which-key "capture") + "c" '(:ignore c :which-key "capture") + "ct" '((lambda () (interactive) (org-capture nil "tt")) :which-key "task") ;; "cj" '((lambda () (interactive) (org-capture nil "jj")) :which-key "journal") ;; "cs" '(markdown-download-screenshot :which-key "screenshot") "l" '(:ignore l :which-key "links") diff --git a/programs/emacs/init.el b/programs/emacs/init.el index b5ad5f4..4808ca7 100644 --- a/programs/emacs/init.el +++ b/programs/emacs/init.el @@ -321,12 +321,15 @@ create a new one." "md" '(dirvish :which-key "dirvish") "o" '(:ignore o :which-key "org") "op" '((lambda () (interactive) (org-present)) :which-key "org-present") + "oa" '((lambda () (interactive) (org-agenda)) :which-key "org-agenda") + "oa" '((lambda () (interactive) (org-refile)) :which-key "org-refile") "ob" '((lambda () (interactive) (org-babel-mark-block)) :which-key "Mark whole src-block") "ol" '((lambda () (interactive) (org-insert-link)) :which-key "insert link") "os" '((lambda () (interactive) (org-store-link)) :which-key "store link") "od" '((lambda () (interactive) (org-babel-demarcate-block)) :which-key "demarcate (split) src-block") "on" '((lambda () (interactive) (nixpkgs-fmt-region)) :which-key "format nix-block") - ;; "c" '(:ignore c :which-key "capture") + "c" '(:ignore c :which-key "capture") + "ct" '((lambda () (interactive) (org-capture nil "tt")) :which-key "task") ;; "cj" '((lambda () (interactive) (org-capture nil "jj")) :which-key "journal") ;; "cs" '(markdown-download-screenshot :which-key "screenshot") "l" '(:ignore l :which-key "links")