Subject: bug#41905: Small change: In Customize, display name with with spaces, but keep symbol name underneath.

From: Juri Linkov <[email-masked]>
Date: Mon, 07 Sep 2020 21:22:08 +0300

>>>> What I liked about the 'display approach is that it didn't seem to
>>>> require changes in the describe-* commands to work...
>>>
>>> That is a good point, and it would make C-h v make work automatically.
>>> But 'display properties are kinda awkward -- for one, the cursor moves
>>> over them in a single skip, so they're a bit confusing in that respect.
>>
>> Yes, that's true.  So...perhaps it's better to just ditch that idea.
>
> Just display spaces over every '-' character (and upper-case letters
> at word beginnings):
>
> (concat (propertize "f" 'display "F")
>         "ill"
>         (propertize "-" 'display " ")
>         (propertize "c" 'display "C")
>         "olumn")

Actually I meant not concat, but set-text-properties:

(let ((name "fill-column"))
 (set-text-properties 0 1 '(display "F") name)
 (set-text-properties 4 5 '(display " ") name)
 (set-text-properties 5 6 '(display "C") name)
 (insert name))