From: Arash Esbati <arash@gnu.org>
Date: Tue, 25 Jun 2019 21:24:47 +0000 (+0200)
Subject: Suppress warning about unix-sync in nnmaildir.el
X-Git-Tag: emacs-27.0.90~2224
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=52e17e53b7dbafb4877d98d99188c335db6a3b5b;p=emacs.git

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.
---

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)))