aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--lisp/disp-table.el7
1 files changed, 5 insertions, 2 deletions
diff --git a/lisp/disp-table.el b/lisp/disp-table.el
index afe4d0d4423..67ecbe87872 100644
--- a/lisp/disp-table.el
+++ b/lisp/disp-table.el
@@ -47,7 +47,9 @@
47;;;###autoload 47;;;###autoload
48(defun display-table-slot (display-table slot) 48(defun display-table-slot (display-table slot)
49 "Return the value of the extra slot in DISPLAY-TABLE named SLOT. 49 "Return the value of the extra slot in DISPLAY-TABLE named SLOT.
50SLOT may be a number from 0 to 5 inclusive, or a slot name (symbol)." 50SLOT may be a number from 0 to 5 inclusive, or a slot name (symbol).
51Valid symbols are `truncation', `wrap', `escape', `control',
52`selective-display', and `vertical-border'."
51 (let ((slot-number 53 (let ((slot-number
52 (if (numberp slot) slot 54 (if (numberp slot) slot
53 (or (get slot 'display-table-slot) 55 (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)."
58(defun set-display-table-slot (display-table slot value) 60(defun set-display-table-slot (display-table slot value)
59 "Set the value of the extra slot in DISPLAY-TABLE named SLOT to VALUE. 61 "Set the value of the extra slot in DISPLAY-TABLE named SLOT to VALUE.
60SLOT may be a number from 0 to 5 inclusive, or a name (symbol). 62SLOT may be a number from 0 to 5 inclusive, or a name (symbol).
61See `display-table-slot-name-alist' for the names and numbers." 63Valid symbols are `truncation', `wrap', `escape', `control',
64`selective-display', and `vertical-border'."
62 (let ((slot-number 65 (let ((slot-number
63 (if (numberp slot) slot 66 (if (numberp slot) slot
64 (or (get slot 'display-table-slot) 67 (or (get slot 'display-table-slot)