diff options
| author | Joe Dytrych <j@dytry.ch> | 2016-02-15 20:08:12 +0000 |
|---|---|---|
| committer | Joe Dytrych <j@dytry.ch> | 2016-02-16 12:12:28 +0000 |
| commit | a60cfd359c283d194c24831a5454bdd8cbfe2364 (patch) | |
| tree | daf74a7d6a179a5ad301b3674ca72cb9c437e7e5 /src/pronouns/util.clj | |
| parent | ee81f454e9aa50c3667741a17843136805885ffb (diff) | |
JSON not found response, fix whitespace
Diffstat (limited to 'src/pronouns/util.clj')
| -rw-r--r-- | src/pronouns/util.clj | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/src/pronouns/util.clj b/src/pronouns/util.clj index 51e8403..4d4f928 100644 --- a/src/pronouns/util.clj +++ b/src/pronouns/util.clj @@ -18,12 +18,12 @@ (defn minimum-unambiguous-path ([pronouns-table sections] (minimum-unambiguous-path pronouns-table sections 1)) ([pronouns-table sections number-of-sections] - (let [sections-subset (take number-of-sections sections) - results (filter #(= (take number-of-sections %) sections-subset) pronouns-table)] - (case (count results) - 0 nil - 1 (clojure.string/join "/" sections-subset) - (recur pronouns-table sections (+ number-of-sections 1)))))) + (let [sections-subset (take number-of-sections sections) + results (filter #(= (take number-of-sections %) sections-subset) pronouns-table)] + (case (count results) + 0 nil + 1 (clojure.string/join "/" sections-subset) + (recur pronouns-table sections (+ number-of-sections 1)))))) (defn abbreviate "given a list of pronoun rows, return a list of minimum unabiguous paths" |