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
commitd630ccea784f6e3aeaf808d4abf945a6c7a125f7 (patch)
tree0a9ee06929c2144fe5d727fa9bef3b4ab41ab55e /lisp/disp-table.el
parent1acb11140526c98637b3aec1160ee6682caf4af9 (diff)
downloademacs-d630ccea784f6e3aeaf808d4abf945a6c7a125f7.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