From mboxrd@z Thu Jan 1 00:00:00 1970 Return-Path: Received: from localhost (localhost [127.0.0.1]) by arlo.cworth.org (Postfix) with ESMTP id 5AD646DE01E1 for ; Wed, 30 Jan 2019 03:20:51 -0800 (PST) X-Virus-Scanned: Debian amavisd-new at cworth.org X-Spam-Flag: NO X-Spam-Score: -0.004 X-Spam-Level: X-Spam-Status: No, score=-0.004 tagged_above=-999 required=5 tests=[AWL=-0.003, SPF_PASS=-0.001] autolearn=disabled Received: from arlo.cworth.org ([127.0.0.1]) by localhost (arlo.cworth.org [127.0.0.1]) (amavisd-new, port 10024) with ESMTP id Wlu8thJ7lehb for ; Wed, 30 Jan 2019 03:20:50 -0800 (PST) Received: from fethera.tethera.net (fethera.tethera.net [198.245.60.197]) by arlo.cworth.org (Postfix) with ESMTPS id 203646DE0198 for ; Wed, 30 Jan 2019 03:20:49 -0800 (PST) Received: from remotemail by fethera.tethera.net with local (Exim 4.89) (envelope-from ) id 1gonvC-0006FU-VM; Wed, 30 Jan 2019 06:20:46 -0500 Received: (nullmailer pid 28689 invoked by uid 1000); Wed, 30 Jan 2019 11:20:45 -0000 From: David Bremner To: notmuch@notmuchmail.org Subject: [PATCH] emacs: use ".ps" suffix for PostScript temporary files. Date: Wed, 30 Jan 2019 07:20:31 -0400 Message-Id: <20190130112031.28642-1-david@tethera.net> X-Mailer: git-send-email 2.20.1 MIME-Version: 1.0 Content-Transfer-Encoding: 8bit X-BeenThere: notmuch@notmuchmail.org X-Mailman-Version: 2.1.29 Precedence: list List-Id: "Use and development of the notmuch mail system." List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , X-List-Received-Date: Wed, 30 Jan 2019 11:20:51 -0000 Joerg Jaspert [1] reported problems with evince reading unsuffixed temporary files in Debian. [1]: https://bugs.debian.org/cgi-bin/bugreport.cgi?bug=920856 --- emacs/notmuch-print.el | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/emacs/notmuch-print.el b/emacs/notmuch-print.el index bca759fa..d9b3d449 100644 --- a/emacs/notmuch-print.el +++ b/emacs/notmuch-print.el @@ -69,7 +69,7 @@ Optional OUTPUT allows passing a list of flags to muttprint." (defun notmuch-print-ps-print/evince (msg) "Preview a message buffer using ps-print and evince." - (let ((ps-file (make-temp-file "notmuch")) + (let ((ps-file (make-temp-file "notmuch" nil ".ps")) (subject (notmuch-prettify-subject (plist-get (notmuch-show-get-prop :headers msg) :Subject)))) (rename-buffer subject t) @@ -82,7 +82,7 @@ Optional OUTPUT allows passing a list of flags to muttprint." (defun notmuch-print-muttprint/evince (msg) "Preview a message buffer using muttprint and evince." - (let ((ps-file (make-temp-file "notmuch"))) + (let ((ps-file (make-temp-file "notmuch" nil ".ps"))) (notmuch-print-run-muttprint (list "--printer" (concat "TO_FILE:" ps-file))) (notmuch-print-run-evince ps-file))) -- 2.20.1