summaryrefslogtreecommitdiff
path: root/lisp/disp-table.el
diff options
context:
space:
mode:
authorJim Blandy <jimb@redhat.com>1993-05-03 03:35:53 +0000
committerJim Blandy <jimb@redhat.com>1993-05-03 03:35:53 +0000
commitafb1e4b480669495b41d9b41bda6d5dd6e7b0c28 (patch)
tree423173baf9c9a1f7735d0cdbbbc54af5ee75d1ea /lisp/disp-table.el
parentf4c0acdb93b18501aee1dc7b95966bed85f5b041 (diff)
downloademacs-afb1e4b480669495b41d9b41bda6d5dd6e7b0c28.tar.gz
* disp-table.el (describe-display-table): Don't use the term
"rope"; we're using vectors of characters now. (standard-display-8bit, standard-display-ascii): Set the element of the display table to a vector, not an integer; the latter doesn't mean anything.
Diffstat (limited to 'lisp/disp-table.el')
-rw-r--r--lisp/disp-table.el6
1 files changed, 3 insertions, 3 deletions
diff --git a/lisp/disp-table.el b/lisp/disp-table.el
index 59f83531047..dc0d7476b54 100644
--- a/lisp/disp-table.el
+++ b/lisp/disp-table.el
@@ -35,9 +35,9 @@
(prin1 (aref dt 258))
(princ "\nCtrl glyph: ")
(prin1 (aref dt 259))
- (princ "\nSelective display rope: ")
+ (princ "\nSelective display glyph sequence: ")
(prin1 (aref dt 260))
- (princ "\nCharacter display ropes:\n")
+ (princ "\nCharacter display glyph sequences:\n")
(let ((vector (make-vector 256 nil))
(i 0))
(while (< i 256)
@@ -68,7 +68,7 @@
(if standard-display-table (aset standard-display-table l nil))
(or standard-display-table
(setq standard-display-table (make-vector 261 nil)))
- (aset standard-display-table l l))
+ (aset standard-display-table l (vector l)))
(setq l (1+ l))))
;;;###autoload