stumpwm-devel
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

Re: [STUMP] simple tiling


From: hessiess
Subject: Re: [STUMP] simple tiling
Date: Wed, 12 Aug 2009 21:37:24 -0000 (UTC)
User-agent: SquirrelMail/1.4.17

>
> hi,
>
> i just switched to stumpwm from xmonad and wanted something similar to
> the latter's Tall layout, i.e., a group where there's an horizontal
> split with one window on the left and the rest vertically stacked in the
> right (which is split vertically as many times as needed). for instance,
> with 4 windows:
>
>    -------------------------------
>    |             |               |
>    |             |---------------|
>    |             |               |
>    |             |---------------|
>    |             |               |
>    -------------------------------
>
> so i wrote this command:
>
>   (defun jao-tile-group (group)
>     (let* ((tlen (length (group-windows group)))
>            (len (1- tlen)))
>       (unless (zerop tlen)
>         (call-interactively "only")
>         (unless (current-window)
>           (focus-next-window group)))
>       (unless (zerop len)
>         (split-frame group :column)
>         (focus-next-frame group)
>         (dotimes (n (1- len))
>           (split-frame group :row (/ (- len n)))
>           (focus-next-frame group))
>         (focus-next-frame group))))
>
>   (defcommand (tile tile-group) () ()
>     (jao-tile-group (current-group)))
>
> and a bit of code to auto-tile registered groups everytime a new window
> is added:
>
>   (defvar *jao-autotiling-groups* '("doc"))
>
>   (defun jao-autotile-hook (&optional window)
>     (when (member (group-name (current-group)) *jao-autotiling-groups*
> :test #'equalp)
>       (jao-tile-group (current-group))))
>
>   (add-hook *new-window-hook* #'jao-autotile-hook)
>   (add-hook *unmap-window-hook* #'jao-autotile-hook)
>
> all of which works fine (except for the fact that the hooks in
> *unmap-window-hook* are not being called, unless i'm missing something).
>
> this being my very first hack in stumpwm, i suspect it offers ample room
> for improvement, and that's the main reason i'm posting it: i'd greatly
> appreciate your comments on any of the silly or unstumpy things i'm
> doing above.
>
> thanks!
> jao
> --
> A language that doesn't affect the way you think about programming, is
> not worth knowing.
>   - Alan Perlis, Epigrams in Programing
>
>
>
> _______________________________________________
> Stumpwm-devel mailing list
> address@hidden
> http://lists.nongnu.org/mailman/listinfo/stumpwm-devel
>

Thanks for this, the lack of auto tiling in stumpwm made me go back to
Xmonad again, now I may switch back to stumpwm.






reply via email to

[Prev in Thread] Current Thread [Next in Thread]