From a63c96cb421d1917ca0a68fd46897a235ccdf2c2 Mon Sep 17 00:00:00 2001
From: MitchMarq42 <dr.m.perseos@gmail.com>
Date: Tue, 13 Dec 2022 16:35:15 -0900
Subject: [PATCH] App launcher (again)

---
 lisp/mitch-packages.el | 22 ++++++++++++++++++++++
 1 file changed, 22 insertions(+)

diff --git a/lisp/mitch-packages.el b/lisp/mitch-packages.el
index 3c54c9a..4fd1eea 100644
--- a/lisp/mitch-packages.el
+++ b/lisp/mitch-packages.el
@@ -261,6 +261,28 @@ see  https://www.reddit.com/r/emacs/comments/xq6rpa/comment/iqynyu9/?utm_source=
     :after vertico
     :config
     (vertico-mouse-mode)))
+(elpaca-use-package (app-launcher
+		     :host github :repo "SebastienWae/app-launcher")
+  :after vertico
+  :config
+  ;; modified from https://www.reddit.com/r/unixporn/comments/s7p7pr/so_which_run_launcher_do_you_use_rofi_or_dmenu/
+  (defun emacs-run-launcher ()
+    "Create and select a frame called emacs-run-launcher which
+consists only of a minibuffer and has specific dimensions.  Run
+counsel-linux-app on that frame, which is an Emacs command that
+prompts you to select an app and open it in a dmenu like
+behaviour.  Delete the frame after that command has exited"
+    (interactive)
+    (with-selected-frame
+	(make-frame '(;; see ~/.config/sway/config
+		      (name . "dentarthurdent")
+		      (minibuffer . only)
+		      (width . 120)
+		      (height . 11)))
+      (unwind-protect
+	  (app-launcher-run-app)
+	(delete-frame)))))
+
 (elpaca-use-package consult
   :after vertico
   :general