Rename search ==> multi-word

README.md

@@ -35,7 +35,9 @@ and can be downloaded and started with:
 
 ## Example API usage
 
-From a Clojure REPL:
+### Multi-word anagrams
+
+Using all the letters to find multi-word anagrams, from a Clojure REPL:
 
 ```clojure
 (use 'ars-magna.dict)
@@ -44,14 +46,14 @@ From a Clojure REPL:
 (let [dict (load-word-list :en-GB)
       index (partition-by-word-length dict)]
   (sort
-    (search index "compute" 3 nil)))
+    (multi-word index "compute" 3 nil)))
 ; ("come put" "compute" "cote ump" "cut mope" "cut poem"
 ;  "cute mop" "met coup" "mote cup" "mute cop" "tome cup")
 ```
 
 or querying the web service for the word 'compute':
 
-    $ curl -s http://localhost:3000/search/compute | jq .
+    $ curl -s http://localhost:3000/multi-word/compute | jq .
 
 returns the same anagrams:
 

src/ars_magna/handler.clj

@@ -20,12 +20,12 @@
 (defroutes app-routes
   (let [dict (load-word-list :en-GB)
         index (partition-by-word-length dict)]
-    (GET "/search/:word" [word :as req]
+    (GET "/multi-word" [word :as req]
       (json-exception-handler
         (to-json identity
           (let [min-size (Integer/parseInt (or (get-in req [:params :min]) "3"))]
             (sort
-              (search index (clean word) min-size nil))))))))
+              (multi-word index (clean word) min-size nil))))))))
 
 (def app
     (->

src/ars_magna/solver.clj

@@ -3,12 +3,12 @@
     [clojure.string :as s]
     [ars-magna.dict :refer :all]))
 
-(defn search [index word min-size prefix]
+(defn multi-word [index word min-size prefix]
   (if (empty? word)
     (s/trim prefix)
     (flatten
       (for [w (find-in index word min-size :en-GB)]
-        (search
+        (multi-word
           index
           (remaining-chars word w)
           min-size

test/ars_magna/solver_test.clj

@@ -7,6 +7,6 @@
 (deftest check-solver
   (let [dict (load-word-list :en-GB)
         index (partition-by-word-length dict)]
-    (is (= (sort (search index "compute" 3 nil))
+    (is (= (sort (multi-word index "compute" 3 nil))
            ["come put" "compute" "cote ump" "cut mope" "cut poem"
             "cute mop" "met coup" "mote cup" "mute cop" "tome cup"]))))