yogsototh/leiningen
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Catch and print query parsing exceptions in search task. Fixes #1507.

Browse source
This commit is contained in:
Phil Hagelberg 2014-04-23 17:18:49 -07:00
parent d0b223ad4e
commit 08b0dcb64b
1 changed files with 5 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

7
src/leiningen/search.clj
View file

@ -169,13 +169,16 @@
(defn- construct-query [[field q]]
(let [search-expression (UserInputSearchExpression. q)]
(.constructQuery indexer field search-expression)))
(try (.constructQuery indexer field search-expression)
(catch Exception e
(binding [*out* *err*]
(println (.getMessage e)))))))
(defn search-repository [query contexts page]
(let [query-parts (query-parts query)
queries (map construct-query query-parts)
constructed-query (BooleanQuery.)
_ (doseq [q queries]
_ (doseq [q queries :when q]
(.add constructed-query q BooleanClause$Occur/MUST))
request (doto (IteratorSearchRequest. constructed-query contexts)
(.setStart (* (dec page) page-size))