From 3afbafd38b47bbca7bed6e8881185433e81e1059 Mon Sep 17 00:00:00 2001 From: Nathan Marz Date: Mon, 5 Sep 2016 08:17:33 -0400 Subject: [PATCH] greatly speed up compilation (for select*, transform*, etc) --- src/clj/com/rpl/specter/impl.cljc | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/src/clj/com/rpl/specter/impl.cljc b/src/clj/com/rpl/specter/impl.cljc index 5999380..7c78f01 100644 --- a/src/clj/com/rpl/specter/impl.cljc +++ b/src/clj/com/rpl/specter/impl.cljc @@ -143,8 +143,8 @@ (if (rich-nav? p) p (do-comp-paths p))) (defn- coerce-object [this] - (cond (satisfies? p/ImplicitNav this) (p/implicit-nav this) - (rich-nav? this) this + (cond (rich-nav? this) this + (satisfies? p/ImplicitNav this) (p/implicit-nav this) :else (throw-illegal "Not a navigator: " this " " (pr-str (type this)))))