X-Git-Url: https://git.jsancho.org/?a=blobdiff_plain;f=examples%2Fhello.scm;h=c8643b569c303ba1ba5cdc5f99dd6eee6e949501;hb=2bfad8c43ad04ba9e670b7274a2661b27c02d6a2;hp=4f9026e604e73a8428e03250b54d74d553d2419e;hpb=e5e7eb38adfd41fb25e8f808f0501ffaac2812b8;p=guile-irrlicht.git

diff --git a/examples/hello.scm b/examples/hello.scm
index 4f9026e..c8643b5 100644
--- a/examples/hello.scm
+++ b/examples/hello.scm
@@ -23,3 +23,5 @@
 (define device (create-device 'opengl))
 (define driver (get-video-driver device))
 (define scene-manager (get-scene-manager device))
+
+(set-window-caption! device "Hello World!")