diff options
| -rw-r--r-- | lisp/nxml/nxml-mode.el | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/lisp/nxml/nxml-mode.el b/lisp/nxml/nxml-mode.el index f17f5843b80..ab035b927ee 100644 --- a/lisp/nxml/nxml-mode.el +++ b/lisp/nxml/nxml-mode.el | |||
| @@ -2378,7 +2378,9 @@ With a prefix argument, inserts the character directly." | |||
| 2378 | (put 'nxml-char-ref 'evaporate t) | 2378 | (put 'nxml-char-ref 'evaporate t) |
| 2379 | 2379 | ||
| 2380 | (defun nxml-char-ref-display-extra (start end n) | 2380 | (defun nxml-char-ref-display-extra (start end n) |
| 2381 | (when nxml-char-ref-extra-display | 2381 | (when (and ;; Displaying literal newline is unhelpful. |
| 2382 | (not (eql n ?\n)) | ||
| 2383 | nxml-char-ref-extra-display) | ||
| 2382 | (let ((name (or (get-char-code-property n 'name) | 2384 | (let ((name (or (get-char-code-property n 'name) |
| 2383 | (get-char-code-property n 'old-name))) | 2385 | (get-char-code-property n 'old-name))) |
| 2384 | (glyph-string (and nxml-char-ref-display-glyph-flag | 2386 | (glyph-string (and nxml-char-ref-display-glyph-flag |