diff options
| author |  Tom Willemse | 2026-07-08 01:34:58 -0700 |
|---|---|---|
| committer | Tom Willemse | 2026-07-08 01:34:58 -0700 |
| commit | d9dee177b678ff2f13dc3536e56665cc5a4357b5 (patch) | |
| tree | 8ab43ffbc676f89f9c7b29a4d62659ad2e0d933a /hammerspoon | |
| parent | 4f8e08dd7cfec3bcfe6ebf33483a992e2cb2e291 (diff) | |
| download | new-dotfiles-d9dee177b678ff2f13dc3536e56665cc5a4357b5.tar.gz new-dotfiles-d9dee177b678ff2f13dc3536e56665cc5a4357b5.zip | |
hammerspoon: Update debugging info method
Diffstat (limited to 'hammerspoon')
| -rw-r--r-- | hammerspoon/.hammerspoon/init.fnl | 7 |
1 files changed, 4 insertions, 3 deletions
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. |