mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-15 10:30:25 -08:00
Code Issues Projects Releases Wiki Activity

* net/tramp-gvfs.el (tramp-gvfs-handle-write-region): Set file

Browse source 
modification time.
This commit is contained in:
Michael Albinus 2009-11-17 14:58:08 +00:00
parent 21050de1b8
commit 303ffde825
2 changed files with 7 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

4
lisp/net/tramp-gvfs.el
View file

@ -727,6 +727,10 @@ is no information where to trace the message.")
(signal (car err) (cdr err)))
(delete-file tmpfile)))))
;; Set file modification time.
(when (or (eq visit t) (stringp visit))
(set-visited-file-modtime (nth 5 (file-attributes filename))))
;; The end.
(when (or (eq visit t) (null visit) (stringp visit))
(tramp-message v 0 "Wrote %s" filename))