Send message on new content
This commit is contained in:
parent
6254bb155c
commit
7c4837a8c3
|
@ -28,7 +28,7 @@ module WebsiteCheckLoop =
|
||||||
log "Scraping website"
|
log "Scraping website"
|
||||||
|
|
||||||
match previousListOfResults, listOfResults with
|
match previousListOfResults, listOfResults with
|
||||||
| (previousListOfResults, listOfResults) when previousListOfResults = listOfResults ->
|
| (previousListOfResults, listOfResults) when previousListOfResults <> listOfResults ->
|
||||||
|
|
||||||
channels
|
channels
|
||||||
|> Seq.iter (fun id -> sendToChannelWith client (formatMessage <|| Seq.head listOfResults) id)
|
|> Seq.iter (fun id -> sendToChannelWith client (formatMessage <|| Seq.head listOfResults) id)
|
||||||
|
|
Reference in New Issue