diff options
-rw-r--r-- | chickadee/graphics/model.scm | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/chickadee/graphics/model.scm b/chickadee/graphics/model.scm index 0d8947c..152cee9 100644 --- a/chickadee/graphics/model.scm +++ b/chickadee/graphics/model.scm @@ -91,8 +91,8 @@ (define (render-state-world-model-matrix-mult! state matrix) (matrix4-mult! (render-state-world-model-matrix state) - (render-state-model-matrix state) - matrix)) + matrix + (render-state-model-matrix state))) ;;; @@ -1019,7 +1019,7 @@ (match translation (#(x y z) (matrix4-translate (vec3 x y z)))))))) - (world-matrix (matrix4* parent-matrix matrix)) + (world-matrix (matrix4* matrix parent-matrix)) (mesh (match (number-ref/optional obj "mesh") (#f #f) (n (vector-ref meshes n)))) |