From c570ebda44a4f918a5a2d04456843af948fb3f97 Mon Sep 17 00:00:00 2001
From: Julian Squires <julian@cipht.net>
Date: Tue, 4 Nov 2008 22:11:24 -0500
Subject: [PATCH] Make get-mouse-button return a boolean.

---
 lib/glfw.lisp | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/lib/glfw.lisp b/lib/glfw.lisp
index 45cc292..c68ebd1 100644
--- a/lib/glfw.lisp
+++ b/lib/glfw.lisp
@@ -646,7 +646,7 @@ glfw::SwapBuffers must be called before any keyboard events are recorded and rep
 glfw::GetKey.
 ")
 
-(defcfun+doc ("glfwGetMouseButton" get-mouse-button) :int ((button :int))
+(defcfun+doc ("glfwGetMouseButton" get-mouse-button) :boolean ((button :int))
 	     "Parameters
 button
       A mouse button identifier, which can be one of the mouse button identifiers listed in table 3.4.
-- 
2.11.4.GIT