Mercurial > emacs
changeset 57748:a5bb249b0f3b
(shadow-copy-files): Use interactive-p
only to control whether to print a message.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Wed, 27 Oct 2004 17:41:24 +0000 |
| parents | 97a3201f82ef |
| children | 08eb19d9ee4b |
| files | lisp/shadowfile.el |
| diffstat | 1 files changed, 3 insertions(+), 2 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/shadowfile.el Wed Oct 27 17:40:19 2004 +0000 +++ b/lisp/shadowfile.el Wed Oct 27 17:41:24 2004 +0000 @@ -518,8 +518,9 @@ `shadow-save-buffers-kill-emacs', so it is not usually necessary to call it manually." (interactive "P") - (if (and (not shadow-files-to-copy) (interactive-p)) - (message "No files need to be shadowed.") + (if (not shadow-files-to-copy) + (if (interactive-p) + (message "No files need to be shadowed.")) (save-excursion (map-y-or-n-p (function (lambda (pair)