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

diff --git a/examples/01.HelloWorld.scm b/examples/01.HelloWorld.scm
index 3f128cb..31db92b 100644
--- a/examples/01.HelloWorld.scm
+++ b/examples/01.HelloWorld.scm
@@ -48,10 +48,10 @@
 ;; load a Quake2 model
 (define mesh (get-mesh scene-manager "media/sydney.md2"))
 (when (not mesh)
-  (device-drop! device)
+  (drop! device)
   (exit #f))
 
-(define node (add-animated-mesh-scene-node scene-manager mesh))
+(define node (add-animated-mesh-scene-node! scene-manager mesh))
 (when node
   (set-material-flag! node 'lighting #f)
   (set-md2-animation! node 'stand)
@@ -68,5 +68,5 @@
   (end-scene driver))
 
 ;; delete device
-(device-drop! device)
+(drop! device)
 (exit #t)