Nicer msg when getting mu4e mail-list archive link

This commit is contained in:
TEC 2024-03-09 00:05:39 +08:00
parent 35aaf5491d
commit 0d136a1624
Signed by: tec
SSH Key Fingerprint: SHA256:eobz41Mnm0/iYWBvWThftS0ElEs1ftBr6jamutnXc/A
1 changed files with 2 additions and 1 deletions

View File

@ -7419,8 +7419,9 @@ current message on https://list.orgmode.org.
("emacs-orgmode.gnu.org"
(format "https://list.orgmode.org/%s" (mu4e-message-field msg :message-id)))
(_ (user-error "Mailing list %s not supported" list-addr)))))
(gui-select-text msg-url)
(message "Link %s copied to clipboard"
(propertize (gui-select-text msg-url) 'face '((:weight normal :underline nil) link)))
(propertize msg-url 'face '((:weight normal :underline nil) link)))
msg-url))
(add-to-list 'mu4e-view-actions (cons "link to message ML" #'+mu4e-ml-message-link) t))