[Emacs-diffs] emacs/lisp/net tramp.el

[Michael Albinus]

CVSROOT:        /sources/emacs
Module name:    emacs
Changes by:     Michael Albinus <albinus>       08/12/04 20:43:23

Modified files:
        lisp/net       : tramp.el 

Log message:
        * net/tramp.el (top): Write a message, when loading Tramp.

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/emacs/lisp/net/tramp.el?cvsroot=emacs&r1=1.215&r2=1.216

Patches:
Index: tramp.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/net/tramp.el,v
retrieving revision 1.215
retrieving revision 1.216
diff -u -b -r1.215 -r1.216
--- tramp.el    26 Nov 2008 06:09:17 -0000      1.215
+++ tramp.el    4 Dec 2008 20:43:23 -0000       1.216
@@ -59,6 +59,13 @@
 
 ;;; Code:
 
+;; Since Emacs 23.1, loading messages have been disabled during
+;; autoload.  However, loading Tramp takes a while, and it could
+;; happen while typing a filename in the minibuffer.  Therefore, Tramp
+;; shall inform about.
+(when (and load-in-progress (null (current-message)))
+  (message "Loading tramp..."))
+
 ;; The Tramp version number and bug report address, as prepared by configure.
 (require 'trampver)
 (add-hook 'tramp-unload-hook
@@ -7463,6 +7470,9 @@
       (unload-feature 'tramp 'force)
     (error nil)))
 
+(when (and load-in-progress (string-match "Loading tramp..." 
(current-message)))
+  (message "Loading tramp...done"))
+
 (provide 'tramp)
 
 ;;; TODO:
@@ -7562,6 +7572,9 @@
 ;;   "-t". (Markus Triska)
 ;; * Support IPv6 hostnames.  Use "/[some:ip:v6:address:for:tramp]:/",
 ;;   which is the syntax used on web browsers. (Óscar Fuentes)
+;; * Add gvfs support.
+;; * Set `tramp-copy-size-limit' to 0, when there is no remote
+;;   encoding routine.
 
 ;; Functions for file-name-handler-alist:
 ;; diff-latest-backup-file -- in diff.el