From cd2d58c1c81d608d6e1aefe1eb8a3d1f1cd60540 Mon Sep 17 00:00:00 2001 From: Paul Eggert Date: Sat, 3 Jan 2015 18:28:35 -0800 Subject: Less 'make' chatter in batch mode * admin/unidata/unidata-gen.el (unidata-gen-files): * lisp/emacs-lisp/autoload.el (autoload-generate-file-autoloads): * lisp/emacs-lisp/bytecomp.el (byte-compile-file): * lisp/files.el (save-buffer, basic-save-buffer): * lisp/international/quail.el (quail-update-leim-list-file): Don't output messages like "Generating ..." in batch mode. --- lisp/international/quail.el | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'lisp/international/quail.el') diff --git a/lisp/international/quail.el b/lisp/international/quail.el index f194b93526e..2755fd68bef 100644 --- a/lisp/international/quail.el +++ b/lisp/international/quail.el @@ -2985,7 +2985,7 @@ of each directory." quail-dirs list-buf pkg-list pos) (if (not (file-writable-p leim-list)) (error "Can't write to file \"%s\"" leim-list)) - (message "Updating %s ..." leim-list) + (or noninteractive (message "Updating %s ..." leim-list)) (setq list-buf (find-file-noselect leim-list)) ;; At first, clean up the file. @@ -3077,7 +3077,7 @@ of each directory." (let ((coding-system-for-write 'utf-8)) (save-buffer 0))) (kill-buffer list-buf) - (message "Updating %s ... done" leim-list))) + (or noninteractive (message "Updating %s ... done" leim-list)))) (defun quail-advice (args) "Advise users about the characters input by the current Quail package. -- cgit v1.2.1