Mercurial > emacs

changeset 100316:5d2112103019

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
* net/tramp.el (top): Don't fail if there is no current message.
author Juanma Barranquero <lekktu@gmail.com>
date Wed, 10 Dec 2008 10:21:03 +0000
parents da90832da238
children 7dde9e3fb6ae
files lisp/ChangeLog lisp/net/tramp.el
diffstat 2 files changed, 6 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/ChangeLog	Wed Dec 10 10:02:50 2008 +0000
+++ b/lisp/ChangeLog	Wed Dec 10 10:21:03 2008 +0000
@@ -1,3 +1,7 @@
+2008-12-10  Juanma Barranquero  <lekktu@gmail.com>
+
+	* net/tramp.el (top): Don't fail if there is no current message.
+
 2008-12-10  Kenichi Handa  <handa@m17n.org>
 
 	* international/fontset.el (setup-default-fontset): Add an entry
--- a/lisp/net/tramp.el	Wed Dec 10 10:02:50 2008 +0000
+++ b/lisp/net/tramp.el	Wed Dec 10 10:21:03 2008 +0000
@@ -7470,7 +7470,8 @@
       (unload-feature 'tramp 'force)
     (error nil)))
 
-(when (and load-in-progress (string-match "Loading tramp..." (current-message)))
+(when (and load-in-progress (string-match "Loading tramp..."
+					  (or (current-message) "")))
   (message "Loading tramp...done"))
 
 (provide 'tramp)