# HG changeset patch
# User Michael Albinus <michael.albinus@gmx.de>
# Date 1251189941 0
# Node ID 2e9b68642e067c58d4b0eb34625a7c668bd87eb4
# Parent  ccbbe2522df6c2654faf28a5ae98fc0b62c66c4b
* simple.el (process-file-side-effects): New defvar.

diff -r ccbbe2522df6 -r 2e9b68642e06 lisp/simple.el
--- a/lisp/simple.el	Tue Aug 25 08:42:25 2009 +0000
+++ b/lisp/simple.el	Tue Aug 25 08:45:41 2009 +0000
@@ -2513,6 +2513,17 @@
       (when stderr-file (delete-file stderr-file))
       (when lc (delete-file lc)))))
 
+(defvar process-file-side-effects t
+  "Whether a call of `process-file' changes remote files.
+
+Per default, this variable is always set to `t', meaning that a
+call of `process-file' could potentially change any file on a
+remote host.  When set to `nil', a file handler could optimize
+its behaviour with respect to remote file attributes caching.
+
+This variable should never be changed by `setq'.  Instead of, it
+shall be set only by let-binding.")
+
 (defun start-file-process (name buffer program &rest program-args)
   "Start a program in a subprocess.  Return the process object for it.