X-Git-Url: https://git.jsancho.org/?p=guile-irrlicht.git;a=blobdiff_plain;f=irrlicht%2Fgui.scm;h=18dc5592aaec8500ec85017453515f46aa891e0f;hp=10cf0bf05280c81ac192d324ad23766b6cd2f92b;hb=79027b9833bbb753e7576091a8907605c2d89707;hpb=a33bf2efe7a2578915cd27d3d2f3462c41ca0517

diff --git a/irrlicht/gui.scm b/irrlicht/gui.scm
index 10cf0bf..18dc559 100644
--- a/irrlicht/gui.scm
+++ b/irrlicht/gui.scm
@@ -80,7 +80,11 @@
 (define-class <gui-static-text> (<gui-element>)
   (irr-class #:init-value "IGUIStaticText"))
 
-(export <gui-static-text>)
+(define-method (set-override-color! (static-text <gui-static-text>) color)
+  (let ((setOverrideColor (get-irrlicht-proc "setOverrideColor" static-text)))
+    (setOverrideColor static-text color)))
+
+(export <gui-static-text> set-override-color!)
 
 
 ;; IGUIImage