From: Javier Sancho <jsf@jsancho.org>
Date: Fri, 25 Oct 2019 10:43:14 +0000 (+0200)
Subject: Use examples relative route for media
X-Git-Url: https://git.jsancho.org/?p=guile-irrlicht.git;a=commitdiff_plain;h=6d96d2506407a538ddb88fa97c9375b512571dda

Use examples relative route for media
---

diff --git a/examples/01.HelloWorld.scm b/examples/01.HelloWorld.scm
index 1df5080..ea5c5be 100644
--- a/examples/01.HelloWorld.scm
+++ b/examples/01.HelloWorld.scm
@@ -46,7 +46,7 @@
  #:border #t)
 
 ;; load a Quake2 model
-(define mesh (get-mesh scene-manager "examples/media/sydney.md2"))
+(define mesh (get-mesh scene-manager "media/sydney.md2"))
 (when (not mesh)
   (device-drop! device)
   (exit #f))
@@ -55,7 +55,7 @@
 (when node
   (set-material-flag-am! node 'lighting #f)
   (set-md2-animation! node 'stand)
-  (set-material-texture-am! node 0 (get-texture driver "examples/media/sydney.bmp")))
+  (set-material-texture-am! node 0 (get-texture driver "media/sydney.bmp")))
 
 ;; place camera
 (add-camera-scene-node scene-manager #:position '(0 30 -40) #:lookat '(0 5 0))