procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Improve multisession test results on MS-Windows

Browse source 
* lisp/emacs-lisp/multisession.el
(multisession--backend-set-value): Force 'fsync'ing the temporary
file.
This commit is contained in:
Eli Zaretskii 2021-12-17 14:41:16 +02:00
parent efdfe22704
commit ccb6028364
1 changed files with 2 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

3
lisp/emacs-lisp/multisession.el
View file

@ -321,7 +321,8 @@ DOC should be a doc string, and ARGS are keywords as applicable to
;; file for somewhat better atomicity.
(let ((coding-system-for-write 'utf-8)
(create-lockfiles nil)
(temp (make-temp-name file)))
(temp (make-temp-name file))
(write-region-inhibit-fsync nil))
(write-region (point-min) (point-max) temp nil 'silent)
(set-file-times temp time)
(rename-file temp file t)))