aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorKyle Meyer <kyle@kyleam.com>2021-06-05 17:14:02 -0400
committerKyle Meyer <kyle@kyleam.com>2021-06-07 00:12:07 -0400
commitba2089e26e4964361b258de66ad9198624ffbf1e (patch)
tree328437de34c7f6c1236f2291213773672a9516e1
parent52ece47dd7a490e9f30d9e4d85a0bddce44eb35e (diff)
downloadpiem-ba2089e26e4964361b258de66ad9198624ffbf1e.tar.gz
piem-lei-query-thread: Use piem-lei-get-mid to get message ID
piem-lei-query-thread uses piem-lei-query-get-mid to get the message ID for interactive calls. Switch to piem-lei-get-mid, which uses piem-lei-query-get-mid underneath, so that the message ID can also be extracted from piem-lei-show-mode buffers. Message-Id: <20210605211402.20304-19-kyle@kyleam.com>
-rw-r--r--piem-lei.el2
1 files changed, 1 insertions, 1 deletions
diff --git a/piem-lei.el b/piem-lei.el
index bcc2589..5795087 100644
--- a/piem-lei.el
+++ b/piem-lei.el
@@ -498,7 +498,7 @@ Return a list with a `piem-lei-msg' object for each root."
(defun piem-lei-query-thread (mid)
"Show thread containing message MID."
(interactive
- (list (or (piem-lei-query-get-mid)
+ (list (or (piem-lei-get-mid)
(read-string "Message ID: " nil nil (piem-mid)))))
(let* ((records (piem-lei-query--slurp
(list "--threads" (concat "m:" mid))))