unofficial mirror of emacs-devel@gnu.org 
 help / color / mirror / code / Atom feed
From: Lennart Borgman <lennart.borgman.073@student.lu.se>
Subject: Patch: Replacing the style of the More/Hide Rest button in Customize
Date: Sun, 19 Feb 2006 00:17:34 +0100	[thread overview]
Message-ID: <43F7AB0E.1050407@student.lu.se> (raw)

[-- Attachment #1: Type: text/plain, Size: 260 bytes --]

The attached small patch makes the More/Hide Rest button in customize 
look more like a link, which in my opinion is more common (web pages). I 
have sent something like it before, but we never got any further because 
of problems with my papers at that time.

[-- Attachment #2: wid-edit-more-hide.patch --]
[-- Type: text/plain, Size: 1491 bytes --]

Index: lisp/wid-edit.el
===================================================================
RCS file: /cvsroot/emacs/emacs/lisp/wid-edit.el,v
retrieving revision 1.166
diff -c -r1.166 wid-edit.el
*** lisp/wid-edit.el	16 Feb 2006 15:58:32 -0000	1.166
--- lisp/wid-edit.el	18 Feb 2006 23:08:34 -0000
***************
*** 124,129 ****
--- 124,136 ----
    :type 'face
    :group 'widget-faces)
  
+ (defface widget-link-face
+   `((((class color) (background light)) (:foreground "blue" :underline t))
+     (((class color) (background dark)) (:foreground "cyan" :underline t)))
+   "Face used to highlight attributes that are links."
+   :group 'custom-faces)
+ 
+ 
  ;; TTY gets special definitions here and in the next defface, because
  ;; the gray colors defined for other displays cause black text on a black
  ;; background, at least on light-background TTYs.
***************
*** 2917,2924 ****
  		(widget-create-child-and-convert
  		 widget 'visibility
  		 :help-echo "Show or hide rest of the documentation."
! 		 :on "Hide Rest"
! 		 :off "More"
  		 :always-active t
  		 :action 'widget-parent-action
  		 shown))
--- 2924,2934 ----
  		(widget-create-child-and-convert
  		 widget 'visibility
  		 :help-echo "Show or hide rest of the documentation."
! 		 :on "<<"
! 		 :off "More..."
!                  :button-face 'widget-link-face
!                  :button-prefix ""
!                  :button-suffix ""
  		 :always-active t
  		 :action 'widget-parent-action
  		 shown))

[-- Attachment #3: Type: text/plain, Size: 142 bytes --]

_______________________________________________
Emacs-devel mailing list
Emacs-devel@gnu.org
http://lists.gnu.org/mailman/listinfo/emacs-devel

             reply	other threads:[~2006-02-18 23:17 UTC|newest]

Thread overview: 9+ messages / expand[flat|nested]  mbox.gz  Atom feed  top
2006-02-18 23:17 Lennart Borgman [this message]
2006-02-18 23:59 ` Patch: Replacing the style of the More/Hide Rest button in Customize Chong Yidong
2006-02-19  0:09   ` Lennart Borgman
2006-02-19 17:17 ` Juri Linkov
2006-02-19 21:06   ` Lennart Borgman
2006-02-20  0:52     ` Juri Linkov
2006-02-19 22:47 ` Richard M. Stallman
2006-02-19 22:49   ` Lennart Borgman
2006-02-20 18:42     ` Richard M. Stallman

Reply instructions:

You may reply publicly to this message via plain-text email
using any one of the following methods:

* Save the following mbox file, import it into your mail client,
  and reply-to-all from there: mbox

  Avoid top-posting and favor interleaved quoting:
  https://en.wikipedia.org/wiki/Posting_style#Interleaved_style

  List information: https://www.gnu.org/software/emacs/

* Reply using the --to, --cc, and --in-reply-to
  switches of git-send-email(1):

  git send-email \
    --in-reply-to=43F7AB0E.1050407@student.lu.se \
    --to=lennart.borgman.073@student.lu.se \
    /path/to/YOUR_REPLY

  https://kernel.org/pub/software/scm/git/docs/git-send-email.html

* If your mail client supports setting the In-Reply-To header
  via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line before the message body.
Code repositories for project(s) associated with this public inbox

	https://git.savannah.gnu.org/cgit/emacs.git

This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).