Add keyboardDismissMode, keyboardShouldPersistTaps, showsHorizontalScrollIndicator, showsHorizontalScrollIndicator to sectionList

Author: johannth

lib/js/src/components/sectionList.js

@@ -136,6 +136,12 @@ let renderAccessoryView =
  section: jsSectionToSection(jsRenderAccessory##section),
  });
 
+[@bs.deriving jsConverter]
+type keyboardDismissMode = [ | `none | `interactive | `onDrag];
+
+[@bs.deriving jsConverter]
+type keyboardShouldPersistTaps = [ | `always | `never | `handled];
+
 let make:
  (
  ~sections: sections('item),
@@ -161,6 +167,10 @@ let make:
  ~renderSectionHeader: renderAccessoryView('item)=?,
  ~renderSectionFooter: renderAccessoryView('item)=?,
  ~stickySectionHeadersEnabled: bool=?,
+ ~keyboardDismissMode: keyboardDismissMode=?,
+ ~keyboardShouldPersistTaps: keyboardShouldPersistTaps=?,
+ ~showsHorizontalScrollIndicator: bool=?,
+ ~showsVerticalScrollIndicator: bool=?,
  array(ReasonReact.reactElement)
  ) =>
  ReasonReact.component(
@@ -187,6 +197,10 @@ let make:
  ~renderSectionHeader=?,
  ~renderSectionFooter=?,
  ~stickySectionHeadersEnabled=?,
+ ~keyboardDismissMode=?,
+ ~keyboardShouldPersistTaps=?,
+ ~showsHorizontalScrollIndicator=?,
+ ~showsVerticalScrollIndicator=?,
  _children,
  ) =>
  ReasonReact.wrapJsForReason(
@@ -214,10 +228,28 @@ let make:
  "renderSectionHeader": fromOption(renderSectionHeader),
  "renderSectionFooter": fromOption(renderSectionFooter),
  "stickySectionHeadersEnabled":
- fromOption(
+ from_opt(
  UtilsRN.optBoolToOptJsBoolean(stickySectionHeadersEnabled),
  ),
+ "keyboardDismissMode":
+ from_opt(
+ keyboardDismissMode
+ |> UtilsRN.option_map(keyboardDismissModeToJs),
+ ),
+ "keyboardShouldPersistTaps":
+ from_opt(
+ keyboardShouldPersistTaps
+ |> UtilsRN.option_map(keyboardShouldPersistTapsToJs),
+ ),
+ "showsHorizontalScrollIndicator":
+ from_opt(
+ UtilsRN.optBoolToOptJsBoolean(showsHorizontalScrollIndicator),
+ ),
+ "showsVerticalScrollIndicator":
+ from_opt(
+ UtilsRN.optBoolToOptJsBoolean(showsVerticalScrollIndicator),
+ ),
  }
  ),
  _children,
- );
+ );

src/components/sectionList.re

@@ -2,12 +2,16 @@ type renderBag('item) = {
  item: 'item,
  index: int,
  section: section('item),
- separators: {. "highlight": unit => unit, "unhighlight": unit => unit}
+ separators: {
+ .
+ "highlight": unit => unit,
+ "unhighlight": unit => unit,
+ },
 }
 and section('item) = {
  data: array('item),
  key: option(string),
- renderItem: option((renderBag('item) => ReasonReact.reactElement))
+ renderItem: option(renderBag('item) => ReasonReact.reactElement),
 };
 
 let section:
@@ -25,7 +29,7 @@ type separatorProps('item) = {
  leadingSection: option(section('item)),
  section: section('item),
  trailingItem: option('item),
- trailingSection: option(section('item))
+ trailingSection: option(section('item)),
 };
 
 type sections('item);
@@ -34,27 +38,30 @@ let sections: array(section('item)) => sections('item);
 
 type renderItem('item);
 
-let renderItem: (renderBag('item) => ReasonReact.reactElement) => renderItem('item);
+let renderItem:
+ (renderBag('item) => ReasonReact.reactElement) => renderItem('item);
 
 type separatorComponent('item);
 
 let separatorComponent:
- (separatorProps('item) => ReasonReact.reactElement) => separatorComponent('item);
+ (separatorProps('item) => ReasonReact.reactElement) =>
+ separatorComponent('item);
 
 type renderAccessory('item) = {section: section('item)};
 
 type renderAccessoryView('item);
 
 let renderAccessoryView:
- (renderAccessory('item) => ReasonReact.reactElement) => renderAccessoryView('item);
+ (renderAccessory('item) => ReasonReact.reactElement) =>
+ renderAccessoryView('item);
 
 type viewToken('item) = {
  .
  "index": Js.undefined(int),
  "isViewable": Js.boolean,
  "item": 'item,
  "key": string,
- "section": section('item)
+ "section": section('item),
 };
 
 let make:
@@ -74,14 +81,22 @@ let make:
  ~onViewableItemsChanged: {
  .
  "changed": array(viewToken('item)),
- "viewableItems": array(viewToken('item))
+ "viewableItems": array(viewToken('item)),
  }
  =?,
  ~onRefresh: unit => unit=?,
  ~refreshing: bool=?,
  ~renderSectionHeader: renderAccessoryView('item)=?,
  ~renderSectionFooter: renderAccessoryView('item)=?,
  ~stickySectionHeadersEnabled: bool=?,
+ ~keyboardDismissMode: [ | `none | `interactive | `onDrag]=?,
+ ~keyboardShouldPersistTaps: [ | `always | `never | `handled]=?,
+ ~showsHorizontalScrollIndicator: bool=?,
+ ~showsVerticalScrollIndicator: bool=?,
  array(ReasonReact.reactElement)
  ) =>
- ReasonReact.component(ReasonReact.stateless, ReasonReact.noRetainedProps, unit);
+ ReasonReact.component(
+ ReasonReact.stateless,
+ ReasonReact.noRetainedProps,
+ unit,
+ );