From 1365dd607f51217017f6de4c7246626a6fdd07e8 Mon Sep 17 00:00:00 2001
From: David Robillard <d@drobilla.net>
Date: Mon, 30 Apr 2012 20:37:54 +0000
Subject: Add puglIgnoreKeyRepeat and implement on X11. Add proper command line
 options for pugl_test.

---
 pugl/pugl.h          |  6 ++++++
 pugl/pugl_internal.h |  7 +++++++
 pugl/pugl_x11.c      | 13 +++++--------
 3 files changed, 18 insertions(+), 8 deletions(-)

(limited to 'pugl')

diff --git a/pugl/pugl.h b/pugl/pugl.h
index 45e1653..58b2101 100644
--- a/pugl/pugl.h
+++ b/pugl/pugl.h
@@ -249,6 +249,12 @@ puglGetHandle(PuglView* view);
 int
 puglGetModifiers(PuglView* view);
 
+/**
+   Ignore synthetic repeated key events.
+*/
+void
+puglIgnoreKeyRepeat(PuglView* view, bool ignore);
+
 /**
    Set the function to call when the window is closed.
 */
diff --git a/pugl/pugl_internal.h b/pugl/pugl_internal.h
index 21e9eb4..6ddcdf8 100644
--- a/pugl/pugl_internal.h
+++ b/pugl/pugl_internal.h
@@ -43,6 +43,7 @@ struct PuglViewImpl {
 	int  width;
 	int  height;
 	int  mods;
+	bool ignoreKeyRepeat;
 	bool redisplay;
 };
 
@@ -64,6 +65,12 @@ puglGetModifiers(PuglView* view)
 	return view->mods;
 }
 
+void
+puglIgnoreKeyRepeat(PuglView* view, bool ignore)
+{
+	view->ignoreKeyRepeat = ignore;
+}
+
 void
 puglSetCloseFunc(PuglView* view, PuglCloseFunc closeFunc)
 {
diff --git a/pugl/pugl_x11.c b/pugl/pugl_x11.c
index 08bfc40..35d2d42 100644
--- a/pugl/pugl_x11.c
+++ b/pugl/pugl_x11.c
@@ -156,7 +156,6 @@ puglDestroy(PuglView* view)
 		if (!glXMakeCurrent(view->impl->display, None, NULL)) {
 			printf("Could not release drawing context.\n");
 		}
-		/* destroy the context */
 		glXDestroyContext(view->impl->display, view->impl->ctx);
 		view->impl->ctx = NULL;
 	}
@@ -259,8 +258,6 @@ PuglStatus
 puglProcessEvents(PuglView* view)
 {
 	XEvent event;
-
-	/* handle the events in the queue */
 	while (XPending(view->impl->display) > 0) {
 		XNextEvent(view->impl->display, &event);
 		switch (event.type) {
@@ -331,20 +328,20 @@ puglProcessEvents(PuglView* view)
 			break;
 		case KeyRelease: {
 			setModifiers(view, event.xkey.state);
-			bool retriggered = false;
-			if (XEventsQueued(view->impl->display, QueuedAfterReading)) {
+			bool repeated = false;
+			if (view->ignoreKeyRepeat &&
+			    XEventsQueued(view->impl->display, QueuedAfterReading)) {
 				XEvent next;
 				XPeekEvent(view->impl->display, &next);
 				if (next.type == KeyPress &&
 				    next.xkey.time == event.xkey.time &&
 				    next.xkey.keycode == event.xkey.keycode) {
-					// Key repeat, ignore fake KeyPress event
 					XNextEvent(view->impl->display, &event);
-					retriggered = true;
+					repeated = true;
 				}
 			}
 
-			if (!retriggered && view->keyboardFunc) {
+			if (!repeated && view->keyboardFunc) {
 				KeySym sym = XKeycodeToKeysym(
 					view->impl->display, event.xkey.keycode, 0);
 				PuglKey special = keySymToSpecial(sym);
-- 
cgit v1.2.1