ellie.el: disable lock files in fwrite to fix hang on FUSE
This commit is contained in:
parent
051e372ae4
commit
660a36d2b1
13
ellie.el
13
ellie.el
|
|
@ -114,11 +114,14 @@ Signals `user-error' if no session is active."
|
|||
|
||||
(defun ellie--fwrite (path text)
|
||||
"Write TEXT to PATH, retrying after remount on failure."
|
||||
(condition-case nil
|
||||
(write-region text nil path nil 'silent)
|
||||
(file-error
|
||||
(ellie--remount)
|
||||
(write-region text nil path nil 'silent))))
|
||||
(let ((create-lockfiles nil)
|
||||
(write-region-inhibit-fsync t)
|
||||
(file-precious-flag nil))
|
||||
(condition-case nil
|
||||
(write-region text nil path nil 'silent nil nil)
|
||||
(file-error
|
||||
(ellie--remount)
|
||||
(write-region text nil path nil 'silent nil nil)))))
|
||||
|
||||
(defun ellie--fread (path)
|
||||
"Return the contents of PATH as a string, retrying after remount on failure."
|
||||
|
|
|
|||
Reference in New Issue