Permalink
Browse files

Fix viewport setting.

  • Loading branch information...
Shinmera committed Jun 17, 2018
1 parent ae67e25 commit cd27fe580c1b9fc5d356c7ec16c715eda64f5bdd
Showing with 1 addition and 3 deletions.
  1. +0 −3 camera.lisp
  2. +1 −0 display.lisp
View
@@ -29,9 +29,6 @@
(defmethod setup-perspective :before ((camera camera) ev)
(reset-matrix *projection-matrix*))
(defmethod setup-perspective :after ((camera camera) ev)
(gl:viewport 0 0 (width ev) (height ev)))
(defmethod project-view :before ((camera camera) ev)
(reset-matrix))
View
@@ -60,6 +60,7 @@
(let ((c (clear-color target)))
(gl:clear-color (vx c) (vy c) (vz c) (if (vec4-p c) (vw c) 0.0)))
(gl:clear :color-buffer :depth-buffer :stencil-buffer)
(gl:viewport 0 0 (width context) (height context))
(call-next-method)
(swap-buffers context))))

0 comments on commit cd27fe5

Please sign in to comment.