[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] emacs/lisp/net tramp.el [EMACS_23_1_RC]
From: |
Michael Albinus |
Subject: |
[Emacs-diffs] emacs/lisp/net tramp.el [EMACS_23_1_RC] |
Date: |
Mon, 06 Jul 2009 13:40:27 +0000 |
CVSROOT: /sources/emacs
Module name: emacs
Branch: EMACS_23_1_RC
Changes by: Michael Albinus <albinus> 09/07/06 13:40:27
Modified files:
lisp/net : tramp.el
Log message:
* net/tramp.el (tramp-handle-write-region): Flush file properties
in case of short track.
CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/emacs/lisp/net/tramp.el?cvsroot=emacs&only_with_tag=EMACS_23_1_RC&r1=1.236.2.3&r2=1.236.2.4
Patches:
Index: tramp.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/net/tramp.el,v
retrieving revision 1.236.2.3
retrieving revision 1.236.2.4
diff -u -b -r1.236.2.3 -r1.236.2.4
--- tramp.el 30 Jun 2009 15:30:09 -0000 1.236.2.3
+++ tramp.el 6 Jul 2009 13:40:26 -0000 1.236.2.4
@@ -4364,9 +4364,11 @@
(or (file-directory-p localname)
(file-writable-p localname)))))
;; Short track: if we are on the local host, we can run directly.
+ (prog1
(tramp-run-real-handler
'write-region
(list start end localname append 'no-message lockname confirm))
+ (tramp-flush-file-property v localname))
(let ((rem-dec (tramp-get-remote-coding v "remote-decoding"))
(loc-enc (tramp-get-local-coding v "local-encoding"))
- [Emacs-diffs] emacs/lisp/net tramp.el [EMACS_23_1_RC],
Michael Albinus <=