2001-09-06  Martin Baulig  <baulig@suse.de>

	* gnome-gtk.gwp (%gtk-object-ref, %gtk-object-sink):
	New private functions.

	* gtk.scm (initialize (<gtk-object>)):
	Do a `(%gtk-object-ref obj) (%gtk-object-sink obj)'.

