aboutsummaryrefslogtreecommitdiff
path: root/lib/models/embed.ml
diff options
context:
space:
mode:
authorAdelyn Breedlove <[email protected]>2019-01-20 21:10:03 -0700
committerAdelyn Breedlove <[email protected]>2019-01-20 21:10:03 -0700
commit8cc616e0878d9209c383b15863998ce975da4425 (patch)
tree08389f16a387dedda52e0ab0da5229ae522d5729 /lib/models/embed.ml
parentmore updates (diff)
downloaddisml-8cc616e0878d9209c383b15863998ce975da4425.tar.xz
disml-8cc616e0878d9209c383b15863998ce975da4425.zip
Add embed builders
Diffstat (limited to 'lib/models/embed.ml')
-rw-r--r--lib/models/embed.ml17
1 files changed, 15 insertions, 2 deletions
diff --git a/lib/models/embed.ml b/lib/models/embed.ml
index 7dbbeaa..23c8607 100644
--- a/lib/models/embed.ml
+++ b/lib/models/embed.ml
@@ -43,7 +43,7 @@ type t = {
description: string option [@default None];
url: string option [@default None];
timestamp: string option [@default None];
- colour: int option [@default None];
+ colour: int option [@default None][@key "color"];
footer: footer option [@default None];
image: image option [@default None];
thumbnail: image option [@default None];
@@ -67,4 +67,17 @@ let default = {
provider = None;
author = None;
fields = [];
-} \ No newline at end of file
+}
+
+let title v e = { e with title = Some v }
+let description v e = { e with description = Some v }
+let url v e = { e with url = Some v }
+let timestamp v e = { e with timestamp = Some v }
+let colour v e = { e with colour = Some v }
+let color v e = { e with colour = Some v }
+let footer v e = { e with footer = Some v }
+let image v e = { e with image = Some v }
+let thumbnail v e = { e with thumbnail = Some v }
+let author v e = { e with author = Some v }
+let field v e = { e with fields = v::e.fields }
+let fields v e = { e with fields = v } \ No newline at end of file