[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
custom-link vs custom-button face
From: |
martin rudalics |
Subject: |
custom-link vs custom-button face |
Date: |
Fri, 06 Jan 2006 10:57:12 +0100 |
User-agent: |
Mozilla Thunderbird 1.0 (Windows/20041206) |
When "See also ..." and "Parent documentation" links don't reference a
manual they are displayed with `custom-button' instead of `custom-link'
face. The tiny patch below should fix that.
*** cus-edit.el Thu Jan 5 07:44:36 2006
--- cus-edit.el Fri Jan 6 10:31:08 2006
***************
*** 2198,2204 ****
(insert prefix))
(insert "See also ")
(while links
! (push (widget-create-child-and-convert widget (car links))
buttons)
(setq links (cdr links))
(cond ((null links)
--- 2198,2207 ----
(insert prefix))
(insert "See also ")
(while links
! (push (widget-create-child-and-convert
! widget (car links)
! :button-face 'custom-link
! :mouse-face 'highlight)
buttons)
(setq links (cdr links))
(cond ((null links)
***************
*** 2243,2249 ****
(when links
(insert "\nParent documentation: ")
(while links
! (push (widget-create-child-and-convert widget (car links))
buttons)
(setq links (cdr links))
(cond ((null links)
--- 2246,2255 ----
(when links
(insert "\nParent documentation: ")
(while links
! (push (widget-create-child-and-convert
! widget (car links)
! :button-face 'custom-link
! :mouse-face 'highlight)
buttons)
(setq links (cdr links))
(cond ((null links)
- custom-link vs custom-button face,
martin rudalics <=