Whitespace fix

Allow aggressive-indent-mode to do its thing.
This commit is contained in:
Sean Allred 2022-11-28 04:47:41 -06:00
parent 39a2c28777
commit 3375a95f24
1 changed files with 2 additions and 2 deletions

View File

@ -465,8 +465,8 @@ http://cr.yp.to/proto/maildir.html."
If there is not e-mail address at point, do nothing."
(interactive)
(let* ((thing (and (thing-at-point 'email)
(string-trim (thing-at-point 'email 'no-props) "<" ">")))
(thing (or thing (thing-at-point 'url 'no-props))))
(string-trim (thing-at-point 'email 'no-props) "<" ">")))
(thing (or thing (thing-at-point 'url 'no-props))))
(when thing
(kill-new thing)
(mu4e-message "Copied '%s' to kill-ring" thing))))