Join last two strings

This commit is contained in:
Kenneth Kostresevic 2021-12-16 16:07:09 +01:00
parent 72ee00960c
commit 930693ab7b

View file

@ -10,8 +10,8 @@
"!"))) "!")))
(defmulti diet (fn [x] (:eater x))) (defmulti diet (fn [x] (:eater x)))
(defmethod diet :herbivore [a] (str (:name a), " eats ", "veggies.")) (defmethod diet :herbivore [a] (str (:name a) " eats veggies."))
(defmethod diet :carnivore [a] (str (:name a), " eats ", "animals.")) (defmethod diet :carnivore [a] (str (:name a) " eats animals."))
(defmethod diet :default [a] (str "I don't know what ", (:name a), " eats.")) (defmethod diet :default [a] (str "I don't know what ", (:name a), " eats."))
(meditations (meditations