X-Git-Url: https://git.jsancho.org/?a=blobdiff_plain;f=examples%2F02.Quake3Map.scm;h=47c81254b679a84f2e213aa9327a9d8006f7c49d;hb=9eb3d3607d4468b525df34096657fd04f77724e7;hp=45249aceb562599864cd6c06e2325aad25c6765e;hpb=340d6bc2e11c89f4ae048d37a080a1cf371f47e6;p=guile-irrlicht.git

diff --git a/examples/02.Quake3Map.scm b/examples/02.Quake3Map.scm
index 45249ac..47c8125 100644
--- a/examples/02.Quake3Map.scm
+++ b/examples/02.Quake3Map.scm
@@ -59,13 +59,13 @@
 ;; instances for doing things
 (define driver (get-video-driver device))
 (define scene-manager (get-scene-manager device))
-(define driver-name (get-video-driver-name driver))
+(define driver-name (get-name driver))
 
 ;; load Quake3 map
 (add-file-archive! (get-file-system device) "media/map-20kdm2.pk3")
 
 (define mesh (get-mesh scene-manager "20kdm2.bsp"))
-(define node (add-octree-scene-node
+(define node (add-octree-scene-node!
               scene-manager mesh
               #:minimal-polys-per-node 1024))
 (set-position! node '(-1300 -144 -1249))