Mercurial > emacs

comparison lisp/net/tramp.el @ 68726:74a3e3db0759

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(tramp-maybe-open-connection): Do not wait for output from a dead connection.
author Sam Steingold <sds@gnu.org>
date Wed, 08 Feb 2006 15:47:31 +0000
parents 067115a6e738
children 3a5ea93ff8b4 4b3d39451150
comparison
equal deleted inserted replaced
68725:e59bf34a8b21 68726:74a3e3db0759
6480 (when (and tramp-last-cmd-time 6480 (when (and tramp-last-cmd-time
6481 (> (tramp-time-diff (current-time) tramp-last-cmd-time) 60) 6481 (> (tramp-time-diff (current-time) tramp-last-cmd-time) 60)
6482 p (processp p) (memq (process-status p) '(run open))) 6482 p (processp p) (memq (process-status p) '(run open)))
6483 (tramp-send-command 6483 (tramp-send-command
6484 multi-method method user host "echo are you awake" nil t) 6484 multi-method method user host "echo are you awake" nil t)
6485 (unless (tramp-wait-for-output 10) 6485 (unless (and (memq (process-status p) '(run open))
6486 (tramp-wait-for-output 10))
6486 (delete-process p) 6487 (delete-process p)
6487 (setq p nil)) 6488 (setq p nil))
6488 (erase-buffer))) 6489 (erase-buffer)))
6489 (unless (and p (processp p) (memq (process-status p) '(run open))) 6490 (unless (and p (processp p) (memq (process-status p) '(run open)))
6490 (when (and p (processp p)) 6491 (when (and p (processp p))