From 4be9beaf4e4120f67dbf525a84789525bfef2ef8 Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Thu, 13 Aug 1998 23:02:48 +0000 Subject: [PATCH] (quail-update-leim-list-file): Fix message syntax. --- lisp/international/quail.el | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/lisp/international/quail.el b/lisp/international/quail.el index 8dae9fb627a..6f24ba5202f 100644 --- a/lisp/international/quail.el +++ b/lisp/international/quail.el @@ -1981,7 +1981,7 @@ of each directory." (error ;; Delete the remaining contents because it seems that ;; this file is broken. - (message "Garbages in %s deleted" leim-list) + (message "Garbage in %s deleted" leim-list) (delete-region pos (point-max))))))) ;; Search for `quail' subdirector under each DIRNAMES. @@ -1992,7 +1992,7 @@ of each directory." (setq dirname (expand-file-name quail-directory-name (car l))) (if (file-readable-p dirname) (setq quail-dirs (cons dirname quail-dirs)) - (message "%s doesn't has `%s' subdirectory, just ignored" + (message "%s doesn't have `%s' subdirectory, just ignored" (car l) quail-directory-name) (setq quail-dirs (cons nil quail-dirs))) (setq l (cdr l))) -- 2.39.5