mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-12-23 10:34:07 +00:00
Code Issues Releases Activity

* disp-table.el (standard-display-european): Doc fix. Make

Browse Source 
this autoload.  Make it respond to prefix arg like a minor mode.
This commit is contained in:
Jim Blandy 1993-05-25 06:21:35 +00:00
parent 8b14d29674
commit 2eae72268f
1 changed files with 11 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

16
lisp/disp-table.el
View File

@ -121,14 +121,20 @@
(setq glyph-table (vconcat glyph-table (list string)))
(1- (length glyph-table)))
;;;###autoload
(defun standard-display-european (arg)
"Arrange to display European characters encoded with ISO 8859.
This means that characters in the range of 160 to 255 display not
as octal escapes, but as accented characters."
"Toggle display of European characters encoded with ISO 8859.
When enabled, characters in the range of 160 to 255 display not
as octal escapes, but as accented characters.
With prefix argument, enable European character display iff arg is positive."
(interactive "P")
(if arg (standard-display-default 160 255)
(if (or (< (prefix-numeric-value arg) 0)
(and (null arg)
(vectorp standard-display-table)
(>= (length standard-display-table) 161)
(equal (aref standard-display-table 160) [160])))
(standard-display-default 160 255)
(standard-display-8bit 160 255)))
(provide 'disp-table)