Mercurial > emacs
changeset 110390:670fe38909f5
* net/tramp-compat.el (tramp-compat-with-temp-message): Make it a
defmacro.
| author | Michael Albinus <michael.albinus@gmx.de> |
|---|---|
| date | Fri, 17 Sep 2010 09:58:07 +0200 |
| parents | 4fd09e92be41 |
| children | bbc922c0cfa8 |
| files | lisp/ChangeLog lisp/net/tramp-compat.el |
| diffstat | 2 files changed, 6 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/ChangeLog Fri Sep 17 09:00:12 2010 +0200 +++ b/lisp/ChangeLog Fri Sep 17 09:58:07 2010 +0200 @@ -1,3 +1,8 @@ +2010-09-17 Michael Albinus <michael.albinus@gmx.de> + + * net/tramp-compat.el (tramp-compat-with-temp-message): Make it a + defmacro. + 2010-09-16 Chong Yidong <cyd@stupidchicken.com> * mail/sendmail.el: Add "*unsent mail*" to
--- a/lisp/net/tramp-compat.el Fri Sep 17 09:00:12 2010 +0200 +++ b/lisp/net/tramp-compat.el Fri Sep 17 09:58:07 2010 +0200 @@ -184,7 +184,7 @@ ;; `with-temp-message' does not exists in XEmacs. (if (fboundp 'with-temp-message) (defalias 'tramp-compat-with-temp-message 'with-temp-message) - (defun tramp-compat-with-temp-message (message &rest body) + (defmacro tramp-compat-with-temp-message (message &rest body) "Display MESSAGE temporarily if non-nil while BODY is evaluated." `(progn ,@body)))