Force add window as tab patch
fuchur <[email protected]>
| Newsgroups | gmane.comp.window-managers.sawfish |
|---|---|
| Organization | W.W |
| Message-ID | <[email protected]> |
Hi, We can only add a window as tab if '_NET_WM_WINDOW_TYPE is '_NET_WM_WINDOW_TYPE_NORMAL. But not all windows having '_NET_WM_WINDOW_TYPE like Eterm, aterm ... With this patch you can force to set a window as tab also is '_NET_WM_WINDOW_TYPE nil or not equal '_NET_WM_WINDOW_TYPE_NORMAL -- Regards, Fuchur GPG Fingerprint: CA3B 8204 5B3E 6D48 6D53 C116 E5BC 70D5 B8D7 B2B0
Bildschirmfoto-Fenster-Regel-Eigenschaften.png
(image/png, 68 KB) - not displayed
forc-tab.patch
(text/x-patch, 1.3 KB)
diff -urNad lisp.orgi/sawfish/wm/ext/match-window.jl lisp/sawfish/wm/ext/match-window.jl
--- lisp.orgi/sawfish/wm/ext/match-window.jl 2012-11-10 19:00:52.000000000 +0100
+++ lisp/sawfish/wm/ext/match-window.jl 2012-11-10 19:18:22.000000000 +0100
@@ -112,6 +112,7 @@
(group ,(lambda ()
`(symbol ,@(delete-if-not symbolp (window-group-ids)))))
(tab-group string)
+ (force-tab boolean)
(ungrouped boolean)
(cycle-skip boolean)
(window-list-skip boolean)
diff -urNad lisp.orgi/sawfish/wm/tabs/tabgroup.jl lisp/sawfish/wm/tabs/tabgroup.jl
--- lisp.orgi/sawfish/wm/tabs/tabgroup.jl 2012-11-10 19:00:53.000000000 +0100
+++ lisp/sawfish/wm/tabs/tabgroup.jl 2012-11-10 19:15:27.000000000 +0100
@@ -74,8 +74,9 @@
(eq (window-get w 'current-frame-style) tab-theme-name))
(define (net-wm-window-type-normal-p w)
- (if (get-x-property w '_NET_WM_WINDOW_TYPE)
- (equal (aref (nth 2 (get-x-property w '_NET_WM_WINDOW_TYPE)) 0) '_NET_WM_WINDOW_TYPE_NORMAL)))
+ (or (window-get w 'force-tab)
+ (if (get-x-property w '_NET_WM_WINDOW_TYPE)
+ (equal (aref (nth 2 (get-x-property w '_NET_WM_WINDOW_TYPE)) 0) '_NET_WM_WINDOW_TYPE_NORMAL))))
(define-record-type :tab-group
(tab-build-group p d wl)
signature.asc
(application/pgp-signature, 198 B)
-----BEGIN PGP SIGNATURE----- Version: GnuPG v2.0.19 (GNU/Linux) iEYEARECAAYFAlCeoUAACgkQ5bxw1bjXsrACOwCcC62y55lP4l3XXXlDJma9nxKw +QYAmQEvJwsL/3+yL8tpkb7IVPVJxh7Q =M6tI -----END PGP SIGNATURE-----