4f28fbfd7d63

More
[view raw] [browse files]
author Steve Losh <steve@stevelosh.com>
date Tue, 09 Apr 2024 09:20:04 -0400
parents 2c74f844352e
children 4e1d6d6873fe
branches/tags (none)
files bin/cvs bin/t. bin/tvs lispwords remote/bin/cvs remote/bin/tvs stumpwm/applications.lisp stumpwm/key-mapping.lisp stumpwm/terminal-fonts.lisp vim/custom-dictionary.utf-8.add

Changes

--- /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