ref: b2782a107c082bdaae5846532c3deab074c17034
parent: 70e1bcae95cbc99a80e7c5d2c7685939c6b2dd6f
author: qwx <qwx@sciops.net>
date: Sat Apr 9 20:21:09 EDT 2022
k: let workspaces name themselves
--- a/bin/k
+++ b/bin/k
@@ -6,6 +6,3 @@
. /tmp/sizes.$sysname
x=/bin/work/$1
window -hide -r $briorect $x
-sleep 2
-last=`{cd /dev/wsys; ls | sort -n | tail -1}
-echo -n `{basename $x} >/dev/wsys/$last/label
--- a/bin/work/ger
+++ b/bin/work/ger
@@ -10,6 +10,7 @@
cd $home/p/sm2/ger
cat <<! >/tmp/work.$pid
#!/bin/rc
+label ger
#window 'netsurf https://www.dw.com/de/themen/wissen-umwelt/s-12296'
window -r $zukerect page /lib/books/german/AFoundationCourseInReadingGerman.pdf
window -r $bcmdrect -scroll
--- a/bin/work/monitoring
+++ b/bin/work/monitoring
@@ -8,6 +8,7 @@
cat <<! >/tmp/work.$pid
#!/bin/rc
+label monitoring
window -r $ffvncrect v kekw
window -r $duckrect tx hsw
#window -r $cmdrect tx t30
--- a/bin/work/music
+++ b/bin/work/music
@@ -10,6 +10,7 @@
cat <<! >/tmp/work.$pid
#!/bin/rc
+label music
window -r $volrect volume
window -r $bcmdrect -scroll
window -scroll -r $zukerect 'label zuke; rc'
--- a/bin/work/proj
+++ b/bin/work/proj
@@ -12,6 +12,7 @@
cat <<! >/tmp/work.$pid
#!/bin/rc
+label proj
window -r $bcmdrect -scroll
#window -r 530 270 1401 1175 mothra #https://ocaml.org/learn/tutorials/
#plumb /lib/books/doomrpg/decoding.doomrpg.pdf!8
--- a/bin/work/social
+++ b/bin/work/social
@@ -7,6 +7,7 @@
cat <<! >/tmp/work.$pid
#!/bin/rc
+label social
#window -r $mailrect mw
window -r $vncrect v t60p
!
--- a/bin/work/stream
+++ b/bin/work/stream
@@ -12,6 +12,7 @@
cat <<! >/tmp/work.$pid
#!/bin/rc
+label stream
window -r $bcmdrect -scroll
#window -r $duckrect mothra
#plumb /lib/books/doomrpg/decoding.doomrpg.pdf!8
--- a/bin/work/work
+++ /dev/null
@@ -1,32 +1,0 @@
-#!/bin/rc
-rfork ne
-
-. /tmp/sizes.$sysname
-m=t490sw
-w=tcp!$m!17060
-root=/n/ssh
-wdir=$root/p/tsfs/software
-
-sshfs $w || exit
-cd $wdir
-unmount /mnt/plumb
-plumbsrv=()
-plumber -s plumb.$pid
-f=(`{walk src | grep \.rs} ../../^(rs.notes todo))
-
-cat <<! >/tmp/work.$pid
-#!/bin/rc
-#window -r $bcmdrect -scroll
-#window -r $bsamrect 'echo 4 >/env/tabstop; jam -i $f'
-#window -r $duckrect tx $m
-window -r $bsamrect jam $f
-window -r 554 742 1194 -scroll
-window -r 4 4 783 1178 tx $m
-!
-chmod +x /tmp/work.$pid
-bof -i /tmp/work.$pid
-rm /tmp/work.$pid
-
-unmount /n/ssh
-unmount /mnt/plumb
-rm /srv/plumb.$pid