notid/integreat
1
0
Fork 0
Code Issues Pull Requests 2 Actions Packages Projects Releases Wiki Activity

renamed company to client.

Browse Source
This commit is contained in:
Bryce Covert
2019-01-18 07:44:12 -08:00
parent 583752d740
commit 775150131e
38 changed files with 250 additions and 306 deletions
Download Patch File Download Diff File Expand all files Collapse all files

8
src/cljc/auto_ap/entities/companies.cljc → src/cljc/auto_ap/entities/clients.cljc
View File

@@ -1,4 +1,4 @@
(ns auto-ap.entities.companies
(ns auto-ap.entities.clients
(:require [clojure.spec.alpha :as s]
[auto-ap.entities.shared :as shared]
[clojure.string :as str]
@@ -17,12 +17,12 @@
:is-empty #(= % "")))))
(s/def ::company (s/keys :req-un [::name]
(s/def ::client (s/keys :req-un [::name]
:opt-un [::email
::address
::locations
::id]))
(def company-spec (apply hash-map (drop 1 (s/form ::company))))
(def all-keys (map #(keyword (name %)) (concat (:req-un company-spec) (:opt-un company-spec))))
(def client-spec (apply hash-map (drop 1 (s/form ::client))))
(def all-keys (map #(keyword (name %)) (concat (:req-un client-spec) (:opt-un client-spec))))