From ee5957e0322d02147be0be4dba079df30a09f6a5 Mon Sep 17 00:00:00 2001
From: Tom Willemse
Date: Wed, 8 Jul 2026 01:34:58 -0700
Subject: hammerspoon: Update debugging info method

---
 hammerspoon/.hammerspoon/init.fnl | 7 ++++---
 1 file changed, 4 insertions(+), 3 deletions(-)

(limited to 'hammerspoon')

diff --git a/hammerspoon/.hammerspoon/init.fnl b/hammerspoon/.hammerspoon/init.fnl
index 15640c5..0f7b2ee 100644
--- a/hammerspoon/.hammerspoon/init.fnl
+++ b/hammerspoon/.hammerspoon/init.fnl
@@ -1,10 +1,11 @@
-(fn show-window-title []
+(fn show-window-information []
   (let [window (hs.window.focusedWindow)]
     (if (= window nil)
         (hs.alert.show "no window")
-        (hs.alert.show (: (hs.window.focusedWindow) :title)))))
+        (hs.alert.show (.. "Title: " (window:title) "\n"
+                           "Application: " (: (window:application) :name))))))
 
-(hs.hotkey.bind ["cmd" "alt" "ctrl"] "e" show-window-title)
+(hs.hotkey.bind ["cmd" "alt" "ctrl"] "e" show-window-information)
 (hs.hotkey.bind ["cmd" "shift"] "r" hs.reload)
 
 ;;; Layout -- Automatically put windows in their place.
-- 
cgit v1.3-2-g0d8e