branch: externals/detached
commit ee0821fd9799ec4c89ad65d34b8bed10728d74d9
Author: Niklas Eklund <niklas.ekl...@posteo.net>
Commit: Niklas Eklund <niklas.ekl...@posteo.net>
Move detached initialization to function
Create a separate function for init of detached.
---
detached-init.el | 17 +++++++++--------
1 file changed, 9 insertions(+), 8 deletions(-)
diff --git a/detached-init.el b/detached-init.el
index 2922eac190..aa1c3af760 100644
--- a/detached-init.el
+++ b/detached-init.el
@@ -106,14 +106,7 @@
;;;###autoload
(defun detached-init ()
"Initialize `detached' integration with all packages."
-
- ;; Trigger initialization of sessions upon load of `detached'
- (with-eval-after-load 'detached
- (detached-initialize-sessions))
-
- ;; Required for `detached-shell-command' which is always provided
- (add-hook 'shell-mode-hook #'detached-shell-mode)
-
+ (detached-init--detached)
(let ((init-functions
(thread-last detached-init--package-integration
(seq-filter (lambda (it)
@@ -171,6 +164,14 @@
(defvar embark-detached-map (make-composed-keymap detached-action-map
embark-general-map))
(add-to-list 'embark-keymap-alist '(detached . embark-detached-map))))
+(defun detached-init--detached ()
+ "Initialize `detached'."
+ ;; Trigger initialization of sessions upon load of `detached'
+ (with-eval-after-load 'detached
+ (detached-initialize-sessions))
+ ;; Required for `detached-shell-command' which is always provided
+ (add-hook 'shell-mode-hook #'detached-shell-mode))
+
(provide 'detached-init)
;;; detached-init.el ends here
