Implement CaseSensitiveQuery #39
1 changed files with 2 additions and 1 deletions
|
@ -28,5 +28,6 @@
|
||||||
(defn case-insensitive-filter
|
(defn case-insensitive-filter
|
||||||
"Returns true if string [s] is case-matched by query"
|
"Returns true if string [s] is case-matched by query"
|
||||||
[s queries]
|
[s queries]
|
||||||
(basic-filter (cs/lower-case s) (cs/lower-case s)))
|
(case-sensitive-filter (cs/lower-case s) (map cs/lower-case queries)))
|
||||||
|
|
||||||
|
|
||||||
|
|
Loading…
Reference in a new issue