Message should have text
This commit is contained in:
parent
2d66b2fd7a
commit
f0e6aaa7e5
@ -63,6 +63,7 @@ let public RelayMatch: HandlerRequirements = fun (u, c) ->
|
|||||||
UpdateIsAMessage u &&
|
UpdateIsAMessage u &&
|
||||||
FromAdminChat <| (u.Message, c) &&
|
FromAdminChat <| (u.Message, c) &&
|
||||||
HasReply u.Message &&
|
HasReply u.Message &&
|
||||||
|
HasText u.Message &&
|
||||||
RelaySupportedContent u.Message.ReplyToMessage &&
|
RelaySupportedContent u.Message.ReplyToMessage &&
|
||||||
not (RelayCaptionType u.Message.Text = RelayCaptionMode.Unknown)
|
not (RelayCaptionType u.Message.Text = RelayCaptionMode.Unknown)
|
||||||
|
|
||||||
|
Loading…
Reference in New Issue
Block a user