manr: fix
[copyleftie-scripts.git] / bartext
blobe28f58a927727230b372560086032aa16418e335
1 #!/bin/execlineb -WP
3 backtick -i rootwin { lsw -r }
4 importas -u rootwin rootwin
5 importas USER USER
7 loopwhilex
8         s6-sleep 2
9         pipeline {
10                 foreground { echo -n %{c} }
11                 foreground {
12                         pipeline { wonf wname
13                         } sed s|/home/${USER}|~|
14                 }
15                 foreground { echo -n %{r} }
16                 wname ${rootwin}
17         } ssam "x/\\n./ x/\\n/ d"