summaryrefslogtreecommitdiff
path: root/lisp/nxml/nxml-mode.el
diff options
context:
space:
mode:
authorNoam Postavsky <npostavs@gmail.com>2019-04-19 13:28:00 -0400
committerNoam Postavsky <npostavs@gmail.com>2019-05-09 06:42:40 -0400
commite4cde42657f8f91f795e6b7041dc50b896dc468d (patch)
treeedb6b3c35f0ea9efe05d9cc92ec5599231563ff4 /lisp/nxml/nxml-mode.el
parentca14dd1d4628094dd33d5d94694dcf5f29e843b8 (diff)
downloademacs-e4cde42657f8f91f795e6b7041dc50b896dc468d.tar.gz
Disable extra display of &#10; in nxml-mode (Bug#32897)
* lisp/nxml/nxml-mode.el (nxml-char-ref-display-extra): Don't put display for the newline, it makes the indentation look wrong.
Diffstat (limited to 'lisp/nxml/nxml-mode.el')
-rw-r--r--lisp/nxml/nxml-mode.el4
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."
(put 'nxml-char-ref 'evaporate t)
(defun nxml-char-ref-display-extra (start end n)
- (when nxml-char-ref-extra-display
+ (when (and ;; Displaying literal newline is unhelpful.
+ (not (eql n ?\n))
+ nxml-char-ref-extra-display)
(let ((name (or (get-char-code-property n 'name)
(get-char-code-property n 'old-name)))
(glyph-string (and nxml-char-ref-display-glyph-flag