Can one use GnomeApp from guile-gnome?

I've been trying to figure out how to get a GnomeApp widget from guile, and failing.  I've got all the guile-gnome doc, the source, etc, and searching it isn't helping me figure this out.  So then I figured it just wasn't implemented in guile-gnome yet, but then I found on the web a few ancient email messages referring gnome-app-new as needing to be preceded by initializations such as gnome-program-init.  But that doesn't seem to be defined anywhere either.

Here is my minimal chunk of code, which is going on the theory that if only I could figure out how to create a GnomeApp I could work out the rest from the error messages, which strategy has worked well in the past.

I've commented out everything that has failed to work.


#!/usr/bin/guile \
--debug
!#


(use-modules (gnome-2) 
	     (oop goops) 
	     (gnome gobject) 
	     (gnome gtk)
	     (gnome gw libgnome)
	     (gnome gw libgnomeui)
	     (gnome gnome-ui)
	     ) ;; and the kitchen sink

(define (simple)
  ;(gnome-program-init "Simple" "0.0.1")
  (let* (
	 (window (make <gtk-window> #:type 'toplevel))
	 ;(window (make <gnome-app>))
	 ;(window (make <GnomeApp>))
	 ;(window (gnome-app-new "Simple" "er"))
	 ;(window (make <Gnome-App>))
	 ;(window (gnome_app_new "Simple"))
	 (button (make <gtk-button> #:label "Simple"))
	 ) 
    (add window button)
    (connect button 'clicked (lambda (b) (gtk-main-quit)))
    (show-all window)
    (gtk-main)))

(simple)



Judy Hawkins