From 52e17e53b7dbafb4877d98d99188c335db6a3b5b Mon Sep 17 00:00:00 2001 From: Arash Esbati Date: Tue, 25 Jun 2019 23:24:47 +0200 Subject: [PATCH] Suppress warning about unix-sync in nnmaildir.el * nnmaildir.el (nnmaildir-request-replace-article): Check if the function `unix-sync' is bound before running it. --- lisp/gnus/nnmaildir.el | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/lisp/gnus/nnmaildir.el b/lisp/gnus/nnmaildir.el index ac125c905a5..3becee35112 100644 --- a/lisp/gnus/nnmaildir.el +++ b/lisp/gnus/nnmaildir.el @@ -1396,7 +1396,8 @@ This variable is set by `nnmaildir-request-article'.") (with-current-buffer buffer (write-region (point-min) (point-max) tmpfile nil 'no-message nil 'excl)) - (unix-sync) ;; no fsync :( + (when (fboundp 'unix-sync) + (unix-sync)) ;; no fsync :( (rename-file tmpfile (concat (nnmaildir--cur dir) file suffix) 'replace) t))) -- 2.39.5