From 810a4a0538eb9e97be2254cf3b6573bc1cb306ba Mon Sep 17 00:00:00 2001
From: David Thompson <dthompson@vistahigherlearning.com>
Date: Wed, 12 Jun 2019 09:48:55 -0400
Subject: node: Add setter for rank.

---
 starling/node.scm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/starling/node.scm b/starling/node.scm
index 578271e..73125da 100644
--- a/starling/node.scm
+++ b/starling/node.scm
@@ -55,7 +55,7 @@
   (name #:accessor name #:init-form (gensym "anonymous-") #:init-keyword #:name)
   ;; An integer value that determines priority order for
   ;; updating/rendering.
-  (rank #:getter rank #:init-value 0 #:init-keyword #:rank)
+  (rank #:accessor rank #:init-value 0 #:init-keyword #:rank)
   ;; The node that this node is attached to.  A node may only have one
   ;; parent.
   (parent #:accessor parent #:init-form #f)
-- 
cgit v1.2.3