master e0c77bb 1/2: Display name with with spaces, but keep symbol name underneath

[Lars Ingebrigtsen]

branch: master
commit e0c77bb62c1c950a82ea0517646d989dc5c1fe27
Author: ej-32u <ej32u@protonmail.com>
Commit: Lars Ingebrigtsen <larsi@gnus.org>

    Display name with with spaces, but keep symbol name underneath
    
    * lisp/cus-edit.el (custom-unlispify-menu-entry): Display the
    pretty name, but keep the real symbol name as the value (bug#41905).
    
    Copyright-paperwork-exempt: yes
---
 lisp/cus-edit.el | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/lisp/cus-edit.el b/lisp/cus-edit.el
index 23ceb3a..59ac52f 100644
--- a/lisp/cus-edit.el
+++ b/lisp/cus-edit.el
@@ -561,7 +561,8 @@ value unless you are sure you know what it does."
           (unless no-suffix
             (goto-char (point-max))
             (insert "..."))
-          (buffer-string)))))
+          (propertize (symbol-name symbol)
+                       'display (buffer-string))))))
 
 (defcustom custom-unlispify-tag-names t
   "Display tag names as words instead of symbols if non-nil."