From 874cabdb2ddb2bcdce42a394829e724098b1898e Mon Sep 17 00:00:00 2001
From: gered <gered@blarg.ca>
Date: Sat, 21 May 2016 16:29:00 -0400
Subject: [PATCH] add put-hints!

mainly just a convenience function intended for iview implementation
libraries to make use of
---
 src/views/core.clj | 6 ++++++
 1 file changed, 6 insertions(+)

diff --git a/src/views/core.clj b/src/views/core.clj
index fdfdba9..d1b8372 100644
--- a/src/views/core.clj
+++ b/src/views/core.clj
@@ -350,6 +350,12 @@
   [hint]
   (swap! view-system update-in [:hints] (fnil conj #{}) hint))
 
+(defn put-hints!
+  "Adds a collection of hints to the view system by using the view system
+   configuration's :put-hints-fn."
+  [hints]
+  ((:put-hints-fn @view-system) hints))
+
 (defn add-views!
   "Add a collection of views to the system."
   [views]