diff --git a/contrib/lisp/org-notmuch.el b/contrib/lisp/org-notmuch.el index 25f6ab6..20f98c3 100644 --- a/contrib/lisp/org-notmuch.el +++ b/contrib/lisp/org-notmuch.el @@ -58,7 +58,7 @@ (org-store-link-props :type "notmuch" :from from :to to :subject subject :message-id message-id) (setq desc (org-email-link-description)) - (setq link (org-make-link "notmuch:" "id:" message-id)) + (setq link (concat "notmuch:" "id:" message-id)) (org-add-link-props :link link :description desc) link)))
@@ -82,7 +82,7 @@ Can link to more than one message, if so all matching messages are shown." (defun org-notmuch-search-store-link () "Store a link to a notmuch search or message." (when (eq major-mode 'notmuch-search-mode) - (let ((link (org-make-link "notmuch-search:" + (let ((link (concat "notmuch-search:" (org-link-escape notmuch-search-query-string))) (desc (concat "Notmuch search: " notmuch-search-query-string))) (org-store-link-props :type "notmuch-search"