scroll after adding divider to fix not ending up at the bottom when o…

…pening a chat
hpi-swa-teaching · Jul 18, 2022 · 6eec727 · 6eec727
1 parent 909bdf6
commit 6eec727
Show file tree

Hide file tree

Showing 3 changed files with 11 additions and 5 deletions.
diff --git a/...elegramClient-UI.package/TCUChatMessageList.class/instance/addBottomDayDividerForDate..st b/...elegramClient-UI.package/TCUChatMessageList.class/instance/addBottomDayDividerForDate..st
@@ -1,7 +1,10 @@
 stepping and presenter
 addBottomDayDividerForDate: aDate
 
-	| divider |
+	| divider wasFullyScrolledDown |
+	wasFullyScrolledDown := self isFullyScrolledDown.
 	divider := self createDayDividerForDate: aDate.
 	self scroller addMorphBack: divider.
-	self items addLast: divider.
+	self items addLast: divider.
+	wasFullyScrolledDown
+		ifTrue: [ self scrollToNewestMessage ]
diff --git a/...s/TelegramClient-UI.package/TCUChatMessageList.class/instance/addTopDayDividerForDate..st b/...s/TelegramClient-UI.package/TCUChatMessageList.class/instance/addTopDayDividerForDate..st
@@ -4,4 +4,7 @@ addTopDayDividerForDate: aDate
 	| divider |
 	divider := self createDayDividerForDate: aDate.
 	self scroller addMorphFront: divider.
-	self items addFirst: divider.
+	self items addFirst: divider.
+	self isFullyScrolledDown
+		ifTrue: [self scrollToNewestMessage].
+	self scrollBy: 0 @ (divider height negated).
diff --git a/packages/TelegramClient-UI.package/TCUChatMessageList.class/methodProperties.json b/packages/TelegramClient-UI.package/TCUChatMessageList.class/methodProperties.json
@@ -5,9 +5,9 @@
 	"instance" : {
 		"addAtBottom:" : "aka 7/14/2022 14:58",
 		"addAtTop:" : "aka 7/14/2022 15:18",
-		"addBottomDayDividerForDate:" : "aka 7/14/2022 15:01",
+		"addBottomDayDividerForDate:" : "js 7/18/2022 07:29",
 		"addMessages" : "RS 7/17/2021 17:40",
-		"addTopDayDividerForDate:" : "aka 7/14/2022 15:01",
+		"addTopDayDividerForDate:" : "js 7/18/2022 07:30",
 		"chat" : "js 7/31/2020 16:39",
 		"chat:" : "js 7/31/2020 16:39",
 		"core" : "JB 6/26/2021 10:22",