Changeset 4111 for trunk/lisp/net/tramp.el
- Timestamp:
- 07/16/06 08:36:52 (2 years ago)
- Files:
-
- trunk/lisp/net/tramp.el (modified) (2 diffs)
Legend:
- Unmodified
- Added
- Removed
- Modified
- Copied
- Moved
trunk/lisp/net/tramp.el
r4098 r4111 3573 3573 (if (tramp-tramp-file-p default-directory) 3574 3574 (with-parsed-tramp-file-name default-directory nil 3575 (let ((asynchronous (string-match "[ \t]*&[ \t]*\\'" command)) 3575 (let ((curbuf (current-buffer)) 3576 (asynchronous (string-match "[ \t]*&[ \t]*\\'" command)) 3576 3577 status) 3577 3578 (unless output-buffer … … 3675 3676 (when tramp-display-shell-command-buffer 3676 3677 (display-buffer output-buffer))) 3678 (set-buffer curbuf) 3677 3679 status)) 3678 3680 ;; The following is only executed if something strange was
