comparison lisp/language/vietnamese.el @ 17841:084d922fcd78

Coding system names changed as follows: internal -> emacs-mule, automatic-conversion -> undecided. Coding category name changes as follows: coding-category-internal -> coding-category-emacs-mule. Delete functions describe-LANGUAGE-support. Delete describe-function entries and change documentation entries in each language specific information.
author Kenichi Handa <handa@m17n.org>
date Fri, 16 May 1997 00:59:09 +0000
parents 550afdbb31d8
children 73869115ae0a
comparison
equal deleted inserted replaced
17840:2517414676ed 17841:084d922fcd78
242 (setq-default buffer-file-coding-system 'viscii) 242 (setq-default buffer-file-coding-system 'viscii)
243 243
244 (setq default-input-method '("Vietnamese" . "quail-viqr")) 244 (setq default-input-method '("Vietnamese" . "quail-viqr"))
245 ) 245 )
246 246
247 (defun describe-vietnamese-support ()
248 "Describe how Emacs supports Vietnamese."
249 (interactive)
250 (describe-language-support-internal "Vietnamese"))
251
252 (set-language-info-alist 247 (set-language-info-alist
253 "Vietnamese" '((setup-function . setup-vietnamese-environment) 248 "Vietnamese" '((setup-function . setup-vietnamese-environment)
254 (describe-function . describe-vietnamese-support)
255 (charset . (vietnamese-viscii-lower 249 (charset . (vietnamese-viscii-lower
256 vietnamese-viscii-upper)) 250 vietnamese-viscii-upper))
257 (coding-system . (viscii vscii viqr)) 251 (coding-system . (viscii vscii viqr))
258 (sample-text . "Vietnamese (Ti,1*(Bng Vi,1.(Bt) Ch,1`(Bo b,1U(Bn") 252 (sample-text . "Vietnamese (Ti,1*(Bng Vi,1.(Bt) Ch,1`(Bo b,1U(Bn")
259 (documentation . nil))) 253 (documentation . '("\
254 For Vietnamese, Emacs uses special charasets internally.
255 They can be decoded from and encoded to VISCC, VSCII, and VIQR."))
256 ))
260 257
261 ;;; vietnamese.el ends here 258 ;;; vietnamese.el ends here