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:
a457d47
)
Ignore initargs for parent and visible in widget class
author
espen
<espen>
Sun, 27 Feb 2005 15:39:52 +0000
(15:39 +0000)
committer
espen
<espen>
Sun, 27 Feb 2005 15:39:52 +0000
(15:39 +0000)
gtk/gtktypes.lisp
patch
|
blob
|
blame
|
history
diff --git
a/gtk/gtktypes.lisp
b/gtk/gtktypes.lisp
index 8d4eed069d60ead388973e80e8bf7c5fa17412ad..447422654f6cc88c855471e11d59c053265594b8 100644
(file)
--- a/
gtk/gtktypes.lisp
+++ b/
gtk/gtktypes.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: gtktypes.lisp,v 1.3
2 2005-02-22 23:12:0
2 espen Exp $
+;; $Id: gtktypes.lisp,v 1.3
3 2005-02-27 15:39:5
2 espen Exp $
(in-package "GTK")
(in-package "GTK")
@@
-153,10
+153,8
@@
(define-types-by-introspection "Gtk"
:getter "gtk_widget_get_window"
:reader widget-window
:type gdk:window)
:getter "gtk_widget_get_window"
:reader widget-window
:type gdk:window)
- (parent
- :allocation :property :pname "parent"
- :reader widget-parent
- :type container)
+ (parent :merge t :initarg nil)
+ (visible :merge t :initarg nil)
(parent-window
:allocation :virtual
:getter %widget-parent-window
(parent-window
:allocation :virtual
:getter %widget-parent-window