Add button to show earlier thread replies

2019-12-06 06:03:50 +01:00
parent dc56e3ebe2
commit 397471f8f4
3 changed files with 17 additions and 0 deletions
--- a/src/parser.nim
+++ b/src/parser.nim
@@ -160,6 +160,11 @@ proc parseConversation*(node: XmlNode; after: string): Conversation =
    )
  )

+  if result.before != nil:
+    let maxId = node.selectAttr(".in-reply-to .stream-container", "data-max-position")
+    if maxId.len > 0:
+      result.before.more = -1
+
  let showMore = node.selectAttr(".ThreadedConversation-showMoreThreads button",
                                 "data-cursor")