Mercurial > emacs

diff lisp/international/ogonek.el @ 38436:b174db545cfd

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Some fixes to follow coding conventions.
author Pavel Janík <Pavel@Janik.cz>
date Mon, 16 Jul 2001 12:23:00 +0000
parents bb90823eec2c
children 64274328203b
line wrap: on
line diff
--- a/lisp/international/ogonek.el	Mon Jul 16 12:22:17 2001 +0000
+++ b/lisp/international/ogonek.el	Mon Jul 16 12:23:00 2001 +0000
@@ -318,7 +318,7 @@
           (format "%s (default %s): " prompt 
                   (char-to-string (eval default-prefix-var))))))
     (if (> (length prefix-string) 1)
-        (error "! Only one character expected.") 
+        (error "! Only one character expected") 
       ;; set the default prefix character to the one just read
       (set default-prefix-var
            (if (string= prefix-string "") 
@@ -333,7 +333,7 @@
 the list `ogonek-name-encoding-alist'"
   (let ((code-list (assoc encoding ogonek-name-encoding-alist)))
     (if (null code-list)
-      (error "! Name `%s' not known in `ogonek-name-encoding-alist'."
+      (error "! Name `%s' not known in `ogonek-name-encoding-alist'"
                encoding)
       (cdr code-list))))