Doc and coding conventions fixes.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index bf3f318f47da559aca43ffad6dcddd2e6f69ebc5..244414109cab23b2e257c4da40aea87beed4f667 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,12 @@
+2001-07-17  Pavel Jan\e,Bm\e(Bk  <Pavel@Janik.cz>
+
+       * international/iso-transl.el: Fix typo in the header of the file.
+
+       * textmodes/picture.el (picture): Doc fix.
+
+       * international/ja-dic-cnv.el (skkdic-convert): Some fixes to
+       follow coding conventions in generated files.
+
 2001-07-17  Eli Zaretskii  <eliz@is.elta.co.il>
 
        * toolbar/tool-bar.el (tool-bar-add-item-from-menu) 

diff --git a/lisp/international/iso-transl.el b/lisp/international/iso-transl.el
index 8cc27b120f76bbbbf3ce02eef47d426060f7dc50..3cd650c82275a2b296cb9d282ef0fe3c72ec3353 100644 (file)
--- a/lisp/international/iso-transl.el
+++ b/lisp/international/iso-transl.el
@@ -1,4 +1,4 @@
-;;; iso-transl.el --- keyboard input definitions for ISO 8859/1
+;;; iso-transl.el --- keyboard input definitions for ISO 8859-1
 
 ;; Copyright (C) 1987, 1993, 1994, 1995 Free Software Foundation, Inc.
 

diff --git a/lisp/international/ja-dic-cnv.el b/lisp/international/ja-dic-cnv.el
index 81b9fdc498ce56c9de98c72c189588431304ce18..113d00f572a742957f10d17240ac3cf647aa3b85 100644 (file)
--- a/lisp/international/ja-dic-cnv.el
+++ b/lisp/international/ja-dic-cnv.el
@@ -358,13 +358,14 @@ The name of generated file is specified by the variable `ja-dic-filename'."
       (set-buffer buf)
       (erase-buffer)
       (buffer-disable-undo)
-      (insert ";; ja-dic.el -- dictionary for Japanese input method\n"
+      (insert ";;; ja-dic.el --- dictionary for Japanese input method\n"
              ";;\tGenerated by the command `skkdic-convert'\n"
              ";;\tDate: " (current-time-string) "\n"
              ";;\tOriginal SKK dictionary file: "
              (file-name-nondirectory filename)
              "\n\n"
-             ";;; Comment:\n\n"
+             ";; This file is part of GNU Emacs.\n\n"
+             ";;; Commentary:\n\n"
              ";; Do byte-compile this file again after any modification.\n\n"
              ";;; Start of the header of the original SKK dictionary.\n\n")
       (set-buffer skkbuf)
@@ -415,7 +416,7 @@ The name of generated file is specified by the variable `ja-dic-filename'."
        (save-excursion
          (set-buffer buf)
          (goto-char (point-max))
-         (insert ";;\n(provide 'ja-dic)\n\n;; ja-dic.el ends here\n")))
+         (insert ";;\n(provide 'ja-dic)\n\n;;; ja-dic.el ends here\n")))
 
       ;; Save the working buffer.
       (set-buffer buf)

diff --git a/lisp/textmodes/picture.el b/lisp/textmodes/picture.el
index 25e60eb48096ec61a64a1e2ca01d9fee581f5979..4f4a1650d99248ab52b5b4590d73a42850298826 100644 (file)
--- a/lisp/textmodes/picture.el
+++ b/lisp/textmodes/picture.el
@@ -33,7 +33,7 @@
 ;;; Code:
 
 (defgroup picture nil
-  "Picture mode  --- editing using quarter-plane screen model."
+  "Picture mode --- editing using quarter-plane screen model."
   :prefix "picture-"
   :group 'editing)