2 files changed, 1 insertions, 6 deletions

diff --git a/lisp/net/tramp-adb.el b/lisp/net/tramp-adb.el
index 595e0ef6722..88dea6a7e35 100644
--- a/lisp/net/tramp-adb.el
+++ b/lisp/net/tramp-adb.el
@@ -36,6 +36,7 @@
 (require 'tramp)
 
 ;; Pacify byte-compiler.
+(defvar directory-listing-before-filename-regexp)
 (defvar directory-sep-char)
 
 ;;;###tramp-autoload
diff --git a/lisp/net/tramp-compat.el b/lisp/net/tramp-compat.el
index e6451956dc4..7157ac25fa2 100644
--- a/lisp/net/tramp-compat.el
+++ b/lisp/net/tramp-compat.el
@@ -105,12 +105,6 @@
   (unless (boundp 'remote-file-name-inhibit-cache)
     (defvar remote-file-name-inhibit-cache nil))
 
-  ;; `directory-listing-before-filename-regexp' does not exist in
-  ;; XEmacs.  Since we use it only in tramp-adb.el, it doesn't harm to
-  ;; declare it here.
-  (unless (boundp 'directory-listing-before-filename-regexp)
-      (defvar directory-listing-before-filename-regexp nil))
-
   ;; For not existing functions, or functions with a changed argument
   ;; list, there are compiler warnings.  We want to avoid them in
   ;; cases we know what we do.