From 7bd2e3db37c806f8e7a0afe8f214014337d41fcd Mon Sep 17 00:00:00 2001 From: Jeremy Baxter Date: Thu, 18 Jul 2024 20:06:51 +1200 Subject: [PATCH] esv.el: improve documentation --- esv.el | 9 ++++----- 1 file changed, 4 insertions(+), 5 deletions(-) diff --git a/esv.el b/esv.el index fbfa36f..fac77f5 100644 --- a/esv.el +++ b/esv.el @@ -64,20 +64,19 @@ (defun esv (book verses) "Fetch the Bible passage identified by BOOK and VERSES. -The result will be redirected to a buffer specified by `esv-buffer'." +The result will be redirected to a buffer specified by `esv-buffer'. + +Requires the esv command line tool to be in the system's PATH. +esv can be acquired at ." (interactive "MBook: \nMVerses: ") (let ((buffer (concat book " " verses))) (catch 'buffer-exists (when (get-buffer buffer) (message "Buffer `%s' already exists" buffer) (throw 'buffer-exists nil)) - ;; execute esv (call-process esv-program nil buffer t - ;; arguments (format "-l%d" esv-columns) book verses) - ;; display buffer in another window (display-buffer buffer) - ;; move point to the beginning of the buffer (with-current-buffer buffer (esv-mode) (goto-char (point-min)))