mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2025-01-04 11:40:22 +00:00
Code Issues Releases Activity

Fix last commit.

Browse Source 
lisp/files.el (basic-save-buffer): If set-file-extended-attributes
 fails, fall back on set-file-modes.

Fixes: debbugs:13298
This commit is contained in:
Eli Zaretskii 2012-12-29 16:58:41 +02:00
parent ccad023bc3
commit 7e56b10316
2 changed files with 6 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
lisp/ChangeLog
View File

@ -3,6 +3,7 @@
* files.el (backup-buffer-copy, basic-save-buffer-2): If
set-file-extended-attributes fails, fall back on set-file-modes
instead of signaling an error. (Bug#13298)
(basic-save-buffer): Likewise.
2012-12-29 Fabián Ezequiel Gallina <fgallina@cuca>

8
lisp/files.el
View File

@ -4621,9 +4621,11 @@ Before and after saving the buffer, this function runs
(if setmodes
(condition-case ()
(progn
(set-file-modes buffer-file-name (car setmodes))
(set-file-extended-attributes buffer-file-name
(nth 1 setmodes)))
(unless
(with-demoted-errors
(set-file-modes buffer-file-name (car setmodes)))
(set-file-extended-attributes buffer-file-name
(nth 1 setmodes))))
(error nil))))
;; If the auto-save file was recent before this command,
;; delete it now.