aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorJim Blandy1993-05-03 03:35:53 +0000
committerJim Blandy1993-05-03 03:35:53 +0000
commitafb1e4b480669495b41d9b41bda6d5dd6e7b0c28 (patch)
tree423173baf9c9a1f7735d0cdbbbc54af5ee75d1ea
parentf4c0acdb93b18501aee1dc7b95966bed85f5b041 (diff)
downloademacs-afb1e4b480669495b41d9b41bda6d5dd6e7b0c28.tar.gz
emacs-afb1e4b480669495b41d9b41bda6d5dd6e7b0c28.zip
* 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.
-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 @@
35 (prin1 (aref dt 258)) 35 (prin1 (aref dt 258))
36 (princ "\nCtrl glyph: ") 36 (princ "\nCtrl glyph: ")
37 (prin1 (aref dt 259)) 37 (prin1 (aref dt 259))
38 (princ "\nSelective display rope: ") 38 (princ "\nSelective display glyph sequence: ")
39 (prin1 (aref dt 260)) 39 (prin1 (aref dt 260))
40 (princ "\nCharacter display ropes:\n") 40 (princ "\nCharacter display glyph sequences:\n")
41 (let ((vector (make-vector 256 nil)) 41 (let ((vector (make-vector 256 nil))
42 (i 0)) 42 (i 0))
43 (while (< i 256) 43 (while (< i 256)
@@ -68,7 +68,7 @@
68 (if standard-display-table (aset standard-display-table l nil)) 68 (if standard-display-table (aset standard-display-table l nil))
69 (or standard-display-table 69 (or standard-display-table
70 (setq standard-display-table (make-vector 261 nil))) 70 (setq standard-display-table (make-vector 261 nil)))
71 (aset standard-display-table l l)) 71 (aset standard-display-table l (vector l)))
72 (setq l (1+ l)))) 72 (setq l (1+ l))))
73 73
74;;;###autoload 74;;;###autoload