From: Chong Yidong <cyd@stupidchicken.com>
Date: Wed, 28 Feb 2007 01:35:20 +0000 (+0000)
Subject: (tramp-file-name-handler): Inhibit modification hooks to avoid
X-Git-Tag: emacs-pretest-22.0.95~58
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=cd00d0a053b5d3c24ceb78b18e8fd306a243c95e;p=emacs.git

(tramp-file-name-handler): Inhibit modification hooks to avoid
confusion when combining after-change calls.
---

diff --git a/lisp/net/tramp.el b/lisp/net/tramp.el
index 602c6d25eaa..73cab23d1d9 100644
--- a/lisp/net/tramp.el
+++ b/lisp/net/tramp.el
@@ -4348,7 +4348,12 @@ Falls back to normal file name handler if no tramp file name handler exists."
   (save-match-data
     (let* ((filename (apply 'tramp-file-name-for-operation operation args))
 	   (completion (tramp-completion-mode filename))
-	   (foreign (tramp-find-foreign-file-name-handler filename)))
+	   (foreign (tramp-find-foreign-file-name-handler filename))
+	   ;; If combine-after-change-calls is t, it is possible to
+	   ;; get Emacs into a confused state since the backend
+	   ;; handlers can scribble to temp buffers, e.g. through
+	   ;; format-spec.  So we ignore all modification hooks.
+	   (inhibit-modification-hooks t))
       (with-parsed-tramp-file-name filename nil
 	(cond
 	 ;; When we are in completion mode, some operations shouldn' be