Mercurial > emacs

comparison lisp/language/european.el @ 43730:6548976663b6

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(mac-roman): Fix the safe-chars property.
author Eli Zaretskii <eliz@gnu.org>
date Tue, 05 Mar 2002 18:19:26 +0000
parents 06cba78a5cdd
children ff1f9768901a
comparison
equal deleted inserted replaced
43729:5b4c5b84bb9d 43730:6548976663b6
567 567
568 (make-coding-system 568 (make-coding-system
569 'mac-roman 4 ?M 569 'mac-roman 4 ?M
570 "Mac Roman Encoding (MIME:MACINTOSH)." 570 "Mac Roman Encoding (MIME:MACINTOSH)."
571 '(decode-mac-roman . encode-mac-roman) 571 '(decode-mac-roman . encode-mac-roman)
572 '((safe-chars . mac-roman-encoder) 572 '((safe-chars . (get 'mac-roman-encoder 'translation-table))
573 (valid-codes (0 . 255)) 573 (valid-codes (0 . 255))
574 (mime-charset . macintosh))) ; per IANA, rfc1345 574 (mime-charset . macintosh))) ; per IANA, rfc1345
575 575
576 (defconst diacritic-composition-pattern "\\C^\\c^+") 576 (defconst diacritic-composition-pattern "\\C^\\c^+")
577 577