From 3560ef6b6d1c07e7f6ebde5dc4a8dde05fc97c42 Mon Sep 17 00:00:00 2001
From: Eduardo Cavazos <wayo.cavazos@gmail.com>
Date: Fri, 30 Dec 2005 15:37:58 +0000
Subject: [PATCH] *** empty log message ***

---
 contrib/x11/concurrent-widgets.factor | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/contrib/x11/concurrent-widgets.factor b/contrib/x11/concurrent-widgets.factor
index f3998d4d42..433f1d1b7c 100644
--- a/contrib/x11/concurrent-widgets.factor
+++ b/contrib/x11/concurrent-widgets.factor
@@ -142,7 +142,7 @@ dup >r [ select-input ] with-window-object
 r> ;
 
 M: button handle-button-press-event ( event <button> -- )
-  swap drop button-action call ;
+nip button-action call ;
 
 ! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
 ! <menu>