[Emacs-diffs] trunk r113934: * net/tramp.el:

[Michael Albinus]

------------------------------------------------------------
revno: 113934
revision-id: address@hidden
parent: address@hidden
committer: Michael Albinus <address@hidden>
branch nick: trunk
timestamp: Sat 2013-08-17 12:20:15 +0200
message:
  * net/tramp.el:
  * net/tramp-adb.el:
  * net/tramp-cmds.el:
  * net/tramp-ftp.el:
  * net/tramp-gvfs.el:
  * net/tramp-gw.el:
  * net/tramp-sh.el: Don't wrap external variable declarations by
  `eval-when-compile'.
modified:
  lisp/ChangeLog                 changelog-20091113204419-o5vbwnq5f7feedwu-1432
  lisp/net/tramp-adb.el          trampadb.el-20121204164216-03wyr5miam215d7f-1
  lisp/net/tramp-cmds.el         
trampcmds.el-20091113204419-o5vbwnq5f7feedwu-7524
  lisp/net/tramp-ftp.el          
trampftp.el-20091113204419-o5vbwnq5f7feedwu-2514
  lisp/net/tramp-gvfs.el         
trampgvfs.el-20091113204419-o5vbwnq5f7feedwu-10898
  lisp/net/tramp-gw.el           trampgw.el-20091113204419-o5vbwnq5f7feedwu-5067
  lisp/net/tramp-sh.el           trampsh.el-20100913133439-a1faifh29eqoi4nh-1
  lisp/net/tramp.el              tramp.el-20091113204419-o5vbwnq5f7feedwu-2427

=== modified file 'lisp/ChangeLog'
--- a/lisp/ChangeLog    2013-08-16 15:17:21 +0000
+++ b/lisp/ChangeLog    2013-08-17 10:20:15 +0000
@@ -1,3 +1,14 @@
+2013-08-17  Michael Albinus  <address@hidden>
+
+       * net/tramp.el:
+       * net/tramp-adb.el:
+       * net/tramp-cmds.el:
+       * net/tramp-ftp.el:
+       * net/tramp-gvfs.el:
+       * net/tramp-gw.el:
+       * net/tramp-sh.el: Don't wrap external variable declarations by
+       `eval-when-compile'.
+
 2013-08-16  Lars Magne Ingebrigtsen  <address@hidden>
 
        * net/shr.el (shr-rescale-image): Use ImageMagick even for GIFs

=== modified file 'lisp/net/tramp-adb.el'
--- a/lisp/net/tramp-adb.el     2013-08-15 17:02:09 +0000
+++ b/lisp/net/tramp-adb.el     2013-08-17 10:20:15 +0000
@@ -37,9 +37,8 @@
 (require 'time-date)
 
 ;; Pacify byte-compiler.
-(eval-when-compile
-  (defvar directory-sep-char)
-  (defvar dired-move-to-filename-regexp))
+(defvar directory-sep-char)
+(defvar dired-move-to-filename-regexp)
 
 (defcustom tramp-adb-program "adb"
   "Name of the Android Debug Bridge program."

=== modified file 'lisp/net/tramp-cmds.el'
--- a/lisp/net/tramp-cmds.el    2013-08-16 12:41:17 +0000
+++ b/lisp/net/tramp-cmds.el    2013-08-17 10:20:15 +0000
@@ -31,9 +31,8 @@
 (require 'tramp)
 
 ;; Pacify byte-compiler.
-(eval-when-compile
-  (defvar reporter-eval-buffer)
-  (defvar reporter-prompt-for-summary-p))
+(defvar reporter-eval-buffer)
+(defvar reporter-prompt-for-summary-p)
 
 (defun tramp-list-tramp-buffers ()
   "Return a list of all Tramp connection buffers."

=== modified file 'lisp/net/tramp-ftp.el'
--- a/lisp/net/tramp-ftp.el     2013-08-15 17:02:09 +0000
+++ b/lisp/net/tramp-ftp.el     2013-08-17 10:20:15 +0000
@@ -33,10 +33,10 @@
 ;; Pacify byte-compiler.
 (eval-when-compile
   (require 'cl)
-  (require 'custom)
-  (defvar ange-ftp-ftp-name-arg)
-  (defvar ange-ftp-ftp-name-res)
-  (defvar ange-ftp-name-format))
+  (require 'custom))
+(defvar ange-ftp-ftp-name-arg)
+(defvar ange-ftp-ftp-name-res)
+(defvar ange-ftp-name-format)
 
 ;; Disable Ange-FTP from file-name-handler-alist.
 ;; To handle EFS, the following functions need to be dealt with:

=== modified file 'lisp/net/tramp-gvfs.el'
--- a/lisp/net/tramp-gvfs.el    2013-08-15 17:02:09 +0000
+++ b/lisp/net/tramp-gvfs.el    2013-08-17 10:20:15 +0000
@@ -107,8 +107,8 @@
 ;; Pacify byte-compiler.
 (eval-when-compile
   (require 'cl)
-  (require 'custom)
-  (defvar ls-lisp-use-insert-directory-program))
+  (require 'custom))
+(defvar ls-lisp-use-insert-directory-program)
 
 ;;;###tramp-autoload
 (defcustom tramp-gvfs-methods '("dav" "davs" "obex" "synce")

=== modified file 'lisp/net/tramp-gw.el'
--- a/lisp/net/tramp-gw.el      2013-08-15 17:02:09 +0000
+++ b/lisp/net/tramp-gw.el      2013-08-17 10:20:15 +0000
@@ -36,8 +36,8 @@
 ;; Pacify byte-compiler.
 (eval-when-compile
   (require 'cl)
-  (require 'custom)
-  (defvar socks-noproxy))
+  (require 'custom))
+(defvar socks-noproxy)
 
 ;; We don't add the following methods to `tramp-methods', in order to
 ;; exclude them from file name completion.

=== modified file 'lisp/net/tramp-sh.el'
--- a/lisp/net/tramp-sh.el      2013-08-15 17:02:09 +0000
+++ b/lisp/net/tramp-sh.el      2013-08-17 10:20:15 +0000
@@ -31,10 +31,10 @@
 ;; Pacify byte-compiler.
 (eval-when-compile
   (require 'cl)
-  (require 'dired)
-  (defvar directory-sep-char)
-  (defvar tramp-gw-tunnel-method)
-  (defvar tramp-gw-socks-method))
+  (require 'dired))
+(defvar directory-sep-char)
+(defvar tramp-gw-tunnel-method)
+(defvar tramp-gw-socks-method)
 
 (defcustom tramp-inline-compress-start-size 4096
   "The minimum size of compressing where inline transfer.

=== modified file 'lisp/net/tramp.el'
--- a/lisp/net/tramp.el 2013-08-15 17:02:09 +0000
+++ b/lisp/net/tramp.el 2013-08-17 10:20:15 +0000
@@ -61,12 +61,12 @@
 
 ;; Pacify byte-compiler.
 (eval-when-compile
-  (require 'cl)
-  (defvar bkup-backup-directory-info)
-  (defvar directory-sep-char)
-  (defvar eshell-path-env)
-  (defvar file-notify-descriptors)
-  (defvar outline-regexp))
+  (require 'cl))
+(defvar bkup-backup-directory-info)
+(defvar directory-sep-char)
+(defvar eshell-path-env)
+(defvar file-notify-descriptors)
+(defvar outline-regexp)
 
 ;;; User Customizable Internal Variables: