From c7252a2b90b5b123f487b30a251d5f689e222ead Mon Sep 17 00:00:00 2001 From: Alex Engelberg Date: Tue, 19 Apr 2016 12:04:18 -0700 Subject: [PATCH] Changed name from 'select-view' to 'subselect' --- src/clj/com/rpl/specter.cljx | 2 +- test/com/rpl/specter/core_test.cljx | 10 +++++----- 2 files changed, 6 insertions(+), 6 deletions(-) diff --git a/src/clj/com/rpl/specter.cljx b/src/clj/com/rpl/specter.cljx index 42b32c2..7eae7ab 100644 --- a/src/clj/com/rpl/specter.cljx +++ b/src/clj/com/rpl/specter.cljx @@ -256,7 +256,7 @@ ancestry)) ))) -(defn select-view +(defn subselect "Navigates to a sequence that contains the results of (select ...), but is a view to the original structure that can be transformed. diff --git a/test/com/rpl/specter/core_test.cljx b/test/com/rpl/specter/core_test.cljx index 29d974f..9a54ebd 100644 --- a/test/com/rpl/specter/core_test.cljx +++ b/test/com/rpl/specter/core_test.cljx @@ -510,18 +510,18 @@ )) )) -(defspec select-view-nested-vectors +(defspec subselect-nested-vectors (for-all+ [v1 (gen/vector (gen/vector gen/int))] - (let [path (s/comp-paths (s/select-view s/ALL s/ALL)) + (let [path (s/comp-paths (s/subselect s/ALL s/ALL)) v2 (s/compiled-transform path reverse v1)] (and (= (s/compiled-select path v1) [(flatten v1)]) (= (flatten v1) (reverse (flatten v2))) (= (map count v1) (map count v2)))))) -(defspec select-view-param-test +(defspec subselect-param-test (for-all+ [k gen/keyword v (gen/vector @@ -531,9 +531,9 @@ gen/int k)))] (and - (= (s/compiled-select ((s/select-view s/ALL s/keypath) k) v) + (= (s/compiled-select ((s/subselect s/ALL s/keypath) k) v) [(map k v)]) - (let [v2 (s/compiled-transform ((s/comp-paths (s/select-view s/ALL s/keypath)) k) + (let [v2 (s/compiled-transform ((s/comp-paths (s/subselect s/ALL s/keypath)) k) reverse v)] (and (= (map k v) (reverse (map k v2)))