view lisp/sb-mail.xpm @ 48574:3e3b1f1265f5

Avoid accidental yanking of text while scrolling with the mouse wheel. This adds a short period after each mouse wheel scroll event where a click on the mouse wheel button is ignored. (mouse-wheel-click-event, mouse-wheel-inhibit-click-time): New customs. (mouse-wheel-click-button, mwheel-inhibit-click-event-timer): New vars. (mwheel-inhibit-click-timeout,mwheel-filter-click-events): New defuns. (mwheel-scroll): Add mwheel-filter-click-events as pre-command-hook. Start mwheel-inhibit-click-event-timer with timeout handler mwheel-inhibit-click-timeout.
author Kim F. Storm <storm@cua.dk>
date Thu, 28 Nov 2002 23:03:30 +0000
parents c0758fd9ca7a
children c2a09ac7b7b1
line wrap: on
line source

/* XPM */
static char * sb_mail_xpm[] = {
"20 15 4 1",
" 	c None",
".	c #828282",
"+	c #000000",
"@	c #FFFFFF",
"................... ",
".++++++++++++++++++.",
".++@@@@@@@@@@@@@@++.",
".+@++@@@@@@@@@@++@+.",
".+@@@++@@@@@@++@@@+.",
".+@@@@@++@@++@@@@@+.",
".+@@@@@@@++@@@@@@@+.",
".+@@@@@@@@@@@@@@@@+.",
".+@@@@+@@@@@@+@@@@+.",
".+@@@@@@@@@@@@@@@@+.",
".+@@+@@@@@@@@@@+@@+.",
".+@@@@@@@@@@@@@@@@+.",
".++@@@@@@@@@@@@@@++.",
".++++++++++++++++++.",
" .................. "};