diff options
| author | Michael Albinus | 2014-06-22 11:20:38 +0200 |
|---|---|---|
| committer | Michael Albinus | 2014-06-22 11:20:38 +0200 |
| commit | 6692a64cc4c6929175c1d55a826ca35d1db3e652 (patch) | |
| tree | d99072aa0a97fa6df1265791ff2f78486ec9bd5f | |
| parent | 2a9a5ea855a7344a52bd8368e545de7d7b5763e3 (diff) | |
| download | emacs-6692a64cc4c6929175c1d55a826ca35d1db3e652.tar.gz emacs-6692a64cc4c6929175c1d55a826ca35d1db3e652.zip | |
* net/tramp-adb.el (tramp-adb-handle-process-file):
* net/tramp-sh.el (tramp-sh-handle-process-file):
* net/tramp-smb.el (tramp-smb-handle-process-file): Do not raise
the output buffer when DISPLAY is non-nil.
Fixes: debbugs:17815
| -rw-r--r-- | lisp/ChangeLog | 7 | ||||
| -rw-r--r-- | lisp/net/tramp-adb.el | 4 | ||||
| -rw-r--r-- | lisp/net/tramp-sh.el | 4 | ||||
| -rw-r--r-- | lisp/net/tramp-smb.el | 4 |
4 files changed, 13 insertions, 6 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 88a85c3bda6..e0aaa182785 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog | |||
| @@ -1,3 +1,10 @@ | |||
| 1 | 2014-06-22 Michael Albinus <michael.albinus@gmx.de> | ||
| 2 | |||
| 3 | * net/tramp-adb.el (tramp-adb-handle-process-file): | ||
| 4 | * net/tramp-sh.el (tramp-sh-handle-process-file): | ||
| 5 | * net/tramp-smb.el (tramp-smb-handle-process-file): Do not raise | ||
| 6 | the output buffer when DISPLAY is non-nil. (Bug#17815) | ||
| 7 | |||
| 1 | 2014-06-21 Glenn Morris <rgm@gnu.org> | 8 | 2014-06-21 Glenn Morris <rgm@gnu.org> |
| 2 | 9 | ||
| 3 | * play/landmark.el (landmark-move-down, landmark-move-up): | 10 | * play/landmark.el (landmark-move-down, landmark-move-up): |
diff --git a/lisp/net/tramp-adb.el b/lisp/net/tramp-adb.el index 53888473217..c21f2907720 100644 --- a/lisp/net/tramp-adb.el +++ b/lisp/net/tramp-adb.el | |||
| @@ -801,11 +801,11 @@ PRESERVE-UID-GID and PRESERVE-EXTENDED-ATTRIBUTES are completely ignored." | |||
| 801 | v (format "(cd %s; %s)" | 801 | v (format "(cd %s; %s)" |
| 802 | (tramp-shell-quote-argument localname) command) | 802 | (tramp-shell-quote-argument localname) command) |
| 803 | "") | 803 | "") |
| 804 | ;; We should show the output anyway. | 804 | ;; We should add the output anyway. |
| 805 | (when outbuf | 805 | (when outbuf |
| 806 | (with-current-buffer outbuf | 806 | (with-current-buffer outbuf |
| 807 | (insert-buffer-substring (tramp-get-connection-buffer v))) | 807 | (insert-buffer-substring (tramp-get-connection-buffer v))) |
| 808 | (when display (display-buffer outbuf)))) | 808 | (when (and display (get-buffer-window outbuf t)) (redisplay)))) |
| 809 | ;; When the user did interrupt, we should do it also. We use | 809 | ;; When the user did interrupt, we should do it also. We use |
| 810 | ;; return code -1 as marker. | 810 | ;; return code -1 as marker. |
| 811 | (quit | 811 | (quit |
diff --git a/lisp/net/tramp-sh.el b/lisp/net/tramp-sh.el index 15aa1329817..6f55b86e9e5 100644 --- a/lisp/net/tramp-sh.el +++ b/lisp/net/tramp-sh.el | |||
| @@ -2906,13 +2906,13 @@ the result will be a local, non-Tramp, filename." | |||
| 2906 | command) | 2906 | command) |
| 2907 | t t) | 2907 | t t) |
| 2908 | 0 1)) | 2908 | 0 1)) |
| 2909 | ;; We should show the output anyway. | 2909 | ;; We should add the output anyway. |
| 2910 | (when outbuf | 2910 | (when outbuf |
| 2911 | (with-current-buffer outbuf | 2911 | (with-current-buffer outbuf |
| 2912 | (insert | 2912 | (insert |
| 2913 | (with-current-buffer (tramp-get-connection-buffer v) | 2913 | (with-current-buffer (tramp-get-connection-buffer v) |
| 2914 | (buffer-string)))) | 2914 | (buffer-string)))) |
| 2915 | (when display (display-buffer outbuf)))) | 2915 | (when (and display (get-buffer-window outbuf t)) (redisplay)))) |
| 2916 | ;; When the user did interrupt, we should do it also. We use | 2916 | ;; When the user did interrupt, we should do it also. We use |
| 2917 | ;; return code -1 as marker. | 2917 | ;; return code -1 as marker. |
| 2918 | (quit | 2918 | (quit |
diff --git a/lisp/net/tramp-smb.el b/lisp/net/tramp-smb.el index 43e2c494ece..fa5e72dfb3e 100644 --- a/lisp/net/tramp-smb.el +++ b/lisp/net/tramp-smb.el | |||
| @@ -1224,8 +1224,8 @@ target of the symlink differ." | |||
| 1224 | (error | 1224 | (error |
| 1225 | (setq ret 1))) | 1225 | (setq ret 1))) |
| 1226 | 1226 | ||
| 1227 | ;; We should show the output anyway. | 1227 | ;; We should redisplay the output. |
| 1228 | (when (and outbuf display) (display-buffer outbuf)) | 1228 | (when (and display outbuf (get-buffer-window outbuf t)) (redisplay)) |
| 1229 | 1229 | ||
| 1230 | ;; Cleanup. We remove all file cache values for the connection, | 1230 | ;; Cleanup. We remove all file cache values for the connection, |
| 1231 | ;; because the remote process could have changed them. | 1231 | ;; because the remote process could have changed them. |