a lot...just a lot

This commit is contained in:
Chris Cochrun 2024-01-03 10:34:06 -06:00
parent 96f1027e62
commit 6534c2b145
8 changed files with 97 additions and 89 deletions

View file

@ -1,4 +1,5 @@
#!/usr/bin/env -S sbcl --script
;; -*-lisp-*-
(require "uiop")
(defparameter output
(with-output-to-string (out)
@ -29,4 +30,3 @@
(run-program "hyprctl" `("keyword" "misc:cursor_zoom_factor" ,(write-to-string decrement))
:search "/run/current-system/sw/bin/"
:output *standard-output*)))
;; -*-lisp-*-