chiark
/
gitweb
/
~mdw
/
clg
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
|
inline
| side by side (parent:
6b8476e
)
gtk/gtk.lisp: Apparently when you ask for a stock Button, you get a Bin.
master
author
Mark Wooding
<mdw@distorted.org.uk>
Fri, 22 Mar 2013 02:21:45 +0000
(
02:21
+0000)
committer
Mark Wooding
<mdw@distorted.org.uk>
Fri, 22 Mar 2013 02:21:45 +0000
(
02:21
+0000)
So relax the type check on the return value of `gtk:%dialog-add-button'.
gtk/gtk.lisp
patch
|
blob
|
blame
|
history
diff --git
a/gtk/gtk.lisp
b/gtk/gtk.lisp
index b4038d30b9a39e3fb9fb944cd5e07d0bc3b96777..f193114e85b3f7e2a90e0f3bef6136688fb0ce60 100644
(file)
--- a/
gtk/gtk.lisp
+++ b/
gtk/gtk.lisp
@@
-875,7
+875,7
@@
(defbinding dialog-response (dialog response) nil
((dialog-response-id dialog response nil t) int))
((dialog-response-id dialog response nil t) int))
-(defbinding %dialog-add-button () b
utto
n
+(defbinding %dialog-add-button () b
i
n
(dialog dialog)
(text string)
(response-id int))
(dialog dialog)
(text string)
(response-id int))