Ignore nextBatch from timeline
This commit is contained in:
		
							parent
							
								
									105f7e6012
								
							
						
					
					
						commit
						c3ed5c4cd1
					
				@ -86,7 +86,10 @@ changeRoomData jr rd =
 | 
				
			|||||||
    , messages = changeTimeline jr rd.messages
 | 
					    , messages = changeTimeline jr rd.messages
 | 
				
			||||||
    , ephemeral = changeEphemeral jr rd.ephemeral
 | 
					    , ephemeral = changeEphemeral jr rd.ephemeral
 | 
				
			||||||
    , unreadNotifications = changeNotifications jr rd.unreadNotifications
 | 
					    , unreadNotifications = changeNotifications jr rd.unreadNotifications
 | 
				
			||||||
    , prevHistoryBatch = Maybe.andThen .prevBatch jr.timeline
 | 
					    , prevHistoryBatch =
 | 
				
			||||||
 | 
					        case rd.prevHistoryBatch of
 | 
				
			||||||
 | 
					            Nothing -> Maybe.andThen .prevBatch jr.timeline
 | 
				
			||||||
 | 
					            Just _ -> rd.prevHistoryBatch
 | 
				
			||||||
    }
 | 
					    }
 | 
				
			||||||
 | 
					
 | 
				
			||||||
updateRoomData : JoinedRoom -> Maybe RoomData -> Maybe RoomData
 | 
					updateRoomData : JoinedRoom -> Maybe RoomData -> Maybe RoomData
 | 
				
			||||||
 | 
				
			|||||||
		Loading…
	
		Reference in New Issue
	
	Block a user