64 |
'help-echo "mouse-2, RET: show table of characters for this character set") |
'help-echo "mouse-2, RET: show table of characters for this character set") |
65 |
|
|
66 |
;;;###autoload |
;;;###autoload |
67 |
(defvar non-iso-charset-alist |
(defvar non-iso-charset-alist |
68 |
`((mac-roman |
`((mac-roman |
69 |
(ascii latin-iso8859-1 mule-unicode-2500-33ff |
(ascii latin-iso8859-1 mule-unicode-2500-33ff |
70 |
mule-unicode-0100-24ff mule-unicode-e000-ffff) |
mule-unicode-0100-24ff mule-unicode-e000-ffff) |
609 |
(let ((vars (coding-system-get coding-system 'dependency))) |
(let ((vars (coding-system-get coding-system 'dependency))) |
610 |
(when vars |
(when vars |
611 |
(princ "See also the documentation of these customizable variables |
(princ "See also the documentation of these customizable variables |
612 |
which alter the behaviour of this coding system.\n") |
which alter the behavior of this coding system.\n") |
613 |
(dolist (v vars) |
(dolist (v vars) |
614 |
(princ " `") |
(princ " `") |
615 |
(princ v) |
(princ v) |