about summary refs log tree commit diff
path: root/users/wpcarro/emacs/pkgs/vterm-mgt/vterm-mgt.el
diff options
context:
space:
mode:
Diffstat (limited to 'users/wpcarro/emacs/pkgs/vterm-mgt/vterm-mgt.el')
-rw-r--r--users/wpcarro/emacs/pkgs/vterm-mgt/vterm-mgt.el13
1 files changed, 5 insertions, 8 deletions
diff --git a/users/wpcarro/emacs/pkgs/vterm-mgt/vterm-mgt.el b/users/wpcarro/emacs/pkgs/vterm-mgt/vterm-mgt.el
index 29c24d89ec9c..fe161fc6fbff 100644
--- a/users/wpcarro/emacs/pkgs/vterm-mgt/vterm-mgt.el
+++ b/users/wpcarro/emacs/pkgs/vterm-mgt/vterm-mgt.el
@@ -22,16 +22,17 @@
 ;; Dependencies
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 
-(require 'dash)
 (require 'cycle)
 (require 'vterm)
+(require 'seq)
 
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 ;; Configuration
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 
 (defgroup vterm-mgt nil
-  "Customization options for `vterm-mgt'.")
+  "Customization options for `vterm-mgt'."
+  :group 'vterm)
 
 (defcustom vterm-mgt-scroll-on-focus nil
   "When t, call `end-of-buffer' after focusing a vterm instance."
@@ -124,9 +125,7 @@ If for whatever reason, the state of `vterm-mgt--instances' is corrupted and
   restore the state."
   (interactive)
   (setq vterm-mgt--instances
-        (->> (buffer-list)
-             (-filter #'vterm-mgt--instance?)
-             cycle-from-list)))
+        (cycle-from-list (seq-filter #'vterm-mgt--instance? (buffer-list)))))
 
 (defun vterm-mgt-select ()
   "Select a vterm instance by name from the list in `vterm-mgt--instances'."
@@ -134,9 +133,7 @@ If for whatever reason, the state of `vterm-mgt--instances' is corrupted and
   (vterm-mgt-reconcile-state)
   (switch-to-buffer
    (completing-read "Switch to vterm: "
-                    (->> vterm-mgt--instances
-                         cycle-to-list
-                         (-map #'buffer-name)))))
+                    (seq-map #'buffer-name (cycle-to-list vterm-mgt--instances)))))
 
 (provide 'vterm-mgt)
 ;;; vterm-mgt.el ends here