-----BEGIN PGP SIGNED MESSAGE-----
Hash: SHA1
- -----BEGIN PGP SIGNED MESSAGE-----
Hash: SHA1
Hi,
On Tue, 6 May 2014 18:11:15 +0200
wrote fuchur <[email protected]>:
Patch 13-tab-tiler-add.patch:
Changes:
If the cabinet interface larger as the screen height, display the top
from cabinet not outside from the screen.
Apply the patch after all other patches from this thread.
- - --
Regards,
Fuchur
GPG Fingerprint: CA3B 8204 5B3E 6D48 6D53 C116 E5BC 70D5 B8D7 B2B0
- -----BEGIN PGP SIGNATURE-----
Version: GnuPG v2.0.22 (GNU/Linux)
iEYEARECAAYFAlNqVt8ACgkQ5bxw1bjXsrDB9gCfaeI32O6xs+lxRb5Td1WdAYA0
KjUAoIUDU+JZu8nBYrUEjFPBhwoTfR6o
=a7le
- -----END PGP SIGNATURE-----
-----BEGIN PGP SIGNATURE-----
Version: GnuPG v2.0.22 (GNU/Linux)
iEYEARECAAYFAlNqV30ACgkQ5bxw1bjXsrAfwgCfb5+GmKaKlgjP5mSwbWIOEcdx
W5EAn0hyTM8cUjL8gnspbiNhzesVusjk
=kzQF
-----END PGP SIGNATURE-----
diff -urNad sawfish.orgi/lisp/sawfish/wm/ext/cabinet.jl sawfish/lisp/sawfish/wm/ext/cabinet.jl
--- sawfish.orgi/lisp/sawfish/wm/ext/cabinet.jl
+++ sawfish/lisp/sawfish/wm/ext/cabinet.jl
@@ -502,9 +502,11 @@
(- (quotient (car (head-dimensions head)) 2)
(quotient wx 2)))
.
- ,(+ (cdr (head-offset head))
- (- (quotient (cdr (head-dimensions head)) 2)
- (quotient wy 2))))
+ ,(if (> (cdr win-size) (cdr (head-dimensions head)))
+ '0
+ (+ (cdr (head-offset head))
+ (- (quotient (cdr (head-dimensions head)) 2)
+ (quotient wy 2)))))
win-size
1
`((background . ,cabinet:background))
