fix onEndReached issue by forcing flatlist to scroll (#3623)

1 files changed, 14 insertions, 2 deletions

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>
   )
 }