From: Michael Albinus <michael.albinus@gmx.de>
Date: Thu, 23 Jun 2011 13:03:04 +0000 (+0200)
Subject: * net/tramp-sh.el (tramp-method-out-of-band-p): Check, whether
X-Git-Tag: emacs-pretest-24.0.90~104^2~152^2~425
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=d59eb51849ca16fe39395cf83dd808cbff2adc2b;p=emacs.git

* net/tramp-sh.el (tramp-method-out-of-band-p): Check, whether
SIZE is a number.
---

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index dfac3b497ad..8660bd5b764 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2011-06-23  Michael Albinus  <michael.albinus@gmx.de>
+
+	* net/tramp-sh.el (tramp-method-out-of-band-p): Check, whether
+	SIZE is a number.
+
 2011-06-23  Martin Rudalics  <rudalics@gmx.at>
 
 	* window.el (get-lru-window, get-mru-window)
diff --git a/lisp/net/tramp-sh.el b/lisp/net/tramp-sh.el
index 025b4ab6cf3..e340ddc6cb0 100644
--- a/lisp/net/tramp-sh.el
+++ b/lisp/net/tramp-sh.el
@@ -4661,6 +4661,8 @@ This is used internally by `tramp-file-mode-from-int'."
   (and
    ;; It shall be an out-of-band method.
    (tramp-get-method-parameter (tramp-file-name-method vec) 'tramp-copy-program)
+   ;; There must be a size, otherwise the file doesn't exist.
+   (numberp size)
    ;; Either the file size is large enough, or (in rare cases) there
    ;; does not exist a remote encoding.
    (or (null tramp-copy-size-limit)