Fix #20

Shirakumo · Apr 21, 2019 · a7b38d9 · a7b38d9
1 parent b5c84e5
commit a7b38d9
Showing 1 changed file with 3 additions and 1 deletion.
diff --git a/shader-entity.lisp b/shader-entity.lisp
@@ -76,7 +76,9 @@
     effective-buffers))
 
 (defmethod compute-effective-shader-class ((class shader-entity-class))
-  (if (direct-shaders class)
+  (if (or (direct-shaders class)
+          ;; break-out path for shader-entity.
+          (null (find-class 'shader-entity NIL)))
       class
       (let* ((effective-superclasses (list (find-class 'shader-entity))))
         ;; Loop through superclasses and push new, effective superclasses.