* descr-text.el (describe-char): Put the overlays over the

"displayed as" character.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 716555f2ffe1b26d38d5f4927247022b1f9193c5..f1f78c20bef147dd2e43f5fdf858891898f7ac3d 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2012-08-12  Andreas Schwab  <schwab@linux-m68k.org>
+
+       * descr-text.el (describe-char): Put the overlays over the
+       "displayed as" character.
+
 2012-08-12  Jay Belanger  <jay.p.belanger@gmail.com>
 
        * calc/calc-units.el (math-default-units-table): Give an

diff --git a/lisp/descr-text.el b/lisp/descr-text.el
index bf0e413d3573281871e4a8c04afbab15a45a90a1..34d61b80d66066b797f117452ea2e6d82c82e6b3 100644 (file)
--- a/lisp/descr-text.el
+++ b/lisp/descr-text.el
@@ -689,7 +689,7 @@ relevant to POS."
           (when overlays
             (save-excursion
               (goto-char (point-min))
-              (re-search-forward "character:[ \t\n]+")
+              (re-search-forward "(displayed as ")
               (let ((end (+ (point) (length char-description))))
                 (mapc (lambda (props)
                         (let ((o (make-overlay (point) end)))