about summary refs log tree commit diff stats
path: root/.emacs.d/lisp/init-editor.el
diff options
context:
space:
mode:
authorDavid Morgan <djm_uk@protonmail.com>2023-10-25 09:11:08 +0100
committerDavid Morgan <djm_uk@protonmail.com>2023-10-25 09:14:37 +0100
commit55318c9ec18ba67865d9a729689749a15ffa66e1 (patch)
tree208d52ccc7b5d9a155465d719cd4367da88eaf65 /.emacs.d/lisp/init-editor.el
parentf6a50e987c2cf34f890dd3a3aad2fae6e6173c52 (diff)
downloaddotfiles-55318c9ec18ba67865d9a729689749a15ffa66e1.tar.gz
Add selected
Diffstat (limited to '.emacs.d/lisp/init-editor.el')
-rw-r--r--.emacs.d/lisp/init-editor.el32
1 files changed, 32 insertions, 0 deletions
diff --git a/.emacs.d/lisp/init-editor.el b/.emacs.d/lisp/init-editor.el
index 0c4d24e..1758009 100644
--- a/.emacs.d/lisp/init-editor.el
+++ b/.emacs.d/lisp/init-editor.el
@@ -221,5 +221,37 @@
   ("C-c c s" . caser-snakecase-dwim)
   ("C-c c d" . caser-dashcase-dwim))
 
+(use-package selected
+  :defer 6
+  :diminish selected-minor-mode
+  :config
+  (setq selected-emacs-lisp-mode-map (make-sparse-keymap)
+        selected-org-mode-map (make-sparse-keymap)
+        selected-clojure-mode-map (make-sparse-keymap))
+  (selected-global-mode +1)
+  :bind (:map selected-keymap
+              ("q" . selected-off)
+              ("u" . upcase-region)
+              ("l" . downcase-region)
+              ("c" . count-words-region)
+              ("m" . apply-macro-to-region-lines)
+              ("M-d" . sp-delete-region)
+              ("j" . jq-format-json-region)
+              ("i" . indent-region)
+              ("C-d" . duplicate-dwim)
+              ("n" . narrow-to-region)
+              ("_" . ws-butler-clean-region)
+              ("t t" . titlecase-dwim)
+              ("t c" . caser-camelcase-dwim)
+              ("t s" . caser-snakecase-dwim)
+              ("t d" . caser-dashcase-dwim)
+              :map selected-org-mode-map
+              ("t" . org-table-convert-region)
+              :map selected-emacs-lisp-mode-map
+              ("x" . elisp-eval-region-or-buffer)
+              :map selected-clojure-mode-map
+              ("x" . cider-eval-region)
+              ("r" . cider-insert-region-in-repl)))
+
 (provide 'init-editor)
 ;;; init-editor.el ends here