small change to wmiirc

This commit is contained in:
Anselm R. Garbe 2006-02-10 16:10:21 +01:00
parent 541149a008
commit c331ae7a51

View File

@ -73,9 +73,10 @@ extern xterm -rv&
status &
wmiir read /event | \
while(key=`{read}) {
xwrite /bar/2/data $key
switch($key) {
while(event=`{read}) {
xwrite /bar/2/data $"event
if(~ $event(1) K) { # key press
switch($event(2)) {
case $MODKEY-Control-c
xwrite /sel/sel/sel/ctl kill
case $MODKEY-Control-w,y
@ -119,4 +120,5 @@ while(key=`{read}) {
case $MODKEY-Shift-[1-9]
xwrite /ctl 'select '^`{echo $k|sed 's/.*-//g'}
}
}
}