summaryrefslogtreecommitdiff
path: root/lisp/international
diff options
context:
space:
mode:
authorPavel Janík <Pavel@Janik.cz>2001-07-16 12:23:00 +0000
committerPavel Janík <Pavel@Janik.cz>2001-07-16 12:23:00 +0000
commite8af40eed41d6c61ea6a0649512c4b09afcb1bfa (patch)
tree588654cb6c38a93c432bfae53ccbf36569e3cf23 /lisp/international
parent4cba8c0bdcce038e6966aab82d08859d796e69d0 (diff)
downloademacs-e8af40eed41d6c61ea6a0649512c4b09afcb1bfa.tar.gz
Some fixes to follow coding conventions.
Diffstat (limited to 'lisp/international')
-rw-r--r--lisp/international/isearch-x.el2
-rw-r--r--lisp/international/iso-cvt.el2
-rw-r--r--lisp/international/ogonek.el4
-rw-r--r--lisp/international/quail.el2
-rw-r--r--lisp/international/utf-8.el4
5 files changed, 9 insertions, 5 deletions
diff --git a/lisp/international/isearch-x.el b/lisp/international/isearch-x.el
index bd49321dd5e..6f45540b292 100644
--- a/lisp/international/isearch-x.el
+++ b/lisp/international/isearch-x.el
@@ -25,6 +25,8 @@
;; Free Software Foundation, Inc., 59 Temple Place - Suite 330,
;; Boston, MA 02111-1307, USA.
+;;; Commentary:
+
;;; Code:
;;;###autoload
diff --git a/lisp/international/iso-cvt.el b/lisp/international/iso-cvt.el
index 44821419a31..7374c7f5d41 100644
--- a/lisp/international/iso-cvt.el
+++ b/lisp/international/iso-cvt.el
@@ -1,4 +1,4 @@
-;;; iso-cvt.-el -- translate ISO 8859-1 from/to various encodings -*- coding: iso-latin-1 -*-
+;;; iso-cvt.el --- translate ISO 8859-1 from/to various encodings -*- coding: iso-latin-1 -*-
;; This file was formerly called gm-lingo.el.
;; Copyright (C) 1993, 1994, 1995, 1996, 1998, 2000 Free Software Foundation, Inc.
diff --git a/lisp/international/ogonek.el b/lisp/international/ogonek.el
index 43a051f9f7e..6f8a30b8f05 100644
--- a/lisp/international/ogonek.el
+++ b/lisp/international/ogonek.el
@@ -318,7 +318,7 @@ PROMPT is a string to be shown when the user is asked for a new prefix."
(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 @@ Before returning a result test whether the string ENCODING is in
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))))
diff --git a/lisp/international/quail.el b/lisp/international/quail.el
index 088fb84e8e7..6a26b344bfa 100644
--- a/lisp/international/quail.el
+++ b/lisp/international/quail.el
@@ -1,4 +1,4 @@
-;;; quail.el --- Provides simple input method for multilingual text
+;;; quail.el --- provides simple input method for multilingual text
;; Copyright (C) 1995, 2000 Electrotechnical Laboratory, JAPAN.
;; Licensed to the Free Software Foundation.
diff --git a/lisp/international/utf-8.el b/lisp/international/utf-8.el
index 1bb0c52d3d3..85f60409567 100644
--- a/lisp/international/utf-8.el
+++ b/lisp/international/utf-8.el
@@ -1,4 +1,4 @@
-;;; utf-8.el --- Limited UTF-8 decoding/encoding support
+;;; utf-8.el --- limited UTF-8 decoding/encoding support
;; Copyright (C) 2001 Electrotechnical Laboratory, JAPAN.
;; Licensed to the Free Software Foundation.
@@ -375,3 +375,5 @@ lower-casing commands won't work with them."
(valid-codes (0 . 255))))
(define-coding-system-alias 'utf-8 'mule-utf-8)
+
+;;; utf-8.el ends here