Update examples/gtk/hello-world.scm.

This commit is contained in:
Sergey Cherepanov 2012-11-26 11:00:03 +11:00 committed by Lassi Kortela
parent bdfcc5fbfc
commit c4c11e6896
1 changed files with 3 additions and 0 deletions

View File

@ -3,4 +3,7 @@
(require 'gtk.la)
(gtk-init (command-line-args))
(define window (gtk-window-new 'gtk-window-toplevel))
(gtk-window-set-title window "Hello, World!")
(gtk-widget-show-all window)
(gtk-main)