From e97bbb51743613bbda521256d15fe713f97aec54 Mon Sep 17 00:00:00 2001 From: Lars Ingebrigtsen Date: Sun, 31 Jul 2011 18:31:09 +0200 Subject: [PATCH] (nnmaildir-request-accept-article): Don't call `unix-sync' unless it's defined. --- lisp/ChangeLog | 5 +++++ lisp/nnmaildir.el | 3 ++- 2 files changed, 7 insertions(+), 1 deletion(-) 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 + + * nnmaildir.el (nnmaildir-request-accept-article): Don't call + `unix-sync' unless it's defined. + 2011-07-31 Marcus Harnisch (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) -- 2.11.4.GIT