can set up multiple locations

src/cljc/auto_ap/entities/companies.cljc

@@ -10,6 +10,9 @@
 (s/def ::name ::shared/required-identifier)
 (s/def ::address ::address/address)
 
+(s/def ::location string?)
+(s/def ::locations (s/coll-of ::location))
+
 (s/def ::email (s/nilable (s/and string? (s/or :is-email #(re-matches email-regex %)
                                                :is-empty #(= % "")))))
 
@@ -17,6 +20,7 @@
 (s/def ::company (s/keys :req-un [::name]
                          :opt-un [::email
                                   ::address
+                                  ::locations
                                   ::id]))