From 22e86c99033a55881bf02a3129b653a13bac619e Mon Sep 17 00:00:00 2001
From: Samuel Newman <mozzius@protonmail.com>
Date: Fri, 19 Apr 2024 23:26:04 +0100
Subject: fix onEndReached issue by forcing flatlist to scroll (#3623)

---
 src/components/Dialog/index.web.tsx | 16 ++++++++++++++--
 1 file changed, 14 insertions(+), 2 deletions(-)

(limited to 'src/components/Dialog')

diff --git a/src/components/Dialog/index.web.tsx b/src/components/Dialog/index.web.tsx
index d00d2d832..a086955db 100644
--- a/src/components/Dialog/index.web.tsx
+++ b/src/components/Dialog/index.web.tsx
@@ -199,11 +199,23 @@ export const ScrollableInner = Inner
 
 export function InnerFlatList({
   label,
+  style,
   ...props
 }: FlatListProps<any> & {label: string}) {
+  const {gtMobile} = useBreakpoints()
   return (
-    <Inner label={label}>
-      <FlatList {...props} />
+    <Inner
+      label={label}
+      // @ts-ignore web only -sfn
+      style={{
+        paddingHorizontal: 0,
+        maxHeight: 'calc(-36px + 100vh)',
+        overflow: 'hidden',
+      }}>
+      <FlatList
+        style={[gtMobile ? a.px_2xl : a.px_xl, flatten(style)]}
+        {...props}
+      />
     </Inner>
   )
 }
-- 
cgit 1.4.1