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

[bpt/emacs.git] / lisp / descr-text.el

diff --git a/lisp/descr-text.el b/lisp/descr-text.el
index bf0e413..34d61b8 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)))