From 8a50b883d8e24179618a4f155fab02c60995de36 Mon Sep 17 00:00:00 2001
From: Tom Willemse
Date: Thu, 13 Feb 2025 22:22:18 -0800
Subject: pop-os: Add application launcher menu for stumpwm

---
 oni/home/services/stumpwm/pop-os-config.lisp | 8 ++++++++
 1 file changed, 8 insertions(+)
 create mode 100644 oni/home/services/stumpwm/pop-os-config.lisp

(limited to 'oni/home/services')

diff --git a/oni/home/services/stumpwm/pop-os-config.lisp b/oni/home/services/stumpwm/pop-os-config.lisp
new file mode 100644
index 0000000..950a370
--- /dev/null
+++ b/oni/home/services/stumpwm/pop-os-config.lisp
@@ -0,0 +1,8 @@
+(defvar *application-bindings*
+  (let ((m (make-sparse-keymap)))
+    (define-key m (kbd "b") "exec gtk-launch app.zen_browser.zen")
+    (define-key m (kbd "s") "exec gtk-launch com.slack.Slack")
+    (define-key m (kbd "t") "exec gtk-launch org.wezfurlong.wezterm")
+    m))
+
+(define-key *top-map* (kbd "s-a") '*application-bindings*)
-- 
cgit v1.3-2-g0d8e