--- /dev/null Thu Jan 01 00:00:00 1970 +0000
+++ b/bin/cvs Tue Apr 09 09:20:04 2024 -0400
@@ -0,0 +1,5 @@
+#!/usr/bin/env bash
+
+set -euo pipefail
+
+csvconcat "$@" | cv
--- /dev/null Thu Jan 01 00:00:00 1970 +0000
+++ b/bin/t. Tue Apr 09 09:20:04 2024 -0400
@@ -0,0 +1,5 @@
+#!/usr/bin/env bash
+
+set -euo pipefail
+
+stumpish terminal-in "$(pwd)"
--- /dev/null Thu Jan 01 00:00:00 1970 +0000
+++ b/bin/tvs Tue Apr 09 09:20:04 2024 -0400
@@ -0,0 +1,5 @@
+#!/usr/bin/env bash
+
+set -euo pipefail
+
+csvconcat "$@" | tv
--- a/lispwords Fri Mar 29 16:16:57 2024 -0400
+++ b/lispwords Tue Apr 09 09:20:04 2024 -0400
@@ -148,3 +148,6 @@
; parsnip
(1 let!)
+
+; sqlite
+(1 execute-non-query execute-script execute-to-list execute-single)
--- /dev/null Thu Jan 01 00:00:00 1970 +0000
+++ b/remote/bin/cvs Tue Apr 09 09:20:04 2024 -0400
@@ -0,0 +1,1 @@
+../../bin/cvs
\ No newline at end of file
--- /dev/null Thu Jan 01 00:00:00 1970 +0000
+++ b/remote/bin/tvs Tue Apr 09 09:20:04 2024 -0400
@@ -0,0 +1,1 @@
+../../bin/tvs
\ No newline at end of file
--- a/stumpwm/applications.lisp Fri Mar 29 16:16:57 2024 -0400
+++ b/stumpwm/applications.lisp Tue Apr 09 09:20:04 2024 -0400
@@ -15,6 +15,11 @@
(defcommand terminal () ()
(run-shell-command (format nil "st -f 'Ubuntu Mono:size=~D'" *terminal-font-size*)))
+(defcommand terminal-in (path) ((:string "Working directory: "))
+ (run-shell-command
+ (format nil "st -f 'Ubuntu Mono:size=~D' env -C '~A' fish" ; todo actually escape this
+ *terminal-font-size* path)))
+
(defcommand terminal-apl () ()
(run-shell-command "st -f 'BQN386 Unicode:style=Regular:size=12'"))
--- a/stumpwm/key-mapping.lisp Fri Mar 29 16:16:57 2024 -0400
+++ b/stumpwm/key-mapping.lisp Tue Apr 09 09:20:04 2024 -0400
@@ -24,7 +24,7 @@
("H-M" "mark")
("H-SunPageUp" "st-font-up")
("H-SunPageDown" "st-font-down")
- ("H-Home" "st-font-reset")
+ ("H-0" "fullscreen")
("H-F4" "switch-yubikeys")
("H-\\" "pass-personal")
("H-|" "generate-password")
@@ -164,21 +164,21 @@
;;; The G A M E R M O U S E:
;;;
-;;; +----------+----------+----------+ _______
-;;; | | ^ | | / \ +--------+
-;;; | | | | | | | | |
-;;; | | move | | group | | group | |
-;;; +----------+----------+----------+ <----- | | -----> | |
-;;; | | | | | | | |
-;;; | move | | move | | | | |
-;;; | <-- | | --> | \_______/ | kill |
+;;; +----------+----------+----------+ _____
+;;; | | ^ | | / \ +--------+
+;;; | | | | | | | | |
+;;; | | move | | group | | group | |
+;;; +----------+----------+----------+ <----- | | -----> | |
+;;; | | | | | | | |
+;;; | move | | move | | | | |
+;;; | <-- | | --> | \_____/ | kill |
;;; +----------+----------+----------+ | |
;;; | | move | | | |
;;; | | | | | +---------+ | |
;;; | | v | | | | | |
;;; +----------+----------+----------+ | next | | |
-;;; | split | split | | | | +--------+
-;;; | [|] | [-] | | +---------+
+;;; | split | split | FULL | | | +--------+
+;;; | [|] | [-] | SCREEN | +---------+
;;; | | | | | |
;;; +----------+----------+----------+ | prev |
;;; | |
@@ -194,7 +194,8 @@
("s-End" "prev-in-frame")
("s-)" "sane-hsplit")
("s-_" "sane-vsplit")
- ("s-Delete" "remove"))
+ ("s-Delete" "remove")
+ ("s-+" "fullscreen"))
;; (stumpwm::unbind-remapped-keys)
--- a/stumpwm/terminal-fonts.lisp Fri Mar 29 16:16:57 2024 -0400
+++ b/stumpwm/terminal-fonts.lisp Tue Apr 09 09:20:04 2024 -0400
@@ -33,3 +33,4 @@
((:integer "Size: "))
(setf *terminal-font-size* size))
+
--- a/vim/custom-dictionary.utf-8.add Fri Mar 29 16:16:57 2024 -0400
+++ b/vim/custom-dictionary.utf-8.add Tue Apr 09 09:20:04 2024 -0400
@@ -434,3 +434,4 @@
H3K27M
polycomb
Cristian
+DBvolve