Add page that explains the characters in the blog

Signed-off-by: Xe <me@christine.website>

3 files changed, 24 insertions, 0 deletions

diff --git a/dhall/types/Character.dhall b/dhall/types/Character.dhall
new file mode 100644
index 0000000..c592790
--- /dev/null
+++ b/dhall/types/Character.dhall
@@ -0,0 +1,19 @@
+let PronounSet = ./PronounSet.dhall
+
+in  { Type =
+        { name : Text
+        , stickerName : Text
+        , defaultPose : Text
+        , description : Text
+        , pronouns : PronounSet.Type
+        , stickers : List Text
+        }
+    , default =
+      { name = ""
+      , stickerName = ""
+      , defaultPose = ""
+      , description = ""
+      , pronouns = ../pronouns/she.dhall
+      , stickers = [] : List Text
+      }
+    }
diff --git a/dhall/types/Config.dhall b/dhall/types/Config.dhall
index 245c645..21e541a 100644
--- a/dhall/types/Config.dhall
+++ b/dhall/types/Config.dhall
@@ -2,6 +2,8 @@ let Person = ./Person.dhall
 
 let Author = ./Author.dhall
 
+let Character = ./Character.dhall
+
 let Job = ./Job.dhall
 
 let Link = ./Link.dhall
@@ -34,6 +36,7 @@ in  { Type =
         , notableProjects : List Link.Type
         , contactLinks : List Link.Type
         , pronouns : List PronounSet.Type
+        , characters : List Character.Type
         }
     , default =
       { signalboost = [] : List Person.Type
@@ -49,5 +52,6 @@ in  { Type =
       , notableProjects = [] : List Link.Type
       , contactLinks = [] : List Link.Type
       , pronouns = [] : List PronounSet.Type
+      , characters = [] : List Character.Type
       }
     }
diff --git a/dhall/types/package.dhall b/dhall/types/package.dhall
index 4226d77..4d6377b 100644
--- a/dhall/types/package.dhall
+++ b/dhall/types/package.dhall
@@ -1,4 +1,5 @@
 { Author = ./Author.dhall
+, Character = ./Character.dhall
 , Company = ./Company.dhall
 , Config = ./Config.dhall
 , Job = ./Job.dhall