[nongnu] elpa/extmap 09a8b1b97a 18/39: Remove pointless noise from `extmap--do-create' on Emacs 24.

[ELPA Syncer]

branch: elpa/extmap
commit 09a8b1b97aac94db86a3a547852c5b80efa0c00d
Author: Paul Pogonyshev <pogonyshev@gmail.com>
Commit: Paul Pogonyshev <pogonyshev@gmail.com>

    Remove pointless noise from `extmap--do-create' on Emacs 24.
---
 extmap.el | 8 ++++----
 1 file changed, 4 insertions(+), 4 deletions(-)

diff --git a/extmap.el b/extmap.el
index 5780454c8a..07bc93b701 100644
--- a/extmap.el
+++ b/extmap.el
@@ -384,7 +384,7 @@ Only available on Emacs 25, as this requires `generator' 
package."
           (used-keys                   (make-hash-table :test #'eq)))
       ;; Will be replaced at the end.
       (insert (bindat-pack extmap--header-bindat-spec nil))
-      (write-region (point-min) (point-max) filename nil nil nil (if 
(plist-get options :overwrite) nil 'excl))
+      (write-region nil nil filename nil 'no-message nil (if (plist-get 
options :overwrite) nil 'excl))
       (erase-buffer)
       (catch 'end-of-data
         (while t
@@ -424,20 +424,20 @@ Only available on Emacs 25, as this requires `generator' 
package."
                              (insert (bindat-pack 
extmap--item-short-bindat-spec `((type . 4) (length . ,(length encoded))))
                                      encoded))))
                         (t
-                         (write-region (point-min) (point-max) filename t)
+                         (write-region nil nil filename t 'no-message)
                          (with-current-buffer buffer
                            (insert (bindat-pack extmap--item-bindat-spec 
`((type . ,(if (extmap--plain-string-p value) 2 3)) (length . ,num-bytes) 
(offset . ,offset))))
                            (setq offset (+ offset num-bytes))
                            (when shared-values
                              (puthash value key shared-values)))))))))))
-      (write-region (point-min) (point-max) filename t)
+      (write-region nil nil filename t 'no-message)
       ;; Update the header.
       (erase-buffer)
       (insert (bindat-pack extmap--header-bindat-spec `((magic     . #x91f7)
                                                         (version   . 1)
                                                         (num-items . 
,(hash-table-count used-keys))
                                                         (offset    . 
,offset))))
-      (write-region (point-min) (point-max) filename 0))))
+      (write-region nil nil filename 0 'no-message))))
 
 (defun extmap--plain-string-p (object)
   (and (stringp object)