ellie.el: disable lock files in fwrite to fix hang on FUSE

This commit is contained in:
Levi Neely 2026-07-19 00:20:40 +02:00
parent 051e372ae4
commit 660a36d2b1
1 changed files with 8 additions and 5 deletions

View File

@ -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."