Fixed a/an generation for, for example, "Eurocopter".

src/main/lemondronor/circlebot.cljs

@@ -296,8 +296,8 @@
                                     :icao 1
                                     :neighbourhood 3
                                     :locality 3}}))]
-    (log-info "Top description candidates (%s total):" (count results))
-    (log-table results [:score :text])
+    ;;(log-info "Top description candidates (%s total):" (count results))
+    ;;(log-table results [:score :text])
     (first results)))
 
 

src/main/lemondronor/circlebot/generation.cljc

@@ -61,7 +61,8 @@
   (not (vowels (string/lower-case c))))
 
 (defn starts-with-consonant? [s]
-  (is-consonant? (subs s 0 1)))
+  (or (is-consonant? (subs s 0 1))
+      (string/starts-with? (string/lower-case s) "eur")))
 
 
 (def filters

src/test/lemondronor/circlebot/generation_test.cljs

@@ -80,7 +80,9 @@
     (is (= "It is an animal"
            (generation/generate templates {:thing "animal"})))
     (is (= "It is an Animal"
-           (generation/generate templates {:thing "Animal"})))))
+           (generation/generate templates {:thing "Animal"})))
+    (is (= "It is a Eurocopter"
+           (generation/generate templates {:thing "Eurocopter"})))))
 
 ;; (deftest var-paths
 ;;   (is (= "Hello, John"