summaryrefslogtreecommitdiff
path: root/chickadee/graphics/path.scm
diff options
context:
space:
mode:
Diffstat (limited to 'chickadee/graphics/path.scm')
-rw-r--r--chickadee/graphics/path.scm7
1 files changed, 3 insertions, 4 deletions
diff --git a/chickadee/graphics/path.scm b/chickadee/graphics/path.scm
index 3500c15..ca1b0be 100644
--- a/chickadee/graphics/path.scm
+++ b/chickadee/graphics/path.scm
@@ -27,6 +27,7 @@
#:use-module (chickadee graphics)
#:use-module (chickadee graphics color)
#:use-module (chickadee graphics gl)
+ #:use-module (chickadee graphics polygon)
#:use-module (chickadee graphics shader)
#:use-module (chickadee graphics stencil)
#:use-module (chickadee graphics buffer)
@@ -1240,8 +1241,7 @@
(matrix4-mult! *mvp* matrix (current-projection))
;; Wireframe debug mode.
(when *debug?*
- (begin
- (gl-polygon-mode (cull-face-mode front) (polygon-mode line))
+ (with-polygon-mode line-polygon-mode
(let loop ((i 0))
(when (< i n)
(gpu-apply* (force path-shader)
@@ -1250,8 +1250,7 @@
(u32vector-ref counts i)
#:mvp (current-projection)
#:mode 0)
- (loop (+ i 1))))
- (gl-polygon-mode (cull-face-mode front) (polygon-mode fill))))
+ (loop (+ i 1))))))
;; Anti-alias the edges of the fill.
(with-multisample #t
;; Render fan to stencil buffer. Each time a triangle is