From cd69c9af55f4349221a4ac93c1ba0115f894776a Mon Sep 17 00:00:00 2001 From: bth Date: Mon, 1 Jul 2024 11:19:54 -0700 Subject: [PATCH] another hack to get ~/x/notes/z/ to be more usable: add string descriptor --- elisp/um.el | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/elisp/um.el b/elisp/um.el index 15e1977..56dc333 100644 --- a/elisp/um.el +++ b/elisp/um.el @@ -205,14 +205,14 @@ NOTE: this searches in the current project root only. ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;; shell integration -(defun um-next-file-shell (dir &optional header) +(defun um-next-file-shell (dir &optional descriptor header) "Calls um next in the provided dir. With the option not to leave behind the um-journal-header. " (let ((default-directory dir)) ;; https://emacs.stackexchange.com/a/19878 - (eval (car (read-from-string (shell-command-to-string "export UMNEXTECHO=true; um next")))) + (eval (car (read-from-string (shell-command-to-string (concat "export UMNEXTECHO=true; um next" descriptor))))) ;; HACK: so that the um-journal-header doesn't ;; leave the file modified. (unless header