Company domain is in fact optional

src/Background.purs

@@ -53,14 +53,12 @@ contentScriptMessageHandler
     maybeMsg (JobOffer jo) = ado
       location <- jo.location
       flexibility <- jo.flexibility
-      companyDomain <- jo.companyDomain
-      _companySize <- jo.companySize
     in NativeMessageVisitedJobPage {
       url: url,
       jobTitle: jo.title,
       pageTitle: title,
       company: jo.companyName,
-      companyDomain,
+      companyDomain: jo.companyDomain,
       companyUrl: jo.companyLink,
       location,
       hasSimplifiedProcess: jo.hasSimplifiedApplicationProcess,

src/NativeMessage.purs

@@ -14,6 +14,7 @@ import Data.Argonaut.Encode (class EncodeJson, encodeJson)
 import Data.Argonaut.Encode.Generic (genericEncodeJson)
 import Data.Either (Either(..))
 import Data.Generic.Rep (class Generic)
+import Data.Maybe (Maybe)
 import Data.Show.Generic (genericShow)
 import Effect (Effect)
 import Effect.Class.Console (log)
@@ -28,7 +29,7 @@ data NativeMessage =
     jobTitle :: String,
     pageTitle :: String,
     company :: String,
-    companyDomain :: String,
+    companyDomain :: Maybe String,
     companyUrl :: String,
     location :: String,
     hasSimplifiedProcess :: Boolean,