Add bundle? function

This commit is contained in:
oakes
2014-04-09 20:00:35 -04:00
parent ad73891910
commit 3117bb7815

View File

@@ -19,6 +19,11 @@ override the equivalent keys in each entity when being drawn.
[& entities]
(BundleEntity. entities))
(defn bundle?
"Returns true if `entity` is a `bundle`."
[entity]
(isa? (type entity) BundleEntity))
(defn screenshot!
"Captures a screenshot and either returns it as a `pixmap` or saves it to the
specified path.