X-Git-Url: https://www.chiark.greenend.org.uk/ucgi/~mdw/git/clg/blobdiff_plain/7e642867d5b0bfae81f86c76e69ac5db2002d8d6..adc20f66cbd970ba6f8d495646ee27498eb8f1f2:/hello-world.lisp diff --git a/hello-world.lisp b/hello-world.lisp index f700cb2..ab99220 100644 --- a/hello-world.lisp +++ b/hello-world.lisp @@ -1,10 +1,12 @@ (use-package :gtk) +(clg-init) + (make-instance 'window ; :type :toplevel :title "Test" :border-width 5 - :show-all t + :visible t :show-children t :child (make-instance 'button :label "Hello World!" :signal (list 'clicked