From 20c3c95f0fa01bb674d63354de1042c0be4ca6f8 Mon Sep 17 00:00:00 2001
From: David Thompson <dthompson2@worcester.edu>
Date: Thu, 19 Jan 2017 11:14:01 -0500
Subject: render: viewport: Change %standard-clear-flags to
 %default-clear-flags.

---
 chickadee/render/viewport.scm | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

diff --git a/chickadee/render/viewport.scm b/chickadee/render/viewport.scm
index b4a4ce3..6789766 100644
--- a/chickadee/render/viewport.scm
+++ b/chickadee/render/viewport.scm
@@ -38,7 +38,7 @@
             viewport-clear-color
             viewport-clear-flags
             null-viewport
-            %standard-clear-flags
+            %default-clear-flags
             %default-clear-color
             apply-viewport
             *viewport-state*))
@@ -53,7 +53,7 @@
   (clear-color viewport-clear-color)
   (clear-flags viewport-clear-flags))
 
-(define %standard-clear-flags '(color-buffer depth-buffer))
+(define %default-clear-flags '(color-buffer depth-buffer))
 ;; Just a fun color from the Dawnbringer 32-color palette instead of
 ;; boring old black.
 (define %default-clear-color (rgb #x45283c))
@@ -65,6 +65,7 @@
 
 (define* (make-viewport x y width height #:key
                         (clear-color %default-clear-color)
+                        (clear-flags %default-clear-flags))
   "Create a viewport that covers an area of the window starting from
 coordinates (X, Y) and spanning WIDTH x HEIGHT pixels.  Fill the
 viewport with CLEAR-COLOR when clearing the screen.  Clear the buffers
-- 
cgit v1.2.3