[Emacs-diffs] /srv/bzr/emacs/trunk r109573: * descr-text.el (describe-char): Put the overlays over the

[Andreas Schwab]

------------------------------------------------------------
revno: 109573
committer: Andreas Schwab <address@hidden>
branch nick: emacs
timestamp: Sun 2012-08-12 11:35:57 +0200
message:
  * descr-text.el (describe-char): Put the overlays over the
  "displayed as" character.
modified:
  lisp/ChangeLog
  lisp/descr-text.el

=== modified file 'lisp/ChangeLog'
--- a/lisp/ChangeLog    2012-08-12 04:32:28 +0000
+++ b/lisp/ChangeLog    2012-08-12 09:35:57 +0000
@@ -1,3 +1,8 @@
+2012-08-12  Andreas Schwab  <address@hidden>
+
+       * descr-text.el (describe-char): Put the overlays over the
+       "displayed as" character.
+
 2012-08-12  Jay Belanger  <address@hidden>
 
        * calc/calc-units.el (math-default-units-table): Give an

=== modified file 'lisp/descr-text.el'
--- a/lisp/descr-text.el        2012-08-09 08:10:32 +0000
+++ b/lisp/descr-text.el        2012-08-12 09:35:57 +0000
@@ -689,7 +689,7 @@
           (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)))