master c99a1bb1cfc 1/2: With glasses-uncapitalize-p, use a display overlay property

[Eli Zaretskii]

branch: master
commit c99a1bb1cfc758d3ba78581b72ef8412ee258f76
Author: Augusto Stoffel <arstoffel@gmail.com>
Commit: Eli Zaretskii <eliz@gnu.org>

    With glasses-uncapitalize-p, use a display overlay property
    
    * lisp/progmodes/glasses.el (glasses-make-readable): Use the
    'display' property instead of 'after-string', so that one is
    able to place the cursor on the uncapitalized character.
    (Bug#70441)
---
 lisp/progmodes/glasses.el | 3 +--
 1 file changed, 1 insertion(+), 2 deletions(-)

diff --git a/lisp/progmodes/glasses.el b/lisp/progmodes/glasses.el
index 92de2a2581f..18ab4911c89 100644
--- a/lisp/progmodes/glasses.el
+++ b/lisp/progmodes/glasses.el
@@ -232,8 +232,7 @@ CATEGORY is the overlay category.  If it is nil, use the 
`glasses' category."
                         (save-match-data
                           (re-search-backward "\\<.")
                           (looking-at glasses-uncapitalize-regexp))))
-             (overlay-put o 'invisible t)
-             (overlay-put o 'after-string (downcase (match-string n))))))
+             (overlay-put o 'display (downcase (match-string n))))))
         ;; Separator change
        (when (and (not (string= glasses-original-separator glasses-separator))
                   (not (string= glasses-original-separator "")))