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