avoid problems with complex inheritance tree and getters

[guile-irrlicht.git] / irrlicht / video.scm

diff --git a/irrlicht/video.scm b/irrlicht/video.scm
index 5659276c57bd432f90fc69c5926af973b0c28265..7dd433dc65b5d4b45dc71f91ac703b1b89d56fb8 100644 (file)
--- a/irrlicht/video.scm
+++ b/irrlicht/video.scm
@@ -27,14 +27,14 @@
 
 ;; ITexture
 (define-class <texture> (<irrlicht-base>)
-  (irr-class #:init-value "ITexture" #:getter irr-class))
+  (irr-class #:init-value "ITexture"))
 
 (export <texture>)
 
 
 ;; IVideoDriver
 (define-class <video-driver> (<irrlicht-base>)
-  (irr-class #:init-value "IVideoDriver" #:getter irr-class))
+  (irr-class #:init-value "IVideoDriver"))
 
 (define-method (begin-scene (video-driver <video-driver>) . rest)
   (let-keywords rest #f