emacs: Don't mark messages as "unsaved" when printing.

[notmuch] / emacs / notmuch-print.el

diff --git a/emacs/notmuch-print.el b/emacs/notmuch-print.el
index f96ccbeb2428425169ea21d3fd80f44a67a1ab82..880f96d9053f38c3e7ad5a0837e874db7b8a89d2 100644 (file)
--- a/emacs/notmuch-print.el
+++ b/emacs/notmuch-print.el
@@ -19,6 +19,8 @@
 ;;
 ;; Authors: David Edmondson <dme@dme.org>
 
+(declare-function notmuch-show-get-prop "notmuch-show" (prop &optional props))
+
 (defcustom notmuch-print-mechanism 'notmuch-print-lpr
   "How should printing be done?"
   :group 'notmuch
@@ -80,6 +82,7 @@ Optional OUTPUT allows passing a list of flags to muttprint."
 
 (defun notmuch-print-message (msg)
   "Print a message using the user-selected mechanism."
+  (set-buffer-modified-p nil)
   (funcall notmuch-print-mechanism msg))
 
 (provide 'notmuch-print)