From d04b3a83883dc4313addd8171c194524873ffe05 Mon Sep 17 00:00:00 2001
From: David Thompson <dthompson2@worcester.edu>
Date: Wed, 5 May 2021 19:10:46 -0400
Subject: graphics: model: Use default material when primtive doesn't specify.

---
 chickadee/graphics/model.scm | 3 +--
 1 file changed, 1 insertion(+), 2 deletions(-)

diff --git a/chickadee/graphics/model.scm b/chickadee/graphics/model.scm
index 3024673..7abd352 100644
--- a/chickadee/graphics/model.scm
+++ b/chickadee/graphics/model.scm
@@ -942,9 +942,8 @@
           (indices (match (number-ref/optional obj "indices")
                      (#f #f)
                      (n (vector-ref accessors n))))
-          ;; TODO: Set a default material when none is given.
           (material (match (number-ref/optional obj "material")
-                      (#f #f)
+                      (#f default-pbr-material)
                       (n (vector-ref materials n))))
           (mode (match (or (number-ref/optional obj "mode") 4)
                   (0 'points)
-- 
cgit v1.2.3