]> git.eshelyaron.com Git - emacs.git/commitdiff
* net/tramp.el (top): Don't fail if there is no current message.
authorJuanma Barranquero <lekktu@gmail.com>
Wed, 10 Dec 2008 10:21:03 +0000 (10:21 +0000)
committerJuanma Barranquero <lekktu@gmail.com>
Wed, 10 Dec 2008 10:21:03 +0000 (10:21 +0000)
lisp/ChangeLog
lisp/net/tramp.el

index e26cdc62dd29b7736453e9b71effc9e4a89fe7fa..284745de5b9fa010a59d694b197e831a822890b3 100644 (file)
@@ -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
index 83f87472dfd432ad709bcdafdf5275093fb72a5f..031d2fecc3285eb4c241b9b39de98efb4d80256d 100644 (file)
@@ -7470,7 +7470,8 @@ Only works for Bourne-like shells."
       (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)