From 2401c5c2274aafc682717e884ef10106daf91e2d Mon Sep 17 00:00:00 2001 From: BC Date: Thu, 25 Oct 2018 19:01:45 -0700 Subject: [PATCH] allow negative invoice. --- src/cljc/auto_ap/entities/shared.cljc | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/cljc/auto_ap/entities/shared.cljc b/src/cljc/auto_ap/entities/shared.cljc index d83cea24..b2363b46 100644 --- a/src/cljc/auto_ap/entities/shared.cljc +++ b/src/cljc/auto_ap/entities/shared.cljc @@ -3,7 +3,7 @@ [clojure.string :as str])) (def date-regex #"[0-9]{4}-[0-9]{1,2}-[0-9]{1,2}") -(def money-regex #"[0-9]+(\.[0-9]{1,2})?$") +(def money-regex #"\-?[0-9]+(\.[0-9]{1,2})?$") (s/def ::identifier (s/nilable string?)) (s/def ::date (s/and string? #(re-matches date-regex %)))