Function: latin1-display
latin1-display is an autoloaded and byte-compiled function defined in
latin1-disp.el.gz.
Signature
(latin1-display &rest SETS)
Documentation
Set up Latin-1/ASCII display for the arguments character SETS.
See option latin1-display(var)/latin1-display(fun) for the method. The members of the list
must be in latin1-display-sets. With no arguments, reset the
display for all of latin1-display-sets. See also
latin1-display-setup.
Probably introduced at or before Emacs version 21.1.
Source Code
;; Defined in /usr/src/emacs/lisp/international/latin1-disp.el.gz
;;;###autoload
(defun latin1-display (&rest sets)
"Set up Latin-1/ASCII display for the arguments character SETS.
See option `latin1-display' for the method. The members of the list
must be in `latin1-display-sets'. With no arguments, reset the
display for all of `latin1-display-sets'. See also
`latin1-display-setup'."
(if sets
(progn
(mapc #'latin1-display-setup sets)
(unless (char-displayable-p #x101) ; a with macron
;; Extra stuff for windows-1252, in particular.
(mapc
(lambda (l)
(apply 'latin1-display-char l))
'((?\‚ ",") ;; SINGLE LOW-9 QUOTATION MARK
(?\„ ",,") ;; DOUBLE LOW-9 QUOTATION MARK
(?\… "...") ;; HORIZONTAL ELLIPSIS
(?\‰ "o/oo") ;; PER MILLE SIGN
(?\‹ "<") ;; SINGLE LEFT-POINTING ANGLE QUOTATION MARK
(?\“ "``") ;; LEFT DOUBLE QUOTATION MARK
(?\” "''") ;; RIGHT DOUBLE QUOTATION MARK
(?\– "-") ;; EN DASH
(?\— "--") ;; EM DASH
(?\™ "TM") ;; TRADE MARK SIGN
(?\› ">") ;; SINGLE RIGHT-POINTING ANGLE QUOTATION MARK
(?• "·")
)))
(setq latin1-display t))
(mapc #'latin1-display-reset latin1-display-sets)
(set-char-table-range standard-display-table '(#x0100 . #x33FF) nil)
(set-char-table-range standard-display-table '(#xE000 . #xFFFF) nil)
(setq latin1-display nil)
(redraw-display)))