[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] emacs/lisp/net tramp.el
From: |
Michael Albinus |
Subject: |
[Emacs-diffs] emacs/lisp/net tramp.el |
Date: |
Thu, 04 Dec 2008 20:43:23 +0000 |
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
- [Emacs-diffs] emacs/lisp/net tramp.el,
Michael Albinus <=