* minor / cosmetic
This commit is contained in:
@ -39,6 +39,8 @@ headers view and message-view."
|
|||||||
(concat "wc -l < " (shell-quote-argument (plist-get msg :path))))))
|
(concat "wc -l < " (shell-quote-argument (plist-get msg :path))))))
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
(defvar mu4e-msg2pdf (concat mu4e-builddir "/toys/msg2pdf/msg2pdf")
|
(defvar mu4e-msg2pdf (concat mu4e-builddir "/toys/msg2pdf/msg2pdf")
|
||||||
"Path to the msg2pdf toy.")
|
"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)
|
(defun mu4e-action-capture-message (msg)
|
||||||
"Remember MSG; we can create a an attachment based on this 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)
|
(interactive)
|
||||||
(setq mu4e-captured-message msg)
|
(setq mu4e-captured-message msg)
|
||||||
(message "Message has been captured"))
|
(message "Message has been captured"))
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
(defvar mu4e-org-contacts-file nil
|
(defvar mu4e-org-contacts-file nil
|
||||||
"File to store contact information for org-contacts. Needed by
|
"File to store contact information for org-contacts. Needed by
|
||||||
`mu4e-action-add-org-contact'.")
|
`mu4e-action-add-org-contact'.")
|
||||||
|
|||||||
@ -315,9 +315,6 @@ viewed in view mode.")
|
|||||||
(defconst mu4e-log-buffer-name "*mu4e-log*"
|
(defconst mu4e-log-buffer-name "*mu4e-log*"
|
||||||
"*internal* Name of the logging buffer.")
|
"*internal* Name of the logging buffer.")
|
||||||
|
|
||||||
(defvar mu4e-captured-message nil
|
|
||||||
"The last-captured message (the s-expression).")
|
|
||||||
|
|
||||||
|
|
||||||
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
||||||
;; our handlers funcs
|
;; our handlers funcs
|
||||||
|
|||||||
@ -727,6 +727,7 @@ PIPECMD is nil, ask user for it."
|
|||||||
(index (plist-get att :index)))
|
(index (plist-get att :index)))
|
||||||
(mu4e~temp-action (plist-get msg :docid) index "pipe" pipecmd)))
|
(mu4e~temp-action (plist-get msg :docid) index "pipe" pipecmd)))
|
||||||
|
|
||||||
|
|
||||||
(defun mu4e-view-open-attachment-emacs (msg attachnum)
|
(defun mu4e-view-open-attachment-emacs (msg attachnum)
|
||||||
"Open MSG's attachment ATTACHNUM in the current emacs instance."
|
"Open MSG's attachment ATTACHNUM in the current emacs instance."
|
||||||
(interactive)
|
(interactive)
|
||||||
|
|||||||
Reference in New Issue
Block a user