Transient manu for system interaction and make text modification transient global
This commit is contained in:
parent
044360e2b7
commit
97f9e119ad
2 changed files with 20 additions and 3 deletions
|
@ -22,6 +22,8 @@
|
||||||
|
|
||||||
;;; Code:
|
;;; Code:
|
||||||
|
|
||||||
|
(require 'transient)
|
||||||
|
|
||||||
(defcustom theurgy-enable-vterm-windows nil
|
(defcustom theurgy-enable-vterm-windows nil
|
||||||
"Whether `vterm' should be enabled on Windows sytems."
|
"Whether `vterm' should be enabled on Windows sytems."
|
||||||
:type 'boolean
|
:type 'boolean
|
||||||
|
@ -83,6 +85,21 @@
|
||||||
(slot . 0)
|
(slot . 0)
|
||||||
(window-height . 0.2)))
|
(window-height . 0.2)))
|
||||||
|
|
||||||
|
(use-package restart-emacs)
|
||||||
|
|
||||||
|
(use-package system-packages)
|
||||||
|
|
||||||
|
(transient-define-prefix system-interactions-transient ()
|
||||||
|
"Transient menu for interfacing with the system via system-packages and restart."
|
||||||
|
["Emacs system actions" ("R" "Restart" restart-emacs)]
|
||||||
|
["Package..." ("s" "Search" system-packages-search)
|
||||||
|
("u" "Update" system-packages-update)
|
||||||
|
("i" "Install" system-packages-install)
|
||||||
|
("r" "Uninstall" system-packages-uninstall)
|
||||||
|
("o" "Remove Orphans" system-packages-remove-orphaned)])
|
||||||
|
|
||||||
|
(define-key global-map (kbd "C-c o s") #'system-interactions-transient)
|
||||||
|
|
||||||
(provide 'terminal)
|
(provide 'terminal)
|
||||||
|
|
||||||
;;; terminal.el ends here
|
;;; terminal.el ends here
|
||||||
|
|
|
@ -252,7 +252,7 @@
|
||||||
("p" "Paragraph" mark-paragraph)
|
("p" "Paragraph" mark-paragraph)
|
||||||
("b" "Buffer" mark-whole-buffer)])
|
("b" "Buffer" mark-whole-buffer)])
|
||||||
|
|
||||||
(define-key org-mode-map (kbd "C-c o SPC") #'mark-menu-transient)
|
(define-key global-map (kbd "C-c o SPC") #'mark-menu-transient)
|
||||||
|
|
||||||
;; Section navigation and reordering
|
;; Section navigation and reordering
|
||||||
(defun move-sentence-right (&optional arg)
|
(defun move-sentence-right (&optional arg)
|
||||||
|
@ -322,7 +322,7 @@
|
||||||
["Move paragraph..." ("u" "Up" move-paragraph-up)
|
["Move paragraph..." ("u" "Up" move-paragraph-up)
|
||||||
("d" "Down" move-paragraph-down)])
|
("d" "Down" move-paragraph-down)])
|
||||||
|
|
||||||
(define-key org-mode-map (kbd "C-c o r") #'reorder-transient)
|
(define-key global-map (kbd "C-c o r") #'reorder-transient)
|
||||||
|
|
||||||
;; Focused rewriting
|
;; Focused rewriting
|
||||||
(defun break-out-sentence ()
|
(defun break-out-sentence ()
|
||||||
|
@ -350,7 +350,7 @@
|
||||||
(break-out-choose-sentence)
|
(break-out-choose-sentence)
|
||||||
(break-out-sentence)))
|
(break-out-sentence)))
|
||||||
|
|
||||||
(define-key org-mode-map (kbd "C-c o b") #'break-out-dwim)
|
(define-key global-map (kbd "C-c o b") #'break-out-dwim)
|
||||||
|
|
||||||
;; Powerthesaurus
|
;; Powerthesaurus
|
||||||
(use-package powerthesaurus
|
(use-package powerthesaurus
|
||||||
|
|
Loading…
Add table
Add a link
Reference in a new issue