bug-gnu-emacs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

bug#31466: 27.0.50; customize-apropos: Separate package name from its de


From: Tino Calancha
Subject: bug#31466: 27.0.50; customize-apropos: Separate package name from its description
Date: Thu, 17 May 2018 11:57:39 +0900
User-agent: Gnus/5.13 (Gnus v5.13) Emacs/27.0.50 (gnu/linux)

Eli Zaretskii <address@hidden> writes:

>> ;; Without the extra space because looks a bit ugly in the link.
>> ;; If someone knows a way to add the extra space out of the link,
>> ;; that would be better.
>
> I think customize-group does a better job in presenting similar
> lists.  It uses :align-to display spec for that; can customize-apropos
> do something similar?  E.g., try "M-x customize-group RET RET".
Thanks for the tip.
I am not so familiar with this widget stuff.
Following is a hack but seems to work:
--8<-----------------------------cut here---------------start------------->8---
commit c12b63c079c9294819f1152912d9b3ad0c830717
Author: Tino Calancha <address@hidden>
Date:   Thu May 17 11:50:11 2018 +0900

    customize-apropos: Separate package name from its description
    
    * lisp/cus-edit.el (custom-buffer-create-internal):
    Indent the documentation from the package name in `customize-apropos',
    `customize-apropos-groups' commands (Bug#31466).

diff --git a/lisp/cus-edit.el b/lisp/cus-edit.el
index a12897e799..1496e0b89f 100644
--- a/lisp/cus-edit.el
+++ b/lisp/cus-edit.el
@@ -4145,7 +4145,9 @@ custom-group-value-create
           ;; Update buttons.
           (widget-put widget :buttons buttons)
           ;; Insert documentation.
-          (if (and (eq custom-buffer-style 'links) (> level 1))
+          (if (and (eq custom-buffer-style 'links)
+                   (or (> level 1)
+                       (memq this-command '(customize-apropos 
customize-apropos-groups))))
               (widget-put widget :documentation-indent
                           custom-group-doc-align-col))
           (widget-add-documentation-string-button

--8<-----------------------------cut here---------------end--------------->8---





reply via email to

[Prev in Thread] Current Thread [Next in Thread]