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:
fd9ef50
)
Adding DRAWING-AREA-GET-SIZE
author
espen
<espen>
Mon, 20 Dec 2004 00:51:38 +0000
(
00:51
+0000)
committer
espen
<espen>
Mon, 20 Dec 2004 00:51:38 +0000
(
00:51
+0000)
gtk/gtk.lisp
patch
|
blob
|
blame
|
history
diff --git
a/gtk/gtk.lisp
b/gtk/gtk.lisp
index 67433b5d1f5ffdbc4afbae60f75a0aa1397323ce..0f7426d0cc01dfd946eb3f4c652ba43ec5083133 100644
(file)
--- a/
gtk/gtk.lisp
+++ b/
gtk/gtk.lisp
@@
-15,7
+15,7
@@
;; License along with this library; if not, write to the Free Software
;; Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
;; License along with this library; if not, write to the Free Software
;; Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
-;; $Id: gtk.lisp,v 1.2
1 2004-12-16 23:49:53
espen Exp $
+;; $Id: gtk.lisp,v 1.2
2 2004-12-20 00:51:38
espen Exp $
(in-package "GTK")
(in-package "GTK")
@@
-453,7
+453,12
@@
(defmethod (setf container-children) (children (dialog dialog))
-;;; Drawing area -- no functions
+;;; Drawing area
+
+(defbinding drawing-area-get-size () nil
+ (drawing-area drawing-area)
+ (width int :out)
+ (height int :out))
;;; Entry
;;; Entry