Remove duplicate of next-event word

diff --git a/library/x11/events.factor b/library/x11/events.factor
index c9ff27343078ec4e9fb25b8316d45d837ad6485a..59519fc681a5ee1c34d62323d79aa65c32a83340 100644 (file)
--- a/library/x11/events.factor
+++ b/library/x11/events.factor
@@ -30,9 +30,6 @@ GENERIC: client-event ( event window -- )
 
 : events-queued ( mode -- n ) >r dpy get r> XEventsQueued ;
 
-: next-event ( -- event )
-    dpy get "XEvent" <c-object> dup >r XNextEvent drop r> ;
-
 : wait-event ( -- event )
     QueuedAfterFlush events-queued 0 >
     [ next-event ] [ ui-step wait-event ] if ;