equal
deleted
inserted
replaced
726 (aset standard-display-table (unibyte-char-to-multibyte i) |
726 (aset standard-display-table (unibyte-char-to-multibyte i) |
727 (vector (make-glyph-code ?\\ 'escape-glyph) |
727 (vector (make-glyph-code ?\\ 'escape-glyph) |
728 (make-glyph-code ?x 'escape-glyph) |
728 (make-glyph-code ?x 'escape-glyph) |
729 (make-glyph-code hi 'escape-glyph) |
729 (make-glyph-code hi 'escape-glyph) |
730 (make-glyph-code low 'escape-glyph))) |
730 (make-glyph-code low 'escape-glyph))) |
731 (setq i (+ i 1)))) |
731 (setq i (1+ i))))) |
732 ) |
|
733 |
732 |
734 (defun my--get-char (name) |
733 (defun my--get-char (name) |
735 "Get character by Unicode `name'." |
734 "Get character by Unicode `name'." |
736 (cond |
735 (cond |
737 ((>= 26 emacs-major-version) |
736 ((>= 26 emacs-major-version) |