Improving doc strings.

diff --git a/lisp/language/cyrillic.el b/lisp/language/cyrillic.el
index dbf51acbd52bf33ab0e475fe94b94a0a08ca3cc8..43d91e46a3d1badacd56246bde0566376a6f9f57 100644 (file)
--- a/lisp/language/cyrillic.el
+++ b/lisp/language/cyrillic.el
@@ -36,7 +36,7 @@
 
 (make-coding-system
  'cyrillic-iso-8bit 2 ?5
- "ISO 2022 based 8-bit encoding for Cyrillic script (MIME:ISO-8859-5)"
+ "ISO 2022 based 8-bit encoding for Cyrillic script (MIME:ISO-8859-5)."
  '(ascii cyrillic-iso8859-5  nil nil
    nil nil nil nil nil nil nil)
  '((safe-charsets ascii cyrillic-iso8859-5)
@@ -111,7 +111,8 @@
  ;; but it is also used for Korean.
  ;; So people who use koi8 for languages other than Russian
  ;; will have to forgive us.
- ?R "KOI8 8-bit encoding for Cyrillic (MIME: KOI8-R)"
+ ?R
+ "KOI8 8-bit encoding for Cyrillic (MIME: KOI8-R)."
  '(ccl-decode-koi8 . ccl-encode-koi8)
  `((safe-chars . ,(let ((table (make-char-table 'safe-chars))
                        (i 0))
@@ -202,7 +203,7 @@
             
 (make-coding-system
  'cyrillic-alternativnyj 4 ?A
- "ALTERNATIVNYJ 8-bit encoding for Cyrillic"
+ "ALTERNATIVNYJ 8-bit encoding for Cyrillic."
  '(ccl-decode-alternativnyj . ccl-encode-alternativnyj)
  `((safe-chars . ,(let ((table (make-char-table 'safe-chars))
                        (i 0))

diff --git a/lisp/language/czech.el b/lisp/language/czech.el
index 221662094429533c4d7c89d7abc193b2efacb37d..32b2a7cd7fad5e11177da246b824ff99a28b9c1c 100644 (file)
--- a/lisp/language/czech.el
+++ b/lisp/language/czech.el
@@ -42,7 +42,7 @@
           (documentation . "\
 This language environment is almost the same as Latin-2,
 but default input method is set to \"czech\",
-and select's the Czech tutorial."))
+and the Czech tutorial is selected."))
  '("European"))
 
 (provide 'czech)

diff --git a/lisp/language/european.el b/lisp/language/european.el
index 64664a544e5ab5242cc8bd0b218743c17d827b3f..959c1357f144fe7db8289cac0ae923e474a6957f 100644 (file)
--- a/lisp/language/european.el
+++ b/lisp/language/european.el
@@ -34,7 +34,7 @@
 
 (make-coding-system
  'iso-latin-1 2 ?1
- "ISO 2022 based 8-bit encoding for Latin-1 (MIME:ISO-8859-1)"
+ "ISO 2022 based 8-bit encoding for Latin-1 (MIME:ISO-8859-1)."
  '(ascii latin-iso8859-1 nil nil
    nil nil nil nil nil nil nil nil nil nil nil nil t)
  '((safe-charsets ascii latin-iso8859-1)
@@ -76,7 +76,7 @@ Indonesian/Malay, Tagalog (Philippines), Swahili and Afrikaans."))
 
 (make-coding-system
  'iso-latin-2 2 ?2
- "ISO 2022 based 8-bit encoding (MIME:ISO-8859-2)"
+ "ISO 2022 based 8-bit encoding for Latin-2 (MIME:ISO-8859-2)."
  '(ascii latin-iso8859-2 nil nil
    nil nil nil nil nil nil nil)
  '((safe-charsets ascii latin-iso8859-2)
@@ -110,7 +110,7 @@ We also have specific language environments for the following languages:
 
 (make-coding-system
  'iso-latin-3 2 ?3
- "ISO 2022 based 8-bit encoding (MIME:ISO-8859-3)"
+ "ISO 2022 based 8-bit encoding for Latin-3 (MIME:ISO-8859-3)."
  '(ascii latin-iso8859-3 nil nil
    nil nil nil nil nil nil nil)
  '((safe-charsets ascii latin-iso8859-3)
@@ -138,7 +138,7 @@ These languages are supported with the Latin-3 (ISO-8859-3) character set:
 
 (make-coding-system
  'iso-latin-4 2 ?4
- "ISO 2022 based 8-bit encoding (MIME:ISO-8859-4)"
+ "ISO 2022 based 8-bit encoding for Latin-4 (MIME:ISO-8859-4)."
  '(ascii latin-iso8859-4 nil nil
    nil nil nil nil nil nil nil)
  '((safe-charsets ascii latin-iso8859-4)
@@ -166,7 +166,7 @@ These languages are supported with the Latin-4 (ISO-8859-4) character set:
 
 (make-coding-system
  'iso-latin-5 2 ?9
- "ISO 2022 based 8-bit encoding (MIME:ISO-8859-9)"
+ "ISO 2022 based 8-bit encoding for Latin-5 (MIME:ISO-8859-9)."
  '(ascii latin-iso8859-9 nil nil
    nil nil nil nil nil nil nil)
  '((safe-charsets ascii latin-iso8859-9)
@@ -185,8 +185,8 @@ These languages are supported with the Latin-4 (ISO-8859-4) character set:
             (input-method . "latin-5-postfix")
             (documentation . "\
 These languages are supported with the Latin-5 (ISO-8859-9) character set:
-Bulgarian, Byelorussian, (Slavic) Macedonian, Russian, Serbian and
-Ukranian."))                           ; says ISO 8859-1
+ Bulgarian, Byelorussian, (Slavic) Macedonian, Russian, Serbian and
+ Ukranian."))                          ; says ISO 8859-1
  '("European"))
 
 \f
@@ -195,7 +195,7 @@ Ukranian."))                                ; says ISO 8859-1
 (make-coding-system
  'iso-latin-8 2 ?W                     ; `W' for `Welsh', since `C'
                                        ; for `Celtic' is taken.
- "ISO 2022 based 8-bit encoding for Latin-8 (MIME:ISO-8859-14)"
+ "ISO 2022 based 8-bit encoding for Latin-8 (MIME:ISO-8859-14)."
  '(ascii latin-iso8859-14 nil nil
    nil nil nil nil nil nil nil nil nil nil nil nil t)
  '((safe-charsets ascii latin-iso8859-14)
@@ -217,15 +217,15 @@ Ukranian."))                              ; says ISO 8859-1
             (documentation . "\
 This language environment is a generic one for the Latin-8 (ISO-8859-14)
 character set which supports the Celtic languages, including those not
-covered by other ISO-8859 character sets: Welsh, Manx Gaelic and
-Irish Gaelic (old orthography)."))
+covered by other ISO-8859 character sets:
+ Welsh, Manx Gaelic and Irish Gaelic (old orthography)."))
  '("European"))
 \f
 ;; Latin-9 (ISO-8859-15)
 
 (make-coding-system
  'iso-latin-9 2 ?0                     ; `0' for `Latin-0'
- "ISO 2022 based 8-bit encoding for Latin-9 (MIME:ISO-8859-15)"
+ "ISO 2022 based 8-bit encoding for Latin-9 (MIME:ISO-8859-15)."
  '(ascii latin-iso8859-15 nil nil
    nil nil nil nil nil nil nil nil nil nil nil nil t)
  '((safe-charsets ascii latin-iso8859-15)
@@ -266,7 +266,8 @@ German (Deutsch Nord)       Guten Tag
 German (Deutsch S\e,A|\e(Bd)     Gr\e,A|_\e(B Gott")
            (documentation . "\
 This language environment is almost the same as Latin-1,
-but the default input method is set to \"german-postfix\"."))
+but the default input method is set to \"german-postfix\".
+Additionally, the tutorial is set to \"TUTORIAL.de\"."))
  '("European"))
 
 (set-language-info-alist
@@ -324,7 +325,7 @@ and it selects the Spanish tutorial."))
           (sample-text . "Er is een aantal manieren waarop je dit kan doen")
           (documentation . "\
 This language environment is almost the same as Latin-1,
-but select's the Dutch tutorial."))
+but the Dutch tutorial is selected."))
  '("European"))
 
 ;; For Turkish, the character set ISO-8859-9 (Latin-5) is used.  But,
@@ -568,7 +569,8 @@ but select's the Dutch tutorial."))
   "CCL program to encode Mac Roman")
 
 (make-coding-system
- 'mac-roman 4 ?M "Mac Roman Encoding"
+ 'mac-roman 4 ?M
+ "Mac Roman Encoding (MIME:MACINTOSH)."
  '(decode-mac-roman . encode-mac-roman)
  '((safe-chars . mac-roman-encoder)
    (valid-codes (0 . 255))

diff --git a/lisp/language/greek.el b/lisp/language/greek.el
index 39702866755c38cb2ae2c81acfe7450526cafca4..2066e8a4951a118700a357b52b3e5b5cf6011bc3 100644 (file)
--- a/lisp/language/greek.el
+++ b/lisp/language/greek.el
@@ -30,7 +30,7 @@
 
 (make-coding-system
  'greek-iso-8bit 2 ?7
- "ISO 2022 based 8-bit encoding for Greek (MIME:ISO-8859-7)"
+ "ISO 2022 based 8-bit encoding for Greek (MIME:ISO-8859-7)."
  '(ascii greek-iso8859-7 nil nil
    nil nil nil nil nil nil nil)
  '((safe-charsets ascii greek-iso8859-7)

diff --git a/lisp/language/hebrew.el b/lisp/language/hebrew.el
index f499a1ba053da0db942529defa0c970e14c573a8..ad349495a7b04d487bd1ee7abea4e05a099136ff 100644 (file)
--- a/lisp/language/hebrew.el
+++ b/lisp/language/hebrew.el
@@ -33,7 +33,7 @@
 
 (make-coding-system
  'hebrew-iso-8bit 2 ?8
- "ISO 2022 based 8-bit encoding for Hebrew (MIME:ISO-8859-8)"
+ "ISO 2022 based 8-bit encoding for Hebrew (MIME:ISO-8859-8)."
  '(ascii hebrew-iso8859-8 nil nil
    nil ascii-eol ascii-cntl nil nil nil nil nil t)
  '((safe-charsets ascii hebrew-iso8859-8)
@@ -62,7 +62,8 @@
  "Windows-1255" '((coding-priority windows-1255)
                  (coding-system windows-1255)
                  (features code-pages)
-                 (documentation . "Support for Windows-1255 encoding, e.g. for Yiddish.
+                 (documentation . "\
+Support for Windows-1255 encoding, e.g. for Yiddish.
 Right-to-left writing is not yet supported.")))
 
 (provide 'hebrew)

diff --git a/lisp/language/indian.el b/lisp/language/indian.el
index 74e7b170d57c1a290afcc50fb8322ee435a1bb7b..e2b581d6a79eec9ffa4dad057fba7cfc14ebdde4 100644 (file)
--- a/lisp/language/indian.el
+++ b/lisp/language/indian.el
@@ -31,7 +31,7 @@
 
 (make-coding-system
  'in-is13194 2 ?D
- "8-bit encoding for ASCII (MSB=0) and IS13194-Devanagari (MSB=1)"
+ "8-bit encoding for ASCII (MSB=0) and IS13194-Devanagari (MSB=1)."
  '(ascii indian-is13194 nil nil
    nil ascii-eol)
  '((safe-charsets ascii indian-is13194)

diff --git a/lisp/language/japanese.el b/lisp/language/japanese.el
index 20ec1aa2a50e8b4ee89afae5e899da5c56dc6e8e..dbb9d72cdb0266a96040b3be4b6434c1701b167a 100644 (file)
--- a/lisp/language/japanese.el
+++ b/lisp/language/japanese.el
@@ -31,7 +31,7 @@
 
 (make-coding-system
  'iso-2022-jp 2 ?J
- "ISO 2022 based 7bit encoding for Japanese (MIME:ISO-2022-JP)"
+ "ISO 2022 based 7bit encoding for Japanese (MIME:ISO-2022-JP)."
  '((ascii japanese-jisx0208-1978 japanese-jisx0208
          latin-jisx0201 japanese-jisx0212) nil nil nil
    short ascii-eol ascii-cntl seven)
@@ -43,7 +43,7 @@
 
 (make-coding-system
  'iso-2022-jp-2 2 ?J
- "ISO 2022 based 7bit encoding for CJK, Latin-1, and Greek (MIME:ISO-2022-JP-2)"
+ "ISO 2022 based 7bit encoding for CJK, Latin-1, and Greek (MIME:ISO-2022-JP-2)."
  '((ascii japanese-jisx0208-1978 japanese-jisx0208
          latin-jisx0201 japanese-jisx0212
          chinese-gb2312 korean-ksc5601) nil
@@ -57,7 +57,7 @@
 
 (make-coding-system
  'japanese-shift-jis 1 ?S
- "Shift-JIS 8-bit encoding for Japanese (MIME:SHIFT_JIS)"
+ "Shift-JIS 8-bit encoding for Japanese (MIME:SHIFT_JIS)."
  nil
  '((safe-charsets ascii japanese-jisx0208 japanese-jisx0208-1978
                  latin-jisx0201 katakana-jisx0201)
@@ -70,7 +70,7 @@
 
 (make-coding-system
  'japanese-iso-7bit-1978-irv 2 ?j
- "ISO 2022 based 7-bit encoding for Japanese JISX0208-1978 and JISX0201-Roman"
+ "ISO 2022 based 7-bit encoding for Japanese JISX0208-1978 and JISX0201-Roman."
  '((ascii japanese-jisx0208-1978 japanese-jisx0208
          latin-jisx0201 japanese-jisx0212 katakana-jisx0201 t) nil nil nil
    short ascii-eol ascii-cntl seven nil nil use-roman use-oldjis)
@@ -81,7 +81,7 @@
 
 (make-coding-system
  'japanese-iso-8bit 2 ?E
- "ISO 2022 based EUC encoding for Japanese (MIME:EUC-JP)"
+ "ISO 2022 based EUC encoding for Japanese (MIME:EUC-JP)."
  '(ascii japanese-jisx0208 katakana-jisx0201 japanese-jisx0212
    short ascii-eol ascii-cntl nil nil single-shift)
  '((safe-charsets ascii latin-jisx0201 japanese-jisx0208 japanese-jisx0208-1978

diff --git a/lisp/language/korean.el b/lisp/language/korean.el
index 466e7cce0b23c32d5829d232f9e5751e92d979e8..5398ef79ff68c7422f8882396617553096b5d082 100644 (file)
--- a/lisp/language/korean.el
+++ b/lisp/language/korean.el
@@ -30,7 +30,7 @@
 
 (make-coding-system
  'korean-iso-8bit 2 ?K
- "ISO 2022 based EUC encoding for Korean KSC5601 (MIME:EUC-KR)"
+ "ISO 2022 based EUC encoding for Korean KSC5601 (MIME:EUC-KR)."
  '(ascii korean-ksc5601 nil nil
    nil ascii-eol ascii-cntl)
  '((safe-charsets ascii korean-ksc5601)

diff --git a/lisp/language/lao.el b/lisp/language/lao.el
index d4c54d0c1652662f89cf928ea9a4f60af6021451..86d0caf8a46dc85021e397daf7723375794e3ee5 100644 (file)
--- a/lisp/language/lao.el
+++ b/lisp/language/lao.el
@@ -29,7 +29,7 @@
 
 (make-coding-system
  'lao 2 ?L
- "8-bit encoding for ASCII (MSB=0) and LAO (MSB=1)"
+ "8-bit encoding for ASCII (MSB=0) and LAO (MSB=1)."
  '(ascii lao nil nil
    nil nil)
  '((safe-charsets ascii lao)

diff --git a/lisp/language/slovak.el b/lisp/language/slovak.el
index cda4cbebe502b377cb025e02f9a351a5f85aa281..2f1a214f877fad319b84b291245fb4dfb63c7466 100644 (file)
--- a/lisp/language/slovak.el
+++ b/lisp/language/slovak.el
@@ -43,7 +43,7 @@
            (documentation . "\
 This language environment is almost the same as Latin-2,
 but default input method is set to \"slovak\",
-and select's the Slovak tutorial."))
+and the Slovak tutorial is selected."))
  '("European"))
 
 (provide 'slovak)

diff --git a/lisp/language/thai.el b/lisp/language/thai.el
index 30e1c194bd45f0b6efb76000b624fadcb69de0d0..931142f727b867461fa428c6cfe9134a5a85b59a 100644 (file)
--- a/lisp/language/thai.el
+++ b/lisp/language/thai.el
@@ -30,7 +30,7 @@
 
 (make-coding-system
  'thai-tis620 2 ?T
- "8-bit encoding for ASCII (MSB=0) and Thai TIS620 (MSB=1)"
+ "8-bit encoding for ASCII (MSB=0) and Thai TIS620 (MSB=1)."
  '(ascii thai-tis620 nil nil
    nil ascii-eol)
  '((safe-charsets ascii thai-tis620)

diff --git a/lisp/language/tibetan.el b/lisp/language/tibetan.el
index 4f9068c0263568a676466be8c50f844229397cdf..c993bb57c01bef0716175cff3dbe66ccd81e166c 100644 (file)
--- a/lisp/language/tibetan.el
+++ b/lisp/language/tibetan.el
@@ -84,7 +84,7 @@
 
 (make-coding-system
  'tibetan-iso-8bit 2 ?Q
- "8-bit encoding for ASCII (MSB=0) and TIBETAN (MSB=1)"
+ "8-bit encoding for ASCII (MSB=0) and TIBETAN (MSB=1)."
  '(ascii tibetan nil nil
    nil nil)
  '((safe-charsets ascii tibetan)

diff --git a/lisp/language/vietnamese.el b/lisp/language/vietnamese.el
index 92273b734aff3941438547b59e5326b7cfb326e0..c79c84e963182ee4818a494c897da0a614177190 100644 (file)
--- a/lisp/language/vietnamese.el
+++ b/lisp/language/vietnamese.el
@@ -133,7 +133,7 @@
 
 (make-coding-system
  'vietnamese-viscii 4 ?V
- "8-bit encoding for Vietnamese VISCII 1.1 (MIME:VISCII)"
+ "8-bit encoding for Vietnamese VISCII 1.1 (MIME:VISCII)."
  '(ccl-decode-viscii . ccl-encode-viscii)
  '((safe-charsets ascii vietnamese-viscii-lower vietnamese-viscii-upper)
    (mime-charset . viscii)
@@ -143,7 +143,7 @@
 
 (make-coding-system
  'vietnamese-vscii 4 ?v
- "8-bit encoding for Vietnamese VSCII-1"
+ "8-bit encoding for Vietnamese VSCII-1."
  '(ccl-decode-vscii . ccl-encode-vscii)
  '((safe-charsets ascii vietnamese-viscii-lower vietnamese-viscii-upper)
    (valid-codes (0 . 255))))
@@ -152,7 +152,7 @@
 
 (make-coding-system
  'vietnamese-viqr 0 ?q
- "Vietnamese latin transcription (VIQR)"
+ "Encoding for Vietnamese latin transcription (VIQR)."
  nil
  '((safe-charsets ascii vietnamese-viscii-lower vietnamese-viscii-upper)
    (post-read-conversion . viqr-post-read-conversion)
@@ -183,8 +183,8 @@
                (features viet-util)
                (sample-text . "Vietnamese (Ti\e,1*\e(Bng Vi\e,1.\e(Bt)     Ch\e,1`\e(Bo b\e,1U\e(Bn")
                (documentation . "\
-For Vietnamese, Emacs uses special charasets internally.
-They can be decoded from and encoded to VISCC, VSCII, and VIQR.
+For Vietnamese, Emacs uses special character sets internally.
+They can be decoded from and encoded to VISCII, VSCII, and VIQR.
 Current setting put higher priority to the coding system VISCII than VSCII.
 If you prefer VSCII, please do: (prefer-coding-system 'vietnamese-vscii)")
                ))