diff --git a/emacs/mu4e-actions.el b/emacs/mu4e-actions.el index 9e2d3dce..0dd27e5c 100644 --- a/emacs/mu4e-actions.el +++ b/emacs/mu4e-actions.el @@ -39,6 +39,8 @@ headers view and message-view." (concat "wc -l < " (shell-quote-argument (plist-get msg :path)))))) + + (defvar mu4e-msg2pdf (concat mu4e-builddir "/toys/msg2pdf/msg2pdf") "Path to the msg2pdf toy.") @@ -58,17 +60,20 @@ view." + + +(defvar mu4e-captured-message nil + "The last-captured message (the s-expression).") + (defun mu4e-action-capture-message (msg) "Remember MSG; we can create a an attachment based on this msg -with `mu4e-insert-captured-message-as-attachment'." +with `mu4e-compose-attach-captured-message'." (interactive) (setq mu4e-captured-message msg) (message "Message has been captured")) - - (defvar mu4e-org-contacts-file nil "File to store contact information for org-contacts. Needed by `mu4e-action-add-org-contact'.") diff --git a/emacs/mu4e-vars.el b/emacs/mu4e-vars.el index 01e941f3..b71cca02 100644 --- a/emacs/mu4e-vars.el +++ b/emacs/mu4e-vars.el @@ -315,9 +315,6 @@ viewed in view mode.") (defconst mu4e-log-buffer-name "*mu4e-log*" "*internal* Name of the logging buffer.") -(defvar mu4e-captured-message nil - "The last-captured message (the s-expression).") - ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;; our handlers funcs diff --git a/emacs/mu4e-view.el b/emacs/mu4e-view.el index 248d98a1..2b492109 100644 --- a/emacs/mu4e-view.el +++ b/emacs/mu4e-view.el @@ -727,6 +727,7 @@ PIPECMD is nil, ask user for it." (index (plist-get att :index))) (mu4e~temp-action (plist-get msg :docid) index "pipe" pipecmd))) + (defun mu4e-view-open-attachment-emacs (msg attachnum) "Open MSG's attachment ATTACHNUM in the current emacs instance." (interactive)