x11-wm/stumpwm.stumpwm-contrib
1
0
Fork 0
mirror of https://github.com/stumpwm/stumpwm-contrib.git synced 2026-09-10 07:26:25 -04:00
Code Issues Actions Packages Projects Releases Wiki Activity

Fix raise-tag when there are no groups.

Browse source
This commit is contained in:
Phil Hudson 2024-08-08 17:48:28 +01:00
parent 042a9fcb05
commit a3afdd36b5
1 changed files with 5 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

7
util/windowtags/windowtags.lisp
View file

@ -182,8 +182,11 @@
((window (car (select-by-tags tag))))
(if window
(progn
(move-windows-to-group (list window))
(really-raise-window window)
(if (groups)
(progn
(move-windows-to-group (list window))
(really-raise-window window))
(raise-window window))
window)
nil)))