aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorDave Love2000-06-08 16:58:41 +0000
committerDave Love2000-06-08 16:58:41 +0000
commitb8fbaf52c55f3d8fc28b43dc232c5dd21c866fa7 (patch)
treeeaf514416db71dc2bd4db05665632689f160942e
parentc08398de397d083032253ca03047fdd38e4acff4 (diff)
downloademacs-b8fbaf52c55f3d8fc28b43dc232c5dd21c866fa7.tar.gz
emacs-b8fbaf52c55f3d8fc28b43dc232c5dd21c866fa7.zip
(create-glyph): Doc fix.
-rw-r--r--lisp/disp-table.el2
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/disp-table.el b/lisp/disp-table.el
index a335d15241c..1acfc8ab8fe 100644
--- a/lisp/disp-table.el
+++ b/lisp/disp-table.el
@@ -163,9 +163,9 @@ X frame."
163 (logior uc (lsh (face-id 'underline) 19)) 163 (logior uc (lsh (face-id 'underline) 19))
164 (create-glyph (concat "\e[4m" (char-to-string uc) "\e[m")))))) 164 (create-glyph (concat "\e[4m" (char-to-string uc) "\e[m"))))))
165 165
166;; Allocate a glyph code to display by sending STRING to the terminal.
167;;;###autoload 166;;;###autoload
168(defun create-glyph (string) 167(defun create-glyph (string)
168 "Allocate a glyph code to display by sending STRING to the terminal."
169 (if (= (length glyph-table) 65536) 169 (if (= (length glyph-table) 65536)
170 (error "No free glyph codes remain")) 170 (error "No free glyph codes remain"))
171 ;; Don't use slots that correspond to ASCII characters. 171 ;; Don't use slots that correspond to ASCII characters.