From b21ecce6645fc17c520b722de3d96e550c77c490 Mon Sep 17 00:00:00 2001 From: LLLL Colonq Date: Thu, 13 Mar 2025 21:30:13 -0400 Subject: Update --- src/wasp-utils.el | 6 +++++- 1 file changed, 5 insertions(+), 1 deletion(-) (limited to 'src/wasp-utils.el') diff --git a/src/wasp-utils.el b/src/wasp-utils.el index 31a17996..54cc3cae 100644 --- a/src/wasp-utils.el +++ b/src/wasp-utils.el @@ -98,6 +98,10 @@ Optionally append EXT to the path." "Write DATA to PATH." (f-write-text data 'utf-8 path)) +(defun w/unix-time () + "Return the current Unix timestamp." + (float-time (current-time))) + (defun w/daily-log-path () "Return the path to today's daily log file." (format-time-string "~/logs/log-%Y-%m-%d.txt" (current-time))) @@ -140,7 +144,7 @@ Optionally append EXT to the path." (defun w/devour (start end) "Delete and return the region from START to END." - (w/write-log (format "devouring: %s %s %s" start end (buffer-string))) + ;; (w/write-log (format "devouring: %s %s %s" start end (buffer-string))) (let ((ret (decode-coding-string (buffer-substring start end) 'utf-8))) (delete-region start end) ret)) -- cgit v1.2.3