# HG changeset patch
# User Chong Yidong <cyd@stupidchicken.com>
# Date 1172626520 0
# Node ID 28ad759d36cf7fb0c2a08a9407c138a8dc29d527
# Parent  1fd4f5302ed33e184c728431f2cccd126311e1c2
(tramp-file-name-handler): Inhibit modification hooks to avoid
confusion when combining after-change calls.

diff -r 1fd4f5302ed3 -r 28ad759d36cf lisp/net/tramp.el
--- a/lisp/net/tramp.el	Wed Feb 28 01:35:08 2007 +0000
+++ b/lisp/net/tramp.el	Wed Feb 28 01:35:20 2007 +0000
@@ -4348,7 +4348,12 @@
   (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