ref: 9364ce451d5ed81f8b05cf69c2e7c366aae193e2
parent: aa1d22a51cd316e4d8aa1565f44122d1fcc28525
author: qwx <qwx@sciops.net>
date: Wed Jan 7 05:48:11 EST 2026
work/proj: don't use small font on large screens
--- a/bin/work/proj
+++ b/bin/work/proj
@@ -10,10 +10,11 @@
unmount /mnt/plumb
plumber -s plumb.$pid
+w=$screensize(1)
cat <<! >/tmp/work.$pid
#!/bin/rc
label proj
-echo -n /lib/font/bit/terminus/unicode.12m.font >/env/font
+test $w -le 1920 && echo -n /lib/font/bit/terminus/unicode.12m.font >/env/font
echo 4 >/env/tabstop
window -r $bcmdrect -scroll
#window -r 530 270 1401 1175 mothra #https://ocaml.org/learn/tutorials/
--
⑨