about summary refs log tree commit diff
diff options
context:
space:
mode:
-rw-r--r--users/wpcarro/emacs/pkgs/vterm-mgt/default.nix33
-rw-r--r--users/wpcarro/emacs/pkgs/vterm-mgt/vterm-mgt.el13
2 files changed, 22 insertions, 24 deletions
diff --git a/users/wpcarro/emacs/pkgs/vterm-mgt/default.nix b/users/wpcarro/emacs/pkgs/vterm-mgt/default.nix
index c97e54e719a2..88eb5502042a 100644
--- a/users/wpcarro/emacs/pkgs/vterm-mgt/default.nix
+++ b/users/wpcarro/emacs/pkgs/vterm-mgt/default.nix
@@ -1,18 +1,19 @@
 { pkgs, depot, ... }:
 
-pkgs.callPackage
-  ({ emacsPackages }:
-  emacsPackages.trivialBuild {
-    pname = "vterm-mgt";
-    version = "1.0.0";
-    src = ./vterm-mgt.el;
-    packageRequires =
-      (with emacsPackages; [
-        dash
-        vterm
-      ]) ++
-      (with depot.users.wpcarro.emacs.pkgs; [
-        cycle
-      ]);
-  })
-{ }
+pkgs.emacsPackages.trivialBuild {
+  pname = "vterm-mgt";
+  version = "1.0.0";
+  src = ./vterm-mgt.el;
+  packageRequires =
+    (with pkgs.emacsPackages; [
+      vterm
+    ]) ++
+    (with depot.users.wpcarro.emacs.pkgs; [
+      cycle
+    ]);
+  passthru.meta.ci.extraSteps.github = depot.tools.releases.filteredGitPush {
+    filter = ":/users/wpcarro/emacs/pkgs/vterm-mgt";
+    remote = "git@github.com:wpcarro/vterm-mgt.el.git";
+    ref = "refs/heads/canon";
+  };
+}
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