unofficial mirror of emacs-devel@gnu.org 
 help / color / mirror / code / Atom feed
* Buttons in Customize buffers
@ 2005-01-22 11:24 Eli Zaretskii
  2005-01-22 16:12 ` Stefan Monnier
  2005-01-22 23:39 ` Kim F. Storm
  0 siblings, 2 replies; 7+ messages in thread
From: Eli Zaretskii @ 2005-01-22 11:24 UTC (permalink / raw)


Buttons in Customize buffers used to have a special mouse-face, but
that was removed in favor of changing the mouse pointer shape by this
change:

    2004-06-08  Kim F. Storm  <storm@cua.dk>

	    * wid-edit.el (widget-specify-button): Use hand pointer rather
	    than mouse-face as visible mouse-over effect.

That is okay for graphics displays, but not for mouse-capable text
terminals, since the latter cannot change the mouse pointer shape.
The MS-DOS terminal is one case, but I'm guessing that non-windows
sessions on an xterm with xt-mouse loaded are suffering from the same
problem.

Is the following change okay to install?

Index: lisp/wid-edit.el
===================================================================
RCS file: /cvsroot/emacs/emacs/lisp/wid-edit.el,v
retrieving revision 1.134
diff -u -r1.134 wid-edit.el
--- lisp/wid-edit.el	27 Dec 2004 16:38:57 -0000	1.134
+++ lisp/wid-edit.el	22 Jan 2005 11:22:52 -0000
@@ -391,7 +391,11 @@
     (overlay-put overlay 'evaporate t)
     ;; We want to avoid the face with image buttons.
     (unless (widget-get widget :suppress-face)
-      (overlay-put overlay 'face (widget-apply widget :button-face-get)))
+      (overlay-put overlay 'face (widget-apply widget :button-face-get))
+      ; Text terminals cannot change mouse pointer shape, so use mouse
+      ; face instead.
+      (or (display-graphic-p)
+	  (overlay-put overlay 'mouse-face widget-mouse-face)))
     (overlay-put overlay 'pointer 'hand)
     (overlay-put overlay 'follow-link follow-link)
     (overlay-put overlay 'help-echo help-echo)))

^ permalink raw reply	[flat|nested] 7+ messages in thread

end of thread, other threads:[~2005-01-29 13:23 UTC | newest]

Thread overview: 7+ messages (download: mbox.gz follow: Atom feed
-- links below jump to the message on this page --
2005-01-22 11:24 Buttons in Customize buffers Eli Zaretskii
2005-01-22 16:12 ` Stefan Monnier
2005-01-22 16:26   ` Eli Zaretskii
2005-01-22 16:41     ` Stefan Monnier
2005-01-22 19:11       ` Eli Zaretskii
2005-01-22 23:39 ` Kim F. Storm
2005-01-29 13:23   ` Eli Zaretskii

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).