diff options
| author | Kyle Meyer <kyle@kyleam.com> | 2021-06-05 17:14:02 -0400 |
|---|---|---|
| committer | Kyle Meyer <kyle@kyleam.com> | 2021-06-07 00:12:07 -0400 |
| commit | ba2089e26e4964361b258de66ad9198624ffbf1e (patch) | |
| tree | 328437de34c7f6c1236f2291213773672a9516e1 | |
| parent | 52ece47dd7a490e9f30d9e4d85a0bddce44eb35e (diff) | |
| download | piem-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.el | 2 |
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)))) |