Don't have time to debug this now, i suspect it has to do with having C-g'd an
earlier attempt to start up the ssh process. Perhaps rcp isn't checking to
ensure that the ssh process is still alive?

Signaling: (wrong-type-argument numberp /bin/sh:)
  zerop(/bin/sh:)
  (save-excursion (rcp-send-command method user host (format "%s -d %s >/dev/null 
2>&1" ... ...)) (rcp-send-command method user host "echo $?") (rcp-wait-for-output) 
(zerop (read ...)))
  (let ((v ...) (comint-file-name-quote-list rcp-file-name-quote-list) method user 
host path) (setq method (rcp-file-name-method v)) (setq user (rcp-file-name-user v)) 
(setq host (rcp-file-name-host v)) (setq path (rcp-file-name-path v)) (save-excursion 
(rcp-send-command method user host ...) (rcp-send-command method user host "echo $?") 
(rcp-wait-for-output) (zerop ...)))
  rcp-handle-file-exists-p("/r@scp:[EMAIL PROTECTED]:/usr/local/apache")
  (not (rcp-handle-file-exists-p filename))
  (if (not (rcp-handle-file-exists-p filename)) nil (save-excursion (rcp-send-command 
... ... ... ...) (rcp-wait-for-output) (setq res-inode ...) (setq res-filemodes ...) 
(setq res-numlinks ...) (setq res-uid ...) (setq res-gid ...) (unless ... ...) (unless 
... ...) (setq res-size ...) (setq symlinkp ...) (setq dirp ...) (when symlinkp ... 
...)) (list (or dirp res-symlink-target nil) res-numlinks res-uid res-gid (quote ...) 
(quote ...) (quote ...) res-size res-filemodes nil res-inode -1))
  (let ((v ...) (comint-file-name-quote-list rcp-file-name-quote-list) user host path 
symlinkp dirp res-inode res-filemodes res-numlinks res-uid res-gid res-size 
res-symlink-target) (if (not ...) nil (save-excursion ... ... ... ... ... ... ... ... 
... ... ... ... ...) (list ... res-numlinks res-uid res-gid ... ... ... res-size 
res-filemodes nil res-inode -1)))
  rcp-handle-file-attributes("/r@scp:[EMAIL PROTECTED]:/usr/local/apache")
  (car (rcp-handle-file-attributes filename))
  (eq t (car (rcp-handle-file-attributes filename)))
  rcp-handle-file-directory-p("/r@scp:[EMAIL PROTECTED]:/usr/local/apache")
  apply(rcp-handle-file-directory-p 
"/r@scp:[EMAIL PROTECTED]:/usr/local/apache")
  (if fn (apply (cdr fn) args) (rcp-run-real-handler operation args))
  (let ((fn ...)) (if fn (apply ... args) (rcp-run-real-handler operation args)))
  rcp-file-name-handler(file-directory-p 
"/r@scp:[EMAIL PROTECTED]:/usr/local/apache")
  file-directory-p("/r@scp:[EMAIL PROTECTED]:/usr/local/apache/")
  find-file-noselect("/r:hostname.my.domain:/usr/local/apache/")
  find-file("/r:hostname.my.domain:/usr/local/apache/")
* call-interactively(find-file)

Reply via email to