diff --git a/src/App/ResourceRecord.purs b/src/App/ResourceRecord.purs
index 8060ea1..96d3c2c 100644
--- a/src/App/ResourceRecord.purs
+++ b/src/App/ResourceRecord.purs
@@ -7,7 +7,8 @@ import Data.Codec.Argonaut as CA
 import Data.Codec.Argonaut.Record as CAR
 
 type ResourceRecord
-  = { rrid     :: Int
+  = { rrtype   :: String
+    , rrid     :: Int
     , name     :: String
     , ttl      :: Int
     , target   :: String
@@ -34,7 +35,8 @@ type ResourceRecord
 codec :: JsonCodec ResourceRecord
 codec = CA.object "ResourceRecord"
   (CAR.record
-    { rrid:     CA.int
+    { rrtype:   CA.string
+    , rrid:     CA.int
     , name:     CA.string
     , ttl:      CA.int
     , target:   CA.string