diff options
| author | Michael Albinus <michael.albinus@gmx.de> | 2011-07-06 11:48:20 +0200 |
|---|---|---|
| committer | Michael Albinus <michael.albinus@gmx.de> | 2011-07-06 11:48:20 +0200 |
| commit | 1cdd2a1b363afb91bfaa397fa04be1bb3e88c9ae (patch) | |
| tree | 8c0322644e9626c230fd22e6a6d6131e1364a9f8 /lisp/net/tramp-cmds.el | |
| parent | 53d21671304e4574d9c9c3e206532a449c1b09b3 (diff) | |
| download | emacs-1cdd2a1b363afb91bfaa397fa04be1bb3e88c9ae.tar.gz emacs-1cdd2a1b363afb91bfaa397fa04be1bb3e88c9ae.tar.bz2 emacs-1cdd2a1b363afb91bfaa397fa04be1bb3e88c9ae.zip | |
* net/tramp-compat.el (tramp-compat-pop-to-buffer-same-window): New defun.
* net/tramp-cmds.el (tramp-append-tramp-buffers): Use it.
Diffstat (limited to 'lisp/net/tramp-cmds.el')
| -rw-r--r-- | lisp/net/tramp-cmds.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/net/tramp-cmds.el b/lisp/net/tramp-cmds.el index 307ce5368ce..f20040e8a9a 100644 --- a/lisp/net/tramp-cmds.el +++ b/lisp/net/tramp-cmds.el @@ -308,7 +308,7 @@ buffer in your bug report. ;; There is at least one Tramp buffer. (when buffer-list - (pop-to-buffer-same-window (list-buffers-noselect nil)) + (tramp-compat-pop-to-buffer-same-window (list-buffers-noselect nil)) (delete-other-windows) (setq buffer-read-only nil) (goto-char (point-min)) @@ -343,7 +343,7 @@ the debug buffer(s).") ;; OK, let's send. First we delete the buffer list. (progn (kill-buffer nil) - (pop-to-buffer-same-window curbuf) + (tramp-compat-pop-to-buffer-same-window curbuf) (goto-char (point-max)) (insert "\n\ This is a special notion of the `gnus/message' package. If you |