fixed button-drawing

2003-04-17 13:55:23 +00:00 · 2003-04-17 13:55:23 +00:00 · 2bb7ad1876
parent 10326db4a4
commit 2bb7ad1876
1 changed files with 2 additions and 1 deletions
--- a/src/button.scm
+++ b/src/button.scm
@ -33,7 +33,8 @@
     (list 'button button)
     (lambda (release)
       (call-with-event-channel
-	dpy window (event-mask exposure structure-notify button-press)
+	dpy window (event-mask exposure structure-notify
+			       button-press button-release)
 	(lambda (event-channel)
 	  (release)
 	  (let loop ((state 'up))