mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-11-25 07:28:20 +00:00
Code Issues Releases Activity

(display-table-slot,set-display-table-slot): Document the slot names.

Browse Source
This commit is contained in:
Erik Naggum 1995-12-03 01:51:01 +00:00
parent f3acf6f52a
commit 12c9fbcc14
1 changed files with 5 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
lisp/disp-table.el
View File

@ -47,7 +47,9 @@
;;;###autoload
(defun display-table-slot (display-table slot)
"Return the value of the extra slot in DISPLAY-TABLE named SLOT.
SLOT may be a number from 0 to 5 inclusive, or a slot name (symbol)."
SLOT may be a number from 0 to 5 inclusive, or a slot name (symbol).
Valid symbols are `truncation', `wrap', `escape', `control',
`selective-display', and `vertical-border'."
(let ((slot-number
(if (numberp slot) slot
(or (get slot 'display-table-slot)
@ -58,7 +60,8 @@ SLOT may be a number from 0 to 5 inclusive, or a slot name (symbol)."
(defun set-display-table-slot (display-table slot value)
"Set the value of the extra slot in DISPLAY-TABLE named SLOT to VALUE.
SLOT may be a number from 0 to 5 inclusive, or a name (symbol).
See `display-table-slot-name-alist' for the names and numbers."
Valid symbols are `truncation', `wrap', `escape', `control',
`selective-display', and `vertical-border'."
(let ((slot-number
(if (numberp slot) slot
(or (get slot 'display-table-slot)