X-Git-Url: https://git.jsancho.org/?a=blobdiff_plain;f=examples%2F01.HelloWorld.scm;h=b480c8934ccbac60ffc0361d3b2253e08649a58d;hb=db41186ef83fe5def23e3eacfbcea9248adf700e;hp=31db92b4ad453bd0cd7b242a29c8742a082f78fe;hpb=626e88180d4a966f12defc721c4a4411451ea916;p=guile-irrlicht.git

diff --git a/examples/01.HelloWorld.scm b/examples/01.HelloWorld.scm
index 31db92b..b480c89 100644
--- a/examples/01.HelloWorld.scm
+++ b/examples/01.HelloWorld.scm
@@ -61,10 +61,10 @@
 (add-camera-scene-node! scene-manager #:position '(0 30 -40) #:lookat '(0 5 0))
 
 ;; draw everything
-(while (device-run? device)
+(while (run device)
   (begin-scene driver #:color '(255 100 101 140))
-  (scene-draw-all scene-manager)
-  (gui-draw-all gui-env)
+  (draw-all scene-manager)
+  (draw-all gui-env)
   (end-scene driver))
 
 ;; delete device