|
|
@@ -43,7 +43,7 @@ extractDataAndSendToBackground = do
|
|
|
dom <- getBrowserDom
|
|
|
ctx <- getContext dom
|
|
|
data_ <- extractFromDocument dom
|
|
|
- sendMessageToBackground RuntimeMessageContentInit
|
|
|
+
|
|
|
case data_, ctx of
|
|
|
Left err, _ -> warn $ "[content] " <> show err
|
|
|
_, Left err -> warn $ "[content] " <> show err
|