aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorRichard M. Stallman1998-08-13 23:02:48 +0000
committerRichard M. Stallman1998-08-13 23:02:48 +0000
commit4be9beaf4e4120f67dbf525a84789525bfef2ef8 (patch)
tree7c05fde6cf156905b29a57c141c4103bd2a28bbe
parent6f76277fc69bb3691cba04d0edbb7d5021a7e24b (diff)
downloademacs-4be9beaf4e4120f67dbf525a84789525bfef2ef8.tar.gz
emacs-4be9beaf4e4120f67dbf525a84789525bfef2ef8.zip
(quail-update-leim-list-file): Fix message syntax.
-rw-r--r--lisp/international/quail.el4
1 files 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."
1981 (error 1981 (error
1982 ;; Delete the remaining contents because it seems that 1982 ;; Delete the remaining contents because it seems that
1983 ;; this file is broken. 1983 ;; this file is broken.
1984 (message "Garbages in %s deleted" leim-list) 1984 (message "Garbage in %s deleted" leim-list)
1985 (delete-region pos (point-max))))))) 1985 (delete-region pos (point-max)))))))
1986 1986
1987 ;; Search for `quail' subdirector under each DIRNAMES. 1987 ;; Search for `quail' subdirector under each DIRNAMES.
@@ -1992,7 +1992,7 @@ of each directory."
1992 (setq dirname (expand-file-name quail-directory-name (car l))) 1992 (setq dirname (expand-file-name quail-directory-name (car l)))
1993 (if (file-readable-p dirname) 1993 (if (file-readable-p dirname)
1994 (setq quail-dirs (cons dirname quail-dirs)) 1994 (setq quail-dirs (cons dirname quail-dirs))
1995 (message "%s doesn't has `%s' subdirectory, just ignored" 1995 (message "%s doesn't have `%s' subdirectory, just ignored"
1996 (car l) quail-directory-name) 1996 (car l) quail-directory-name)
1997 (setq quail-dirs (cons nil quail-dirs))) 1997 (setq quail-dirs (cons nil quail-dirs)))
1998 (setq l (cdr l))) 1998 (setq l (cdr l)))