From 09388e760d7b1683aa5ee2684d246a9bec0c0b0e Mon Sep 17 00:00:00 2001
From: Michael Albinus <michael.albinus@gmx.de>
Date: Sun, 23 Oct 2011 17:59:54 +0200
Subject: [PATCH] Sync with Tramp 2.2.3.

* net/tramp-cache.el (top): Pacify byte-compiler using
`init-file-user' and `site-run-file'.

* net/trampver.el: Update release number.
---
 lisp/ChangeLog          | 9 +++++++++
 lisp/net/tramp-cache.el | 3 ++-
 lisp/net/trampver.el    | 4 ++--
 3 files changed, 13 insertions(+), 3 deletions(-)

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 09e2e7dc1de..8ceb3617176 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,12 @@
+2011-10-23  Michael Albinus  <michael.albinus@gmx.de>
+
+	Sync with Tramp 2.2.3.
+
+	* net/tramp-cache.el (top): Pacify byte-compiler using
+	`init-file-user' and `site-run-file'.
+
+	* net/trampver.el: Update release number.
+
 2011-10-23  Chong Yidong  <cyd@gnu.org>
 
 	* files.el (toggle-read-only): Remove obsolete comment about
diff --git a/lisp/net/tramp-cache.el b/lisp/net/tramp-cache.el
index 9397025cb60..b35ca3bbd18 100644
--- a/lisp/net/tramp-cache.el
+++ b/lisp/net/tramp-cache.el
@@ -383,7 +383,8 @@ for all methods.  Resulting data are derived from connection history."
 	   ;; When "emacs -Q" has been called, both variables are nil.
 	   ;; We do not load the persistency file then, in order to
 	   ;; have a clean test environment.
-	   (or init-file-user site-run-file))
+	   (or (and (boundp 'init-file-user) (symbol-value 'init-file-user))
+	       (and (boundp 'site-run-file) (symbol-value 'site-run-file))))
   (condition-case err
       (with-temp-buffer
 	(insert-file-contents tramp-persistency-file-name)
diff --git a/lisp/net/trampver.el b/lisp/net/trampver.el
index 5492441ac77..fc0c936c407 100644
--- a/lisp/net/trampver.el
+++ b/lisp/net/trampver.el
@@ -31,7 +31,7 @@
 ;; should be changed only there.
 
 ;;;###tramp-autoload
-(defconst tramp-version "2.2.3-pre"
+(defconst tramp-version "2.2.3-24.1"
   "This version of Tramp.")
 
 ;;;###tramp-autoload
@@ -44,7 +44,7 @@
 		      (= emacs-major-version 21)
 		      (>= emacs-minor-version 4)))
 	     "ok"
-	   (format "Tramp 2.2.3-pre is not fit for %s"
+	   (format "Tramp 2.2.3-24.1 is not fit for %s"
 		   (when (string-match "^.*$" (emacs-version))
 		     (match-string 0 (emacs-version)))))))
   (unless (string-match "\\`ok\\'" x) (error "%s" x)))
-- 
2.11.4.GIT