Fix quote reply edgecase

This commit is contained in:
Zed 2019-07-02 01:38:14 +02:00
parent f378eedcc8
commit 69f5a555cb
1 changed files with 6 additions and 2 deletions

View File

@ -123,8 +123,12 @@ proc parseTweetStats*(node: XmlNode): TweetStats =
proc parseTweetReply*(node: XmlNode): seq[string] = proc parseTweetReply*(node: XmlNode): seq[string] =
let reply = node.select(".ReplyingToContextBelowAuthor") let reply = node.select(".ReplyingToContextBelowAuthor")
if reply == nil: return if reply == nil: return
for username in reply.selectAll("a"):
result.add username.selectText("b") let selector = if "Quote" in node.attr("class"): "b"
else: "a b"
for username in reply.selectAll(selector):
result.add username.innerText()
proc getGif(player: XmlNode): Gif = proc getGif(player: XmlNode): Gif =
let let