summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--sly/render/renderer.scm1
1 files changed, 1 insertions, 0 deletions
diff --git a/sly/render/renderer.scm b/sly/render/renderer.scm
index a0ac2ca..76cc4aa 100644
--- a/sly/render/renderer.scm
+++ b/sly/render/renderer.scm
@@ -114,6 +114,7 @@ uniform variable 'mvp'."
"Apply all of the render operations in RENDERER. The render
operations are applied once for each camera."
(define (render-with-camera camera)
+ (apply-viewport (camera-viewport camera))
(let ((view (transform* (camera-projection camera)
(camera-location camera))))
(for-each (cut apply-render-op view <>)