From: Lars Ingebrigtsen <larsi@gnus.org>
Date: Sun, 31 Jul 2011 16:31:09 +0000 (+0200)
Subject: (nnmaildir-request-accept-article): Don't call `unix-sync' unless it's defined.
X-Git-Url: https://cgit.sxemacs.org/?p=gnus;a=commitdiff_plain;h=e97bbb51743613bbda521256d15fe713f97aec54

(nnmaildir-request-accept-article): Don't call `unix-sync' unless it's defined.
---

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 1aecb8002..9730c358d 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2011-07-31  Lars Ingebrigtsen  <larsi@gnus.org>
+
+	* nnmaildir.el (nnmaildir-request-accept-article): Don't call
+	`unix-sync' unless it's defined.
+
 2011-07-31  Marcus Harnisch  <marcus.harnisch@gmx.net>  (tiny change)
 
 	* gnus-art.el (gnus-article-stop-animations): Use `elt' instead of
diff --git a/lisp/nnmaildir.el b/lisp/nnmaildir.el
index 8e2cd4bdd..bbace7c78 100644
--- a/lisp/nnmaildir.el
+++ b/lisp/nnmaildir.el
@@ -1381,7 +1381,8 @@ by nnmaildir-request-article.")
 	(error
 	 (gmm-write-region (point-min) (point-max) tmpfile nil 'no-message nil
 			   'excl)
-	 (unix-sync))) ;; no fsync :(
+	 (when (fboundp 'unix-sync)
+	   (unix-sync)))) ;; no fsync :(
       (nnheader-cancel-timer 24h)
       (condition-case err
 	  (add-name-to-file tmpfile curfile)