summaryrefslogtreecommitdiff
path: root/lisp/disp-table.el
diff options
context:
space:
mode:
Diffstat (limited to 'lisp/disp-table.el')
-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."
(logior uc (lsh (face-id 'underline) 19))
(create-glyph (concat "\e[4m" (char-to-string uc) "\e[m"))))))
-;; Allocate a glyph code to display by sending STRING to the terminal.
;;;###autoload
(defun create-glyph (string)
+ "Allocate a glyph code to display by sending STRING to the terminal."
(if (= (length glyph-table) 65536)
(error "No free glyph codes remain"))
;; Don't use slots that correspond to ASCII characters.