--- a/stumpwmrc Wed Aug 23 11:13:20 2023 -0400
+++ b/stumpwmrc Wed Aug 30 11:48:48 2023 -0400
@@ -241,10 +241,10 @@
(local-time:find-timezone-by-location-name "US/Eastern"))
(defparameter *budget/start*
- (local-time:encode-timestamp 0 0 0 0 21 5 2023 :timezone *tz/eastern*))
+ (local-time:encode-timestamp 0 0 0 0 27 8 2023 :timezone *tz/eastern*))
(defun budget/per-day ()
- (first (losh:read-all-from-file "/home/sjl/Dropbox/budget/per-day")))
+ (first (losh:read-all-from-file "/home/sjl/Sync/budget/per-day")))
(defun budget/elapsed ()
(local-time:timestamp-difference (local-time:now) *budget/start*))
@@ -256,7 +256,7 @@
(* (budget/days-elapsed) (budget/per-day)))
(defun budget/out ()
- (loop :for path :in (directory "/home/sjl/Dropbox/budget/hosts/*/total")
+ (loop :for path :in (directory "/home/sjl/Sync/budget/hosts/*/total")
:summing (print (first (read-all-from-file (print path))))))
(defun budget/current ()
@@ -264,7 +264,7 @@
(defcommand budget-dump () ()
(message
- (sh '("sh" "-c" "tail -n 5 /home/sjl/Dropbox/budget/hosts/*/records")
+ (sh '("sh" "-c" "tail -n 5 /home/sjl/Sync/budget/hosts/*/records")
:result-type 'string)))
(defcommand budget () ()
@@ -272,7 +272,7 @@
(defmacro with-budget-file ((f file &rest open-args) &body body)
`(with-open-file
- (,f (format nil "/home/sjl/Dropbox/budget/hosts/~(~A~)/~A" *host* ,file)
+ (,f (format nil "/home/sjl/Sync/budget/hosts/~(~A~)/~A" *host* ,file)
,@open-args)
,@body))
--- a/vim/custom-dictionary.utf-8.add Wed Aug 23 11:13:20 2023 -0400
+++ b/vim/custom-dictionary.utf-8.add Wed Aug 30 11:48:48 2023 -0400
@@ -335,3 +335,4 @@
memoized
skald
dwarven
+tradeoff