branch: externals/cus-abbrev
commit ee54af6ec8450f4682d961715afeda325b96fe0d
Author: Mauro Aranda <maurooara...@gmail.com>
Commit: Mauro Aranda <maurooara...@gmail.com>

    Improve link in Customize Abbrevs buffer
    
    * cus-abbrev.el (customize-abbrevs): Use widget-button face for the
    variable-link.
    Also, add the abbrev-table being customized to the buffer name.
---
 cus-abbrev.el | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/cus-abbrev.el b/cus-abbrev.el
index 4a5a9c73c5..57a4cede77 100644
--- a/cus-abbrev.el
+++ b/cus-abbrev.el
@@ -239,10 +239,10 @@ the abbrev table to customize.  If nil, it defaults to 
`global-abbrev-table'."
                             abbrevs)))))
               table)
     (setq abbrevs (nreverse abbrevs))
-    (custom-abbrev--prepare-buffer "*Customize Abbrevs*")
+    (custom-abbrev--prepare-buffer (format "*Customize Abbrevs: %s*" 
table-name))
     (widget-insert "This buffer is for customizing abbrevs\n")
     (widget-insert "in abbrev table: ")
-    (widget-create 'variable-link table-name)
+    (widget-create 'variable-link :button-face 'widget-button table-name)
     (widget-insert "\n\nCheck the ")
     (widget-create 'custom-manual :tag "Abbrev section" "(emacs)Abbrevs")
     (widget-insert " in the Emacs manual for more information.\n\n")

Reply via email to