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