diff options
| -rw-r--r-- | lisp/init-mail.el | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/lisp/init-mail.el b/lisp/init-mail.el index 2304c4b..3e53508 100644 --- a/lisp/init-mail.el +++ b/lisp/init-mail.el @@ -98,8 +98,9 @@ is off." (save-excursion (goto-char (point-max)) (widget-forward -1) - (kill-new (or (get-text-property (point) 'gnus-string) - (get-text-property (point) 'shr-url)))))) + (--when-let (or (get-text-property (point) 'gnus-string) + (get-text-property (point) 'shr-url)) + (kill-new it))))) (defun km/gnus--gmane-link (&optional perma) (with-current-buffer gnus-original-article-buffer |