diff options
| author | Werner LEMBERG | 2001-12-18 17:51:50 +0000 |
|---|---|---|
| committer | Werner LEMBERG | 2001-12-18 17:51:50 +0000 |
| commit | 5ef350634d8259cb27ff797c4b9ce864bdd9bd35 (patch) | |
| tree | 85fd8af61838f58d4ce640e81944cb27fb15bd0c | |
| parent | 5a13a7ec04bbb7f53ee755ee253d0fdcfe3dfc2b (diff) | |
| download | emacs-5ef350634d8259cb27ff797c4b9ce864bdd9bd35.tar.gz emacs-5ef350634d8259cb27ff797c4b9ce864bdd9bd35.zip | |
Improving doc strings.
| -rw-r--r-- | lisp/language/cyrillic.el | 7 | ||||
| -rw-r--r-- | lisp/language/czech.el | 2 | ||||
| -rw-r--r-- | lisp/language/european.el | 30 | ||||
| -rw-r--r-- | lisp/language/greek.el | 2 | ||||
| -rw-r--r-- | lisp/language/hebrew.el | 5 | ||||
| -rw-r--r-- | lisp/language/indian.el | 2 | ||||
| -rw-r--r-- | lisp/language/japanese.el | 10 | ||||
| -rw-r--r-- | lisp/language/korean.el | 2 | ||||
| -rw-r--r-- | lisp/language/lao.el | 2 | ||||
| -rw-r--r-- | lisp/language/slovak.el | 2 | ||||
| -rw-r--r-- | lisp/language/thai.el | 2 | ||||
| -rw-r--r-- | lisp/language/tibetan.el | 2 | ||||
| -rw-r--r-- | lisp/language/vietnamese.el | 10 |
13 files changed, 41 insertions, 37 deletions
diff --git a/lisp/language/cyrillic.el b/lisp/language/cyrillic.el index dbf51acbd52..43d91e46a3d 100644 --- a/lisp/language/cyrillic.el +++ b/lisp/language/cyrillic.el | |||
| @@ -36,7 +36,7 @@ | |||
| 36 | 36 | ||
| 37 | (make-coding-system | 37 | (make-coding-system |
| 38 | 'cyrillic-iso-8bit 2 ?5 | 38 | 'cyrillic-iso-8bit 2 ?5 |
| 39 | "ISO 2022 based 8-bit encoding for Cyrillic script (MIME:ISO-8859-5)" | 39 | "ISO 2022 based 8-bit encoding for Cyrillic script (MIME:ISO-8859-5)." |
| 40 | '(ascii cyrillic-iso8859-5 nil nil | 40 | '(ascii cyrillic-iso8859-5 nil nil |
| 41 | nil nil nil nil nil nil nil) | 41 | nil nil nil nil nil nil nil) |
| 42 | '((safe-charsets ascii cyrillic-iso8859-5) | 42 | '((safe-charsets ascii cyrillic-iso8859-5) |
| @@ -111,7 +111,8 @@ | |||
| 111 | ;; but it is also used for Korean. | 111 | ;; but it is also used for Korean. |
| 112 | ;; So people who use koi8 for languages other than Russian | 112 | ;; So people who use koi8 for languages other than Russian |
| 113 | ;; will have to forgive us. | 113 | ;; will have to forgive us. |
| 114 | ?R "KOI8 8-bit encoding for Cyrillic (MIME: KOI8-R)" | 114 | ?R |
| 115 | "KOI8 8-bit encoding for Cyrillic (MIME: KOI8-R)." | ||
| 115 | '(ccl-decode-koi8 . ccl-encode-koi8) | 116 | '(ccl-decode-koi8 . ccl-encode-koi8) |
| 116 | `((safe-chars . ,(let ((table (make-char-table 'safe-chars)) | 117 | `((safe-chars . ,(let ((table (make-char-table 'safe-chars)) |
| 117 | (i 0)) | 118 | (i 0)) |
| @@ -202,7 +203,7 @@ | |||
| 202 | 203 | ||
| 203 | (make-coding-system | 204 | (make-coding-system |
| 204 | 'cyrillic-alternativnyj 4 ?A | 205 | 'cyrillic-alternativnyj 4 ?A |
| 205 | "ALTERNATIVNYJ 8-bit encoding for Cyrillic" | 206 | "ALTERNATIVNYJ 8-bit encoding for Cyrillic." |
| 206 | '(ccl-decode-alternativnyj . ccl-encode-alternativnyj) | 207 | '(ccl-decode-alternativnyj . ccl-encode-alternativnyj) |
| 207 | `((safe-chars . ,(let ((table (make-char-table 'safe-chars)) | 208 | `((safe-chars . ,(let ((table (make-char-table 'safe-chars)) |
| 208 | (i 0)) | 209 | (i 0)) |
diff --git a/lisp/language/czech.el b/lisp/language/czech.el index 22166209442..32b2a7cd7fa 100644 --- a/lisp/language/czech.el +++ b/lisp/language/czech.el | |||
| @@ -42,7 +42,7 @@ | |||
| 42 | (documentation . "\ | 42 | (documentation . "\ |
| 43 | This language environment is almost the same as Latin-2, | 43 | This language environment is almost the same as Latin-2, |
| 44 | but default input method is set to \"czech\", | 44 | but default input method is set to \"czech\", |
| 45 | and select's the Czech tutorial.")) | 45 | and the Czech tutorial is selected.")) |
| 46 | '("European")) | 46 | '("European")) |
| 47 | 47 | ||
| 48 | (provide 'czech) | 48 | (provide 'czech) |
diff --git a/lisp/language/european.el b/lisp/language/european.el index 64664a544e5..959c1357f14 100644 --- a/lisp/language/european.el +++ b/lisp/language/european.el | |||
| @@ -34,7 +34,7 @@ | |||
| 34 | 34 | ||
| 35 | (make-coding-system | 35 | (make-coding-system |
| 36 | 'iso-latin-1 2 ?1 | 36 | 'iso-latin-1 2 ?1 |
| 37 | "ISO 2022 based 8-bit encoding for Latin-1 (MIME:ISO-8859-1)" | 37 | "ISO 2022 based 8-bit encoding for Latin-1 (MIME:ISO-8859-1)." |
| 38 | '(ascii latin-iso8859-1 nil nil | 38 | '(ascii latin-iso8859-1 nil nil |
| 39 | nil nil nil nil nil nil nil nil nil nil nil nil t) | 39 | nil nil nil nil nil nil nil nil nil nil nil nil t) |
| 40 | '((safe-charsets ascii latin-iso8859-1) | 40 | '((safe-charsets ascii latin-iso8859-1) |
| @@ -76,7 +76,7 @@ Indonesian/Malay, Tagalog (Philippines), Swahili and Afrikaans.")) | |||
| 76 | 76 | ||
| 77 | (make-coding-system | 77 | (make-coding-system |
| 78 | 'iso-latin-2 2 ?2 | 78 | 'iso-latin-2 2 ?2 |
| 79 | "ISO 2022 based 8-bit encoding (MIME:ISO-8859-2)" | 79 | "ISO 2022 based 8-bit encoding for Latin-2 (MIME:ISO-8859-2)." |
| 80 | '(ascii latin-iso8859-2 nil nil | 80 | '(ascii latin-iso8859-2 nil nil |
| 81 | nil nil nil nil nil nil nil) | 81 | nil nil nil nil nil nil nil) |
| 82 | '((safe-charsets ascii latin-iso8859-2) | 82 | '((safe-charsets ascii latin-iso8859-2) |
| @@ -110,7 +110,7 @@ We also have specific language environments for the following languages: | |||
| 110 | 110 | ||
| 111 | (make-coding-system | 111 | (make-coding-system |
| 112 | 'iso-latin-3 2 ?3 | 112 | 'iso-latin-3 2 ?3 |
| 113 | "ISO 2022 based 8-bit encoding (MIME:ISO-8859-3)" | 113 | "ISO 2022 based 8-bit encoding for Latin-3 (MIME:ISO-8859-3)." |
| 114 | '(ascii latin-iso8859-3 nil nil | 114 | '(ascii latin-iso8859-3 nil nil |
| 115 | nil nil nil nil nil nil nil) | 115 | nil nil nil nil nil nil nil) |
| 116 | '((safe-charsets ascii latin-iso8859-3) | 116 | '((safe-charsets ascii latin-iso8859-3) |
| @@ -138,7 +138,7 @@ These languages are supported with the Latin-3 (ISO-8859-3) character set: | |||
| 138 | 138 | ||
| 139 | (make-coding-system | 139 | (make-coding-system |
| 140 | 'iso-latin-4 2 ?4 | 140 | 'iso-latin-4 2 ?4 |
| 141 | "ISO 2022 based 8-bit encoding (MIME:ISO-8859-4)" | 141 | "ISO 2022 based 8-bit encoding for Latin-4 (MIME:ISO-8859-4)." |
| 142 | '(ascii latin-iso8859-4 nil nil | 142 | '(ascii latin-iso8859-4 nil nil |
| 143 | nil nil nil nil nil nil nil) | 143 | nil nil nil nil nil nil nil) |
| 144 | '((safe-charsets ascii latin-iso8859-4) | 144 | '((safe-charsets ascii latin-iso8859-4) |
| @@ -166,7 +166,7 @@ These languages are supported with the Latin-4 (ISO-8859-4) character set: | |||
| 166 | 166 | ||
| 167 | (make-coding-system | 167 | (make-coding-system |
| 168 | 'iso-latin-5 2 ?9 | 168 | 'iso-latin-5 2 ?9 |
| 169 | "ISO 2022 based 8-bit encoding (MIME:ISO-8859-9)" | 169 | "ISO 2022 based 8-bit encoding for Latin-5 (MIME:ISO-8859-9)." |
| 170 | '(ascii latin-iso8859-9 nil nil | 170 | '(ascii latin-iso8859-9 nil nil |
| 171 | nil nil nil nil nil nil nil) | 171 | nil nil nil nil nil nil nil) |
| 172 | '((safe-charsets ascii latin-iso8859-9) | 172 | '((safe-charsets ascii latin-iso8859-9) |
| @@ -185,8 +185,8 @@ These languages are supported with the Latin-4 (ISO-8859-4) character set: | |||
| 185 | (input-method . "latin-5-postfix") | 185 | (input-method . "latin-5-postfix") |
| 186 | (documentation . "\ | 186 | (documentation . "\ |
| 187 | These languages are supported with the Latin-5 (ISO-8859-9) character set: | 187 | These languages are supported with the Latin-5 (ISO-8859-9) character set: |
| 188 | Bulgarian, Byelorussian, (Slavic) Macedonian, Russian, Serbian and | 188 | Bulgarian, Byelorussian, (Slavic) Macedonian, Russian, Serbian and |
| 189 | Ukranian.")) ; says ISO 8859-1 | 189 | Ukranian.")) ; says ISO 8859-1 |
| 190 | '("European")) | 190 | '("European")) |
| 191 | 191 | ||
| 192 | 192 | ||
| @@ -195,7 +195,7 @@ Ukranian.")) ; says ISO 8859-1 | |||
| 195 | (make-coding-system | 195 | (make-coding-system |
| 196 | 'iso-latin-8 2 ?W ; `W' for `Welsh', since `C' | 196 | 'iso-latin-8 2 ?W ; `W' for `Welsh', since `C' |
| 197 | ; for `Celtic' is taken. | 197 | ; for `Celtic' is taken. |
| 198 | "ISO 2022 based 8-bit encoding for Latin-8 (MIME:ISO-8859-14)" | 198 | "ISO 2022 based 8-bit encoding for Latin-8 (MIME:ISO-8859-14)." |
| 199 | '(ascii latin-iso8859-14 nil nil | 199 | '(ascii latin-iso8859-14 nil nil |
| 200 | nil nil nil nil nil nil nil nil nil nil nil nil t) | 200 | nil nil nil nil nil nil nil nil nil nil nil nil t) |
| 201 | '((safe-charsets ascii latin-iso8859-14) | 201 | '((safe-charsets ascii latin-iso8859-14) |
| @@ -217,15 +217,15 @@ Ukranian.")) ; says ISO 8859-1 | |||
| 217 | (documentation . "\ | 217 | (documentation . "\ |
| 218 | This language environment is a generic one for the Latin-8 (ISO-8859-14) | 218 | This language environment is a generic one for the Latin-8 (ISO-8859-14) |
| 219 | character set which supports the Celtic languages, including those not | 219 | character set which supports the Celtic languages, including those not |
| 220 | covered by other ISO-8859 character sets: Welsh, Manx Gaelic and | 220 | covered by other ISO-8859 character sets: |
| 221 | Irish Gaelic (old orthography).")) | 221 | Welsh, Manx Gaelic and Irish Gaelic (old orthography).")) |
| 222 | '("European")) | 222 | '("European")) |
| 223 | 223 | ||
| 224 | ;; Latin-9 (ISO-8859-15) | 224 | ;; Latin-9 (ISO-8859-15) |
| 225 | 225 | ||
| 226 | (make-coding-system | 226 | (make-coding-system |
| 227 | 'iso-latin-9 2 ?0 ; `0' for `Latin-0' | 227 | 'iso-latin-9 2 ?0 ; `0' for `Latin-0' |
| 228 | "ISO 2022 based 8-bit encoding for Latin-9 (MIME:ISO-8859-15)" | 228 | "ISO 2022 based 8-bit encoding for Latin-9 (MIME:ISO-8859-15)." |
| 229 | '(ascii latin-iso8859-15 nil nil | 229 | '(ascii latin-iso8859-15 nil nil |
| 230 | nil nil nil nil nil nil nil nil nil nil nil nil t) | 230 | nil nil nil nil nil nil nil nil nil nil nil nil t) |
| 231 | '((safe-charsets ascii latin-iso8859-15) | 231 | '((safe-charsets ascii latin-iso8859-15) |
| @@ -266,7 +266,8 @@ German (Deutsch Nord) Guten Tag | |||
| 266 | German (Deutsch S,A|(Bd) Gr,A|_(B Gott") | 266 | German (Deutsch S,A|(Bd) Gr,A|_(B Gott") |
| 267 | (documentation . "\ | 267 | (documentation . "\ |
| 268 | This language environment is almost the same as Latin-1, | 268 | This language environment is almost the same as Latin-1, |
| 269 | but the default input method is set to \"german-postfix\".")) | 269 | but the default input method is set to \"german-postfix\". |
| 270 | Additionally, the tutorial is set to \"TUTORIAL.de\".")) | ||
| 270 | '("European")) | 271 | '("European")) |
| 271 | 272 | ||
| 272 | (set-language-info-alist | 273 | (set-language-info-alist |
| @@ -324,7 +325,7 @@ and it selects the Spanish tutorial.")) | |||
| 324 | (sample-text . "Er is een aantal manieren waarop je dit kan doen") | 325 | (sample-text . "Er is een aantal manieren waarop je dit kan doen") |
| 325 | (documentation . "\ | 326 | (documentation . "\ |
| 326 | This language environment is almost the same as Latin-1, | 327 | This language environment is almost the same as Latin-1, |
| 327 | but select's the Dutch tutorial.")) | 328 | but the Dutch tutorial is selected.")) |
| 328 | '("European")) | 329 | '("European")) |
| 329 | 330 | ||
| 330 | ;; For Turkish, the character set ISO-8859-9 (Latin-5) is used. But, | 331 | ;; For Turkish, the character set ISO-8859-9 (Latin-5) is used. But, |
| @@ -568,7 +569,8 @@ but select's the Dutch tutorial.")) | |||
| 568 | "CCL program to encode Mac Roman") | 569 | "CCL program to encode Mac Roman") |
| 569 | 570 | ||
| 570 | (make-coding-system | 571 | (make-coding-system |
| 571 | 'mac-roman 4 ?M "Mac Roman Encoding" | 572 | 'mac-roman 4 ?M |
| 573 | "Mac Roman Encoding (MIME:MACINTOSH)." | ||
| 572 | '(decode-mac-roman . encode-mac-roman) | 574 | '(decode-mac-roman . encode-mac-roman) |
| 573 | '((safe-chars . mac-roman-encoder) | 575 | '((safe-chars . mac-roman-encoder) |
| 574 | (valid-codes (0 . 255)) | 576 | (valid-codes (0 . 255)) |
diff --git a/lisp/language/greek.el b/lisp/language/greek.el index 39702866755..2066e8a4951 100644 --- a/lisp/language/greek.el +++ b/lisp/language/greek.el | |||
| @@ -30,7 +30,7 @@ | |||
| 30 | 30 | ||
| 31 | (make-coding-system | 31 | (make-coding-system |
| 32 | 'greek-iso-8bit 2 ?7 | 32 | 'greek-iso-8bit 2 ?7 |
| 33 | "ISO 2022 based 8-bit encoding for Greek (MIME:ISO-8859-7)" | 33 | "ISO 2022 based 8-bit encoding for Greek (MIME:ISO-8859-7)." |
| 34 | '(ascii greek-iso8859-7 nil nil | 34 | '(ascii greek-iso8859-7 nil nil |
| 35 | nil nil nil nil nil nil nil) | 35 | nil nil nil nil nil nil nil) |
| 36 | '((safe-charsets ascii greek-iso8859-7) | 36 | '((safe-charsets ascii greek-iso8859-7) |
diff --git a/lisp/language/hebrew.el b/lisp/language/hebrew.el index f499a1ba053..ad349495a7b 100644 --- a/lisp/language/hebrew.el +++ b/lisp/language/hebrew.el | |||
| @@ -33,7 +33,7 @@ | |||
| 33 | 33 | ||
| 34 | (make-coding-system | 34 | (make-coding-system |
| 35 | 'hebrew-iso-8bit 2 ?8 | 35 | 'hebrew-iso-8bit 2 ?8 |
| 36 | "ISO 2022 based 8-bit encoding for Hebrew (MIME:ISO-8859-8)" | 36 | "ISO 2022 based 8-bit encoding for Hebrew (MIME:ISO-8859-8)." |
| 37 | '(ascii hebrew-iso8859-8 nil nil | 37 | '(ascii hebrew-iso8859-8 nil nil |
| 38 | nil ascii-eol ascii-cntl nil nil nil nil nil t) | 38 | nil ascii-eol ascii-cntl nil nil nil nil nil t) |
| 39 | '((safe-charsets ascii hebrew-iso8859-8) | 39 | '((safe-charsets ascii hebrew-iso8859-8) |
| @@ -62,7 +62,8 @@ | |||
| 62 | "Windows-1255" '((coding-priority windows-1255) | 62 | "Windows-1255" '((coding-priority windows-1255) |
| 63 | (coding-system windows-1255) | 63 | (coding-system windows-1255) |
| 64 | (features code-pages) | 64 | (features code-pages) |
| 65 | (documentation . "Support for Windows-1255 encoding, e.g. for Yiddish. | 65 | (documentation . "\ |
| 66 | Support for Windows-1255 encoding, e.g. for Yiddish. | ||
| 66 | Right-to-left writing is not yet supported."))) | 67 | Right-to-left writing is not yet supported."))) |
| 67 | 68 | ||
| 68 | (provide 'hebrew) | 69 | (provide 'hebrew) |
diff --git a/lisp/language/indian.el b/lisp/language/indian.el index 74e7b170d57..e2b581d6a79 100644 --- a/lisp/language/indian.el +++ b/lisp/language/indian.el | |||
| @@ -31,7 +31,7 @@ | |||
| 31 | 31 | ||
| 32 | (make-coding-system | 32 | (make-coding-system |
| 33 | 'in-is13194 2 ?D | 33 | 'in-is13194 2 ?D |
| 34 | "8-bit encoding for ASCII (MSB=0) and IS13194-Devanagari (MSB=1)" | 34 | "8-bit encoding for ASCII (MSB=0) and IS13194-Devanagari (MSB=1)." |
| 35 | '(ascii indian-is13194 nil nil | 35 | '(ascii indian-is13194 nil nil |
| 36 | nil ascii-eol) | 36 | nil ascii-eol) |
| 37 | '((safe-charsets ascii indian-is13194) | 37 | '((safe-charsets ascii indian-is13194) |
diff --git a/lisp/language/japanese.el b/lisp/language/japanese.el index 20ec1aa2a50..dbb9d72cdb0 100644 --- a/lisp/language/japanese.el +++ b/lisp/language/japanese.el | |||
| @@ -31,7 +31,7 @@ | |||
| 31 | 31 | ||
| 32 | (make-coding-system | 32 | (make-coding-system |
| 33 | 'iso-2022-jp 2 ?J | 33 | 'iso-2022-jp 2 ?J |
| 34 | "ISO 2022 based 7bit encoding for Japanese (MIME:ISO-2022-JP)" | 34 | "ISO 2022 based 7bit encoding for Japanese (MIME:ISO-2022-JP)." |
| 35 | '((ascii japanese-jisx0208-1978 japanese-jisx0208 | 35 | '((ascii japanese-jisx0208-1978 japanese-jisx0208 |
| 36 | latin-jisx0201 japanese-jisx0212) nil nil nil | 36 | latin-jisx0201 japanese-jisx0212) nil nil nil |
| 37 | short ascii-eol ascii-cntl seven) | 37 | short ascii-eol ascii-cntl seven) |
| @@ -43,7 +43,7 @@ | |||
| 43 | 43 | ||
| 44 | (make-coding-system | 44 | (make-coding-system |
| 45 | 'iso-2022-jp-2 2 ?J | 45 | 'iso-2022-jp-2 2 ?J |
| 46 | "ISO 2022 based 7bit encoding for CJK, Latin-1, and Greek (MIME:ISO-2022-JP-2)" | 46 | "ISO 2022 based 7bit encoding for CJK, Latin-1, and Greek (MIME:ISO-2022-JP-2)." |
| 47 | '((ascii japanese-jisx0208-1978 japanese-jisx0208 | 47 | '((ascii japanese-jisx0208-1978 japanese-jisx0208 |
| 48 | latin-jisx0201 japanese-jisx0212 | 48 | latin-jisx0201 japanese-jisx0212 |
| 49 | chinese-gb2312 korean-ksc5601) nil | 49 | chinese-gb2312 korean-ksc5601) nil |
| @@ -57,7 +57,7 @@ | |||
| 57 | 57 | ||
| 58 | (make-coding-system | 58 | (make-coding-system |
| 59 | 'japanese-shift-jis 1 ?S | 59 | 'japanese-shift-jis 1 ?S |
| 60 | "Shift-JIS 8-bit encoding for Japanese (MIME:SHIFT_JIS)" | 60 | "Shift-JIS 8-bit encoding for Japanese (MIME:SHIFT_JIS)." |
| 61 | nil | 61 | nil |
| 62 | '((safe-charsets ascii japanese-jisx0208 japanese-jisx0208-1978 | 62 | '((safe-charsets ascii japanese-jisx0208 japanese-jisx0208-1978 |
| 63 | latin-jisx0201 katakana-jisx0201) | 63 | latin-jisx0201 katakana-jisx0201) |
| @@ -70,7 +70,7 @@ | |||
| 70 | 70 | ||
| 71 | (make-coding-system | 71 | (make-coding-system |
| 72 | 'japanese-iso-7bit-1978-irv 2 ?j | 72 | 'japanese-iso-7bit-1978-irv 2 ?j |
| 73 | "ISO 2022 based 7-bit encoding for Japanese JISX0208-1978 and JISX0201-Roman" | 73 | "ISO 2022 based 7-bit encoding for Japanese JISX0208-1978 and JISX0201-Roman." |
| 74 | '((ascii japanese-jisx0208-1978 japanese-jisx0208 | 74 | '((ascii japanese-jisx0208-1978 japanese-jisx0208 |
| 75 | latin-jisx0201 japanese-jisx0212 katakana-jisx0201 t) nil nil nil | 75 | latin-jisx0201 japanese-jisx0212 katakana-jisx0201 t) nil nil nil |
| 76 | short ascii-eol ascii-cntl seven nil nil use-roman use-oldjis) | 76 | short ascii-eol ascii-cntl seven nil nil use-roman use-oldjis) |
| @@ -81,7 +81,7 @@ | |||
| 81 | 81 | ||
| 82 | (make-coding-system | 82 | (make-coding-system |
| 83 | 'japanese-iso-8bit 2 ?E | 83 | 'japanese-iso-8bit 2 ?E |
| 84 | "ISO 2022 based EUC encoding for Japanese (MIME:EUC-JP)" | 84 | "ISO 2022 based EUC encoding for Japanese (MIME:EUC-JP)." |
| 85 | '(ascii japanese-jisx0208 katakana-jisx0201 japanese-jisx0212 | 85 | '(ascii japanese-jisx0208 katakana-jisx0201 japanese-jisx0212 |
| 86 | short ascii-eol ascii-cntl nil nil single-shift) | 86 | short ascii-eol ascii-cntl nil nil single-shift) |
| 87 | '((safe-charsets ascii latin-jisx0201 japanese-jisx0208 japanese-jisx0208-1978 | 87 | '((safe-charsets ascii latin-jisx0201 japanese-jisx0208 japanese-jisx0208-1978 |
diff --git a/lisp/language/korean.el b/lisp/language/korean.el index 466e7cce0b2..5398ef79ff6 100644 --- a/lisp/language/korean.el +++ b/lisp/language/korean.el | |||
| @@ -30,7 +30,7 @@ | |||
| 30 | 30 | ||
| 31 | (make-coding-system | 31 | (make-coding-system |
| 32 | 'korean-iso-8bit 2 ?K | 32 | 'korean-iso-8bit 2 ?K |
| 33 | "ISO 2022 based EUC encoding for Korean KSC5601 (MIME:EUC-KR)" | 33 | "ISO 2022 based EUC encoding for Korean KSC5601 (MIME:EUC-KR)." |
| 34 | '(ascii korean-ksc5601 nil nil | 34 | '(ascii korean-ksc5601 nil nil |
| 35 | nil ascii-eol ascii-cntl) | 35 | nil ascii-eol ascii-cntl) |
| 36 | '((safe-charsets ascii korean-ksc5601) | 36 | '((safe-charsets ascii korean-ksc5601) |
diff --git a/lisp/language/lao.el b/lisp/language/lao.el index d4c54d0c165..86d0caf8a46 100644 --- a/lisp/language/lao.el +++ b/lisp/language/lao.el | |||
| @@ -29,7 +29,7 @@ | |||
| 29 | 29 | ||
| 30 | (make-coding-system | 30 | (make-coding-system |
| 31 | 'lao 2 ?L | 31 | 'lao 2 ?L |
| 32 | "8-bit encoding for ASCII (MSB=0) and LAO (MSB=1)" | 32 | "8-bit encoding for ASCII (MSB=0) and LAO (MSB=1)." |
| 33 | '(ascii lao nil nil | 33 | '(ascii lao nil nil |
| 34 | nil nil) | 34 | nil nil) |
| 35 | '((safe-charsets ascii lao) | 35 | '((safe-charsets ascii lao) |
diff --git a/lisp/language/slovak.el b/lisp/language/slovak.el index cda4cbebe50..2f1a214f877 100644 --- a/lisp/language/slovak.el +++ b/lisp/language/slovak.el | |||
| @@ -43,7 +43,7 @@ | |||
| 43 | (documentation . "\ | 43 | (documentation . "\ |
| 44 | This language environment is almost the same as Latin-2, | 44 | This language environment is almost the same as Latin-2, |
| 45 | but default input method is set to \"slovak\", | 45 | but default input method is set to \"slovak\", |
| 46 | and select's the Slovak tutorial.")) | 46 | and the Slovak tutorial is selected.")) |
| 47 | '("European")) | 47 | '("European")) |
| 48 | 48 | ||
| 49 | (provide 'slovak) | 49 | (provide 'slovak) |
diff --git a/lisp/language/thai.el b/lisp/language/thai.el index 30e1c194bd4..931142f727b 100644 --- a/lisp/language/thai.el +++ b/lisp/language/thai.el | |||
| @@ -30,7 +30,7 @@ | |||
| 30 | 30 | ||
| 31 | (make-coding-system | 31 | (make-coding-system |
| 32 | 'thai-tis620 2 ?T | 32 | 'thai-tis620 2 ?T |
| 33 | "8-bit encoding for ASCII (MSB=0) and Thai TIS620 (MSB=1)" | 33 | "8-bit encoding for ASCII (MSB=0) and Thai TIS620 (MSB=1)." |
| 34 | '(ascii thai-tis620 nil nil | 34 | '(ascii thai-tis620 nil nil |
| 35 | nil ascii-eol) | 35 | nil ascii-eol) |
| 36 | '((safe-charsets ascii thai-tis620) | 36 | '((safe-charsets ascii thai-tis620) |
diff --git a/lisp/language/tibetan.el b/lisp/language/tibetan.el index 4f9068c0263..c993bb57c01 100644 --- a/lisp/language/tibetan.el +++ b/lisp/language/tibetan.el | |||
| @@ -84,7 +84,7 @@ | |||
| 84 | 84 | ||
| 85 | (make-coding-system | 85 | (make-coding-system |
| 86 | 'tibetan-iso-8bit 2 ?Q | 86 | 'tibetan-iso-8bit 2 ?Q |
| 87 | "8-bit encoding for ASCII (MSB=0) and TIBETAN (MSB=1)" | 87 | "8-bit encoding for ASCII (MSB=0) and TIBETAN (MSB=1)." |
| 88 | '(ascii tibetan nil nil | 88 | '(ascii tibetan nil nil |
| 89 | nil nil) | 89 | nil nil) |
| 90 | '((safe-charsets ascii tibetan) | 90 | '((safe-charsets ascii tibetan) |
diff --git a/lisp/language/vietnamese.el b/lisp/language/vietnamese.el index 92273b734af..c79c84e9631 100644 --- a/lisp/language/vietnamese.el +++ b/lisp/language/vietnamese.el | |||
| @@ -133,7 +133,7 @@ | |||
| 133 | 133 | ||
| 134 | (make-coding-system | 134 | (make-coding-system |
| 135 | 'vietnamese-viscii 4 ?V | 135 | 'vietnamese-viscii 4 ?V |
| 136 | "8-bit encoding for Vietnamese VISCII 1.1 (MIME:VISCII)" | 136 | "8-bit encoding for Vietnamese VISCII 1.1 (MIME:VISCII)." |
| 137 | '(ccl-decode-viscii . ccl-encode-viscii) | 137 | '(ccl-decode-viscii . ccl-encode-viscii) |
| 138 | '((safe-charsets ascii vietnamese-viscii-lower vietnamese-viscii-upper) | 138 | '((safe-charsets ascii vietnamese-viscii-lower vietnamese-viscii-upper) |
| 139 | (mime-charset . viscii) | 139 | (mime-charset . viscii) |
| @@ -143,7 +143,7 @@ | |||
| 143 | 143 | ||
| 144 | (make-coding-system | 144 | (make-coding-system |
| 145 | 'vietnamese-vscii 4 ?v | 145 | 'vietnamese-vscii 4 ?v |
| 146 | "8-bit encoding for Vietnamese VSCII-1" | 146 | "8-bit encoding for Vietnamese VSCII-1." |
| 147 | '(ccl-decode-vscii . ccl-encode-vscii) | 147 | '(ccl-decode-vscii . ccl-encode-vscii) |
| 148 | '((safe-charsets ascii vietnamese-viscii-lower vietnamese-viscii-upper) | 148 | '((safe-charsets ascii vietnamese-viscii-lower vietnamese-viscii-upper) |
| 149 | (valid-codes (0 . 255)))) | 149 | (valid-codes (0 . 255)))) |
| @@ -152,7 +152,7 @@ | |||
| 152 | 152 | ||
| 153 | (make-coding-system | 153 | (make-coding-system |
| 154 | 'vietnamese-viqr 0 ?q | 154 | 'vietnamese-viqr 0 ?q |
| 155 | "Vietnamese latin transcription (VIQR)" | 155 | "Encoding for Vietnamese latin transcription (VIQR)." |
| 156 | nil | 156 | nil |
| 157 | '((safe-charsets ascii vietnamese-viscii-lower vietnamese-viscii-upper) | 157 | '((safe-charsets ascii vietnamese-viscii-lower vietnamese-viscii-upper) |
| 158 | (post-read-conversion . viqr-post-read-conversion) | 158 | (post-read-conversion . viqr-post-read-conversion) |
| @@ -183,8 +183,8 @@ | |||
| 183 | (features viet-util) | 183 | (features viet-util) |
| 184 | (sample-text . "Vietnamese (Ti,1*(Bng Vi,1.(Bt) Ch,1`(Bo b,1U(Bn") | 184 | (sample-text . "Vietnamese (Ti,1*(Bng Vi,1.(Bt) Ch,1`(Bo b,1U(Bn") |
| 185 | (documentation . "\ | 185 | (documentation . "\ |
| 186 | For Vietnamese, Emacs uses special charasets internally. | 186 | For Vietnamese, Emacs uses special character sets internally. |
| 187 | They can be decoded from and encoded to VISCC, VSCII, and VIQR. | 187 | They can be decoded from and encoded to VISCII, VSCII, and VIQR. |
| 188 | Current setting put higher priority to the coding system VISCII than VSCII. | 188 | Current setting put higher priority to the coding system VISCII than VSCII. |
| 189 | If you prefer VSCII, please do: (prefer-coding-system 'vietnamese-vscii)") | 189 | If you prefer VSCII, please do: (prefer-coding-system 'vietnamese-vscii)") |
| 190 | )) | 190 | )) |