Re: [wmii] Ctl commands and geometry change

On Mon, Apr 30, 2007 at 02:21:44PM +0300, Eugine Kosenko wrote:
> 2007/4/30, Kris Maglione <bsdaemon_AT_comcast.net>:
>> I used to have a script to do the same. M-g toggled gkrellm to/from the
>> current view, moved it to the far right, and resized its column, but I
>> never really used it.
>
> Can you send me the script? I understand its logic (exclude the
> resizing actions :-( ) and may write it myself (it's may be a
> solution, thanks), but it is always better to have a ready solution.

This is rather dated. It definately won't work with recent versions. And
it's probably unduly long.

fn toggle_client {
        name=$1
        file=$2
        done=''
        if(~ $file '')
                file=class
        clients=`{wmiir ls /client | grep '^[0-9]+/$'}
        view=`{wmiir read /tag/sel/name}
        for(i in $clients) {
                if(~ $done '' && wmiir read /client/$i^/$file | grep -s $name) {
                        tags=`{wmiir read /client/$i^/tags}
                        if(echo $tags | grep -s '(^|\+)'$view'(\+|$)') {
                                newtags=`{del_tag $view $tags}
                                if(! ~ $newtags '')
                                        xwrite /client/$i^/tags $newtags
                        };if not {
                                newtags=`{add_tag $view $tags}
                                xwrite /client/$i^/tags $newtags
                                index=$i
                                if(! ~ $3 '')
                                        eval $3
                        }
                done=true
                }
        }
}

fn toggle_irssi {
        index=`{wmiir read /tag/sel/sel/index}
        if(! ~ $index 0) {
                last=`{wmiir ls /tag/sel | grep '[0-9]+/' | sed 's|/$||g' | tail -1}
                if(! ~ $last '') {
                        xwrite /tag/sel/sel/sel/ctl send $last
                        xwrite /tag/sel/sel/sel/ctl send next
                        xwrite /tag/sel/sel/sel/geom 819 0 461 1008
                }
        }
}

fn Key-$MODKEY-g {
        toggle_client Gkrellm class '
          *=`{wmiir read /tag/sel/sel/sel/geom}
          xwrite /tag/sel/sel/sel/geom `{hoc -e ''1281 - ''$3} 0 $3 $4'
}
fn Key-$MODKEY-i {
        toggle_client irssi name toggle_irssi
}

> Hm, I have the version 3.6-r3 in my Gentoo Linux distribution and
> 3.7-alt0.1 in my ALT Linux distribution. The effects I showed are on
> these versions. What are the ways you mentioned?

There have been no releases with 3.7 in the version. The 3.6-rc series
does not constitute the 3.6 release. The series has, in fact, been
broken in favor of further development before the release. You'll have
to wait for the functionality.

-- 
Kris Maglione
A prerequisite for a desired course will be offered
only during the semester following the desired course.