Set process property `adjust-window-size-function' to `ignore' in Tramp

* lisp/net/tramp-adb.el (tramp-adb-parse-device-names)
(tramp-adb-maybe-open-connection):
* lisp/net/tramp-gvfs.el (tramp-gvfs-handle-file-notify-add-watch):
* lisp/net/tramp-sh.el (tramp-do-copy-or-rename-file-out-of-band)
(tramp-maybe-open-connection):
* lisp/net/tramp-smb.el (tramp-smb-handle-copy-directory)
(tramp-smb-handle-file-acl, tramp-smb-handle-set-file-acl)
(tramp-smb-maybe-open-connection): Set process property
`adjust-window-size-function' to `ignore'.

diff --git a/lisp/net/tramp-adb.el b/lisp/net/tramp-adb.el
index a80bc0bdb2a07f3bb1e6b4110ed8c8cbf30edd40..2825532c5257e53e0b676d7af23b2d043d784c1a 100644 (file)
--- a/lisp/net/tramp-adb.el
+++ b/lisp/net/tramp-adb.el
@@ -203,6 +203,7 @@ pass to the OPERATION."
                       tramp-current-host nil nil))
            result)
        (tramp-message v 6 "%s" (mapconcat 'identity (process-command p) " "))
+       (process-put p 'adjust-window-size-function 'ignore)
        (set-process-query-on-exit-flag p nil)
        (while (tramp-compat-process-live-p p)
          (accept-process-output p 0.1))
@@ -1230,6 +1231,7 @@ connection if a previous connection has died for some reason."
            (unless (tramp-compat-process-live-p p)
              (tramp-error  vec 'file-error "Terminated!"))
            (tramp-set-connection-property p "vector" vec)
+           (process-put p 'adjust-window-size-function 'ignore)
            (set-process-query-on-exit-flag p nil)
 
            ;; Check whether the properties have been changed.  If

diff --git a/lisp/net/tramp-gvfs.el b/lisp/net/tramp-gvfs.el
index 593be33e833e9db95db7e39ec87f1013d3e5d832..aba6f414a45cd2d2267d8254161cc31ab4069383 100644 (file)
--- a/lisp/net/tramp-gvfs.el
+++ b/lisp/net/tramp-gvfs.el
@@ -1082,6 +1082,7 @@ file names."
        (tramp-set-connection-property p "vector" v)
        (process-put p 'events events)
        (process-put p 'watch-name localname)
+       (process-put p 'adjust-window-size-function 'ignore)
        (set-process-query-on-exit-flag p nil)
        (set-process-filter p 'tramp-gvfs-monitor-file-process-filter)
        ;; There might be an error if the monitor is not supported.

diff --git a/lisp/net/tramp-sh.el b/lisp/net/tramp-sh.el
index 71afb9aeb7537eef9bd4b56defbc2b95e81bcc43..971cdaedf822528ff82e0ce897ba5337642dd2dc 100644 (file)
--- a/lisp/net/tramp-sh.el
+++ b/lisp/net/tramp-sh.el
@@ -2517,6 +2517,7 @@ The method used must be an out-of-band method."
                             command))))
                  (tramp-message orig-vec 6 "%s" command)
                  (tramp-set-connection-property p "vector" orig-vec)
+                 (process-put p 'adjust-window-size-function 'ignore)
                  (set-process-query-on-exit-flag p nil)
 
                  ;; We must adapt `tramp-local-end-of-line' for
@@ -4719,6 +4720,7 @@ connection if a previous connection has died for some reason."
                ;; Set sentinel and query flag.
                (tramp-set-connection-property p "vector" vec)
                (set-process-sentinel p 'tramp-process-sentinel)
+               (process-put p 'adjust-window-size-function 'ignore)
                (set-process-query-on-exit-flag p nil)
                (setq tramp-current-connection
                      (cons (butlast (append vec nil) 2) (current-time))

diff --git a/lisp/net/tramp-smb.el b/lisp/net/tramp-smb.el
index 014e1e8601193ad9116e6c3a7e98fa6017ff8112..5a3e2566d7135f5b0fcbe234b38e69e7a71c6eae 100644 (file)
--- a/lisp/net/tramp-smb.el
+++ b/lisp/net/tramp-smb.el
@@ -526,6 +526,7 @@ pass to the OPERATION."
                      (tramp-message
                       v 6 "%s" (mapconcat 'identity (process-command p) " "))
                      (tramp-set-connection-property p "vector" v)
+                     (process-put p 'adjust-window-size-function 'ignore)
                      (set-process-query-on-exit-flag p nil)
                      (tramp-process-actions p v nil tramp-smb-actions-with-tar)
 
@@ -788,6 +789,7 @@ PRESERVE-UID-GID and PRESERVE-EXTENDED-ATTRIBUTES are completely ignored."
                  (tramp-message
                   v 6 "%s" (mapconcat 'identity (process-command p) " "))
                  (tramp-set-connection-property p "vector" v)
+                 (process-put p 'adjust-window-size-function 'ignore)
                  (set-process-query-on-exit-flag p nil)
                  (tramp-process-actions p v nil tramp-smb-actions-get-acl)
                  (when (> (point-max) (point-min))
@@ -1384,6 +1386,7 @@ target of the symlink differ."
                  (tramp-message
                   v 6 "%s" (mapconcat 'identity (process-command p) " "))
                  (tramp-set-connection-property p "vector" v)
+                 (process-put p 'adjust-window-size-function 'ignore)
                  (set-process-query-on-exit-flag p nil)
                  (tramp-process-actions p v nil tramp-smb-actions-set-acl)
                  (goto-char (point-max))
@@ -1890,6 +1893,7 @@ If ARGUMENT is non-nil, use it as argument for
              (tramp-message
               vec 6 "%s" (mapconcat 'identity (process-command p) " "))
              (tramp-set-connection-property p "vector" vec)
+             (process-put p 'adjust-window-size-function 'ignore)
              (set-process-query-on-exit-flag p nil)
 
              ;; Set variables for computing the prompt for reading password.