From 8bdd4dc621033ad58371ebd623f7efb1f963ad2f Mon Sep 17 00:00:00 2001
From: Mark Wooding <mdw@distorted.org.uk>
Date: Fri, 22 Mar 2013 02:21:45 +0000
Subject: [PATCH] gtk/gtk.lisp: Apparently when you ask for a stock Button, you
 get a Bin.

So relax the type check on the return value of `gtk:%dialog-add-button'.
---
 gtk/gtk.lisp | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/gtk/gtk.lisp b/gtk/gtk.lisp
index b4038d3..f193114 100644
--- a/gtk/gtk.lisp
+++ b/gtk/gtk.lisp
@@ -875,7 +875,7 @@
   ((dialog-response-id dialog response nil t) int))
 
 
-(defbinding %dialog-add-button () button
+(defbinding %dialog-add-button () bin
   (dialog dialog)
   (text string)
   (response-id int))
-- 
2.11.0