X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=lisp%2Fgnus-dup.el;h=6958f02d7265f720a539e7252951e01699addedb;hb=7bd51e7e85c1b314c2f2d00ebb26678762820d73;hp=b28963982e9f8f8ea7aba1a101fdfffcf6470f4f;hpb=cda270b73d89201b8072b013dfde919798b168d6;p=elisp%2Fgnus.git-

diff --git a/lisp/gnus-dup.el b/lisp/gnus-dup.el
index b289639..6958f02 100644
--- a/lisp/gnus-dup.el
+++ b/lisp/gnus-dup.el
@@ -98,7 +98,7 @@ seen in the same session."
   "Save the duplicate suppression list."
   (when (and gnus-save-duplicate-list
 	     gnus-dup-list-dirty)
-    (with-temp-file gnus-duplicate-file
+    (nnheader-temp-write gnus-duplicate-file
       (gnus-prin1 `(setq gnus-dup-list ',gnus-dup-list))))
   (setq gnus-dup-list-dirty nil))