diff options
| -rw-r--r-- | lisp/disp-table.el | 2 |
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. |