diff --git a/tests/syntax_tests/data/idempotency/nook-exchange/UserStore.res b/tests/syntax_tests/data/idempotency/nook-exchange/UserStore.res
index 890bc931e8..11632eb610 100644
--- a/tests/syntax_tests/data/idempotency/nook-exchange/UserStore.res
+++ b/tests/syntax_tests/data/idempotency/nook-exchange/UserStore.res
@@ -13,13 +13,13 @@ type action =
| FollowUser(string)
| UnfollowUser(string)
-let sessionId = ref(Dom.Storage.localStorage |> Dom.Storage.getItem("sessionId"))
+let sessionId = ref(Dom.Storage.localStorage->Dom.Storage.getItem("sessionId"))
let updateSessionId = newValue => {
sessionId := newValue
open Dom.Storage
switch newValue {
- | Some(sessionId) => localStorage |> setItem("sessionId", sessionId)
- | None => localStorage |> removeItem("sessionId")
+ | Some(sessionId) => localStorage->setItem("sessionId", sessionId)
+ | None => localStorage->removeItem("sessionId")
}
}
@@ -187,7 +187,7 @@ let setItemStatus = (~itemId: int, ~variation: int, ~status: User.itemStatus) =>
)
handleServerResponse("/@me/items/status", responseResult)
Promise.resolved()
- }) |> ignore
+ })->ignore
if numItemUpdatesLogged.contents < 2 || updatedUser.items->Js.Dict.keys->Js.Array.length < 4 {
Analytics.Amplitude.logEventWithProperties(
~eventName="Item Status Updated",
@@ -208,7 +208,7 @@ let setItemStatusBatch = (~items: array<(int, int)>, ~status) => {
...user,
items: {
let clone = Utils.cloneJsDict(user.items)
- items |> Js.Array.forEach(((itemId, variant)) => {
+ items->Js.Array.forEach(((itemId, variant)) => {
let itemKey = User.getItemKey(~itemId, ~variation=variant)
clone->Js.Dict.set(
itemKey,
@@ -242,7 +242,7 @@ let setItemStatusBatch = (~items: array<(int, int)>, ~status) => {
},
)
Promise.resolved()
- }) |> ignore
+ })->ignore
Analytics.Amplitude.setItemCount(~itemCount=Js.Dict.keys(updatedUser.items)->Js.Array.length)
}
@@ -277,7 +277,7 @@ let setItemNote = (~itemId: int, ~variation: int, ~note: string) => {
)
handleServerResponse("/@me/items/note", responseResult)
Promise.resolved()
- }) |> ignore
+ })->ignore
if numItemUpdatesLogged.contents < 2 || updatedUser.items->Js.Dict.keys->Js.Array.length < 4 {
Analytics.Amplitude.logEventWithProperties(
~eventName="Item Note Updated",
@@ -318,7 +318,7 @@ let setItemPriority = (~itemId: int, ~variant: int, ~isPriority: bool) => {
)
handleServerResponse("/@me/items/priority", responseResult)
Promise.resolved()
- }) |> ignore
+ })->ignore
if !didLogItemPriority.contents {
Analytics.Amplitude.logEventWithProperties(
~eventName="Item Priority Updated",
@@ -363,7 +363,7 @@ let removeItem = (~itemId, ~variation) => {
)
handleServerResponse("/@me/items/remove", responseResult)
Promise.resolved()
- }) |> ignore
+ })->ignore
Analytics.Amplitude.setItemCount(~itemCount=Js.Dict.keys(updatedUser.items)->Js.Array.length)
}
}
@@ -374,7 +374,7 @@ let removeItems = (~items: array<(int, int)>) => {
...user,
items: {
let clone = Utils.cloneJsDict(user.items)
- items |> Js.Array.forEach(((itemId, variant)) => {
+ items->Js.Array.forEach(((itemId, variant)) => {
let key = User.getItemKey(~itemId, ~variation=variant)
Utils.deleteJsDictKey(clone, key)
})
@@ -390,7 +390,7 @@ let removeItems = (~items: array<(int, int)>) => {
~eventProperties={"numItems": Js.Array.length(items)},
)
Promise.resolved()
- }) |> ignore
+ })->ignore
Analytics.Amplitude.setItemCount(~itemCount=Js.Dict.keys(updatedUser.items)->Js.Array.length)
}
@@ -406,7 +406,7 @@ let updateProfileText = (~profileText) => {
)
handleServerResponse("/@me/profileText", responseResult)
Promise.resolved()
- }) |> ignore
+ })->ignore
Analytics.Amplitude.logEventWithProperties(
~eventName="Profile Text Updated",
~eventProperties={"text": profileText},
@@ -470,7 +470,7 @@ let toggleCatalogCheckboxSetting = (~enabled) => {
)
handleServerResponse("/@me/toggleCatalogCheckboxSetting", responseResult)
Promise.resolved()
- }) |> ignore
+ })->ignore
Analytics.Amplitude.logEventWithProperties(
~eventName="Catalog Checkbox Setting Toggled",
~eventProperties={"enabled": enabled},
@@ -506,7 +506,7 @@ let register = (~username, ~email, ~password) =>
%Repromise.JsExn({
let json = Fetch.Response.json(response)
updateSessionId(
- json |> {
+ json->{
open Json.Decode
optional(field("sessionId", string))
},
@@ -520,7 +520,7 @@ let register = (~username, ~email, ~password) =>
} else {
%Repromise.JsExn({
let text = Fetch.Response.text(response)
- let result = text |> Js.Re.exec_(errorQuotationMarksRegex)
+ let result = text->Js.Re.exec_(errorQuotationMarksRegex)
let text = switch result {
| Some(match_) =>
let captures = Js.Re.captures(match_)
@@ -559,7 +559,7 @@ let loginWithDiscord = (~code, ~isRegister) =>
%Repromise.JsExn({
let json = Fetch.Response.json(response)
updateSessionId(
- json |> {
+ json->{
open Json.Decode
optional(field("sessionId", string))
},
@@ -572,7 +572,7 @@ let loginWithDiscord = (~code, ~isRegister) =>
~email=user.email->Belt.Option.getWithDefault(""),
)
let isRegister =
- (json |> {
+ (json->{
open Json.Decode
optional(field("isRegister", bool))
})->Belt.Option.getWithDefault(false)
@@ -591,7 +591,7 @@ let loginWithDiscord = (~code, ~isRegister) =>
} else {
%Repromise.JsExn({
let text = Fetch.Response.text(response)
- let result = text |> Js.Re.exec_(errorQuotationMarksRegex)
+ let result = text->Js.Re.exec_(errorQuotationMarksRegex)
let text = switch result {
| Some(match_) =>
let captures = Js.Re.captures(match_)
@@ -652,7 +652,7 @@ let login = (~username, ~password) =>
%Repromise.JsExn({
let json = Fetch.Response.json(response)
updateSessionId(
- json |> {
+ json->{
open Json.Decode
optional(field("sessionId", string))
},
@@ -669,7 +669,7 @@ let login = (~username, ~password) =>
let logout = () => {
api.dispatch(Logout)
- Dom.Storage.localStorage |> Dom.Storage.removeItem("sessionId")
+ Dom.Storage.localStorage->Dom.Storage.removeItem("sessionId")
Analytics.Amplitude.setUserId(~userId=None)
ReasonReactRouter.push("/")
let sessionId = sessionId.contents
@@ -720,7 +720,7 @@ let deleteAccount = () => {
| Ok(response) =>
if Fetch.Response.status(response) < 300 {
api.dispatch(Logout)
- Dom.Storage.localStorage |> Dom.Storage.removeItem("sessionId")
+ Dom.Storage.localStorage->Dom.Storage.removeItem("sessionId")
Analytics.Amplitude.setUserId(~userId=None)
ReasonReactRouter.push("/")
updateSessionId(None)
@@ -740,7 +740,7 @@ let connectDiscordAccount = (~code) => {
)
%Repromise.JsExn({
let json = Fetch.Response.json(response)
- let discordId = json |> {
+ let discordId = json->{
open Json.Decode
field("discordId", string)
}
@@ -748,7 +748,7 @@ let connectDiscordAccount = (~code) => {
ReasonReactRouter.push("/settings")
Promise.resolved()
})
- }) |> ignore
+ })->ignore
// TODO: error
let processNotLoggedIn = () => ()
switch api.getState() {
@@ -790,7 +790,7 @@ let init = () =>
if Fetch.Response.status(response) < 400 {
%Repromise.JsExn({
let json = Fetch.Response.json(response)
- switch json |> {
+ switch json->{
open Json.Decode
optional(field("sessionId", string))
} {
@@ -806,6 +806,6 @@ let init = () =>
api.dispatch(FetchMeFailed)
Promise.resolved()
}
- }) |> ignore
+ })->ignore
| None => ()
}
diff --git a/tests/syntax_tests/data/idempotency/nook-exchange/UserViewingPage.res b/tests/syntax_tests/data/idempotency/nook-exchange/UserViewingPage.res
index c9c4fe961c..4f13c4842c 100644
--- a/tests/syntax_tests/data/idempotency/nook-exchange/UserViewingPage.res
+++ b/tests/syntax_tests/data/idempotency/nook-exchange/UserViewingPage.res
@@ -94,7 +94,7 @@ module FollowLink = {
)
}
Promise.resolved()
- }) |> ignore
+ })->ignore
} else {
showLogin()
}
@@ -130,7 +130,7 @@ let make = (~username, ~urlRest, ~url: ReasonReactRouter.url, ~showLogin) => {
switch (me, user) {
| (Some(me), Some(user: User.t)) =>
switch me.followeeIds {
- | Some(followeeIds) => followeeIds |> Js.Array.includes(user.id)
+ | Some(followeeIds) => followeeIds->Js.Array.includes(user.id)
| None => false
}
| _ => false
@@ -138,7 +138,7 @@ let make = (~username, ~urlRest, ~url: ReasonReactRouter.url, ~showLogin) => {
, (isLoggedIn, user))
React.useEffect0(() => {
open Webapi.Dom
- window |> Window.scrollTo(0., 0.)
+ window->Window.scrollTo(0., 0.)
Some(() => React.Ref.setCurrent(isMountedRef, false))
})
React.useEffect1(() => {
@@ -163,7 +163,7 @@ let make = (~username, ~urlRest, ~url: ReasonReactRouter.url, ~showLogin) => {
})
| _ => Promise.resolved()
}
- }) |> ignore
+ })->ignore
None
}, [username])
React.useEffect0(() => {
diff --git a/tests/syntax_tests/data/idempotency/nook-exchange/Utils.res b/tests/syntax_tests/data/idempotency/nook-exchange/Utils.res
index 679cf60f21..f178340cdf 100644
--- a/tests/syntax_tests/data/idempotency/nook-exchange/Utils.res
+++ b/tests/syntax_tests/data/idempotency/nook-exchange/Utils.res
@@ -28,7 +28,7 @@ let getElementForDomRef = domRef =>
domRef->React.Ref.current->Js.Nullable.toOption->Belt.Option.getExn
let capitalizeFirstLetter = input =>
- Js.String.toUpperCase(Js.String.charAt(0, input)) ++ (input |> Js.String.sliceToEnd(~from=1))
+ Js.String.toUpperCase(Js.String.charAt(0, input)) ++ (input->Js.String.sliceToEnd(~from=1))
let throttle = (fn, ms) => {
let timeoutRef = ref(None)
@@ -47,14 +47,14 @@ let throttle = (fn, ms) => {
let useViewportWidth = () => {
let (viewportWidth, setViewportWidth) = React.useState(() => {
open Webapi.Dom
- window |> Window.innerWidth
+ window->Window.innerWidth
})
React.useEffect0(() => {
open Webapi.Dom
- let onResize = _ => setViewportWidth(_ => window |> Window.innerWidth)
+ let onResize = _ => setViewportWidth(_ => window->Window.innerWidth)
let onResize = throttle(onResize, 300)
- window |> Window.addEventListener("resize", onResize)
- Some(() => window |> Window.removeEventListener("resize", onResize))
+ window->Window.addEventListener("resize", onResize)
+ Some(() => window->Window.removeEventListener("resize", onResize))
})
viewportWidth
}
@@ -63,15 +63,15 @@ let useViewportWidth = () => {
external mediaQueryListMatches: Webapi.Dom.Window.mediaQueryList => bool = "matches"
let browserSupportsHover = {
open Webapi.Dom
- window |> Window.matchMedia("(hover: hover)")
+ window->Window.matchMedia("(hover: hover)")
}->mediaQueryListMatches
let getPath = (~url: ReasonReactRouter.url) =>
- "/" ++ (Belt.List.toArray(url.path) |> Js.Array.joinWith("/"))
+ "/" ++ (Belt.List.toArray(url.path)->Js.Array.joinWith("/"))
let getPathWithSearch = (~url: ReasonReactRouter.url) =>
"/" ++
- ((Belt.List.toArray(url.path) |> Js.Array.joinWith("/")) ++
+ ((Belt.List.toArray(url.path)->Js.Array.joinWith("/")) ++
switch url.search {
| "" => ""
| search => "?" ++ search
diff --git a/tests/syntax_tests/data/idempotency/nook-exchange/WishlistToCatalog.res b/tests/syntax_tests/data/idempotency/nook-exchange/WishlistToCatalog.res
index b634b8c013..5ab170ccc8 100644
--- a/tests/syntax_tests/data/idempotency/nook-exchange/WishlistToCatalog.res
+++ b/tests/syntax_tests/data/idempotency/nook-exchange/WishlistToCatalog.res
@@ -1,10 +1,10 @@
module PersistConfig = {
let key = "confirm_wishlist_to_catalog"
- let value = ref(Dom.Storage.localStorage |> Dom.Storage.getItem(key))
+ let value = ref(Dom.Storage.localStorage->Dom.Storage.getItem(key))
let confirm = () => {
let nowString = Js.Date.now()->Js.Float.toString
value := Some(nowString)
- Dom.Storage.localStorage |> Dom.Storage.setItem(key, nowString)
+ Dom.Storage.localStorage->Dom.Storage.setItem(key, nowString)
}
}
diff --git a/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesApply__Form.res b/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesApply__Form.res
index 8a3f8c35cb..89b461aaff 100644
--- a/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesApply__Form.res
+++ b/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesApply__Form.res
@@ -9,19 +9,19 @@ module CreateApplicantQuery = %graphql(`
`)
let createApplicant = (courseId, email, name, setSaving, setViewEmailSent, event) => {
- event |> ReactEvent.Mouse.preventDefault
+ event->ReactEvent.Mouse.preventDefault
setSaving(_ => true)
CreateApplicantQuery.make(~courseId, ~email, ~name, ())
- |> GraphqlQuery.sendQuery
- |> Js.Promise.then_(response => {
+ ->GraphqlQuery.sendQuery
+ ->Js.Promise.then_(response => {
response["createApplicant"]["success"] ? setViewEmailSent() : setSaving(_ => false)
Js.Promise.resolve()
})
- |> ignore
+ ->ignore
}
-let isInvalidEmail = email => email |> EmailUtils.isInvalid(false)
+let isInvalidEmail = email => email->EmailUtils.isInvalid(false)
let saveDisabled = (email, name, saving) => isInvalidEmail(email) || (saving || name == "")
let buttonText = (email, name, saving) =>
@@ -35,15 +35,15 @@ let buttonText = (email, name, saving) =>
@react.component
let make = (~courseName, ~courseId, ~setViewEmailSent, ~email, ~name) => {
- let (email, setEmail) = React.useState(() => email |> OptionUtils.default(""))
- let (name, setName) = React.useState(() => name |> OptionUtils.default(""))
+ let (email, setEmail) = React.useState(() => email->OptionUtils.default(""))
+ let (name, setName) = React.useState(() => name->OptionUtils.default(""))
let (saving, setSaving) = React.useState(() => false)
-
{"Enroll to " ++ (courseName ++ " course") |> str}
+
{"Enroll to " ++ (courseName ++ " course")->str}
{
{
onClick={createApplicant(courseId, email, name, setSaving, setViewEmailSent)}
className="btn btn-primary btn-large text-center w-full mt-6">
{saving ? : ReasonReact.null}
- {buttonText(email, name, saving) |> str}
+ {buttonText(email, name, saving)->str}
}
diff --git a/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesApply__Root.res b/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesApply__Root.res
index 6ae53cda6d..89eba610e6 100644
--- a/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesApply__Root.res
+++ b/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesApply__Root.res
@@ -16,10 +16,10 @@ let emailSentMessage = () =>
- {"We've sent you a verification mail." |> str}
+ {"We've sent you a verification mail."->str}
- {"It should reach you in less than a minute. Click the link in the email to sign up, and get started." |> str}
+ {"It should reach you in less than a minute. Click the link in the email to sign up, and get started."->str}
@@ -60,7 +60,7 @@ let make = (~courseName, ~courseId, ~thumbnailUrl, ~email, ~name, ~privacyPolicy
?
- {"Terms of Use" |> str}
+ {"Terms of Use"->str}
: React.null}
{termsOfUse && privacyPolicy
@@ -70,7 +70,7 @@ let make = (~courseName, ~courseId, ~thumbnailUrl, ~email, ~name, ~privacyPolicy
?
- {"Privacy Policy" |> str}
+ {"Privacy Policy"->str}
: React.null}
diff --git a/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesCurriculum.res b/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesCurriculum.res
index d448721e49..b78b5e480b 100644
--- a/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesCurriculum.res
+++ b/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesCurriculum.res
@@ -18,15 +18,15 @@ type state = {
let targetStatusClasses = targetStatus => {
let statusClasses =
"curriculum__target-status--" ++
- (targetStatus |> TargetStatus.statusToString |> Js.String.toLowerCase)
+ (targetStatus->TargetStatus.statusToString->Js.String.toLowerCase)
"curriculum__target-status px-3 py-px ml-4 h-6 " ++ statusClasses
}
let rendertarget = (target, statusOfTargets) => {
- let targetId = target |> Target.id
+ let targetId = target->Target.id
let targetStatus =
- statusOfTargets |> ListUtils.unsafeFind(
- ts => ts |> TargetStatus.targetId == targetId,
+ statusOfTargets->ListUtils.unsafeFind(
+ ts => ts->TargetStatus.targetId == targetId,
"Could not find targetStatus for listed target with ID " ++ targetId,
)
@@ -35,41 +35,41 @@ let rendertarget = (target, statusOfTargets) => {
key={"target-" ++ targetId}
className="bg-white border-t p-6 flex items-center justify-between hover:bg-gray-200 hover:text-primary-500 cursor-pointer"
ariaLabel={"Select Target " ++ targetId}>
-
{target |> Target.title |> str}
+
{target->Target.title->str}
- {targetStatus |> TargetStatus.statusToString |> str}
+ {targetStatus->TargetStatus.statusToString->str}
}
let renderTargetGroup = (targetGroup, targets, statusOfTargets) => {
- let targetGroupId = targetGroup |> TargetGroup.id
- let targets = targets |> List.filter(t => t |> Target.targetGroupId == targetGroupId)
+ let targetGroupId = targetGroup->TargetGroup.id
+ let targets = targets->List.filter(t => t->Target.targetGroupId == targetGroupId)
- {targetGroup |> TargetGroup.milestone
+ {targetGroup->TargetGroup.milestone
?
- {"Milestone targets" |> str}
+ {"Milestone targets"->str}
: React.null}
- {targetGroup |> TargetGroup.name |> str}
+ {targetGroup->TargetGroup.name->str}
- {targetGroup |> TargetGroup.description |> str}
+ {targetGroup->TargetGroup.description->str}
{targets
- |> List.sort((t1, t2) => (t1 |> Target.sortIndex) - (t2 |> Target.sortIndex))
- |> List.map(target => rendertarget(target, statusOfTargets))
- |> Array.of_list
- |> React.array}
+ ->List.sort((t1, t2) => (t1->Target.sortIndex) - (t2->Target.sortIndex))
+ ->List.map(target => rendertarget(target, statusOfTargets))
+ ->Array.of_list
+ ->React.array}
}
@@ -77,8 +77,8 @@ let renderTargetGroup = (targetGroup, targets, statusOfTargets) => {
let addSubmission = (setState, latestSubmission) =>
setState(state => {
let withoutSubmissionForThisTarget =
- state.latestSubmissions |> List.filter(s =>
- s |> LatestSubmission.targetId != (latestSubmission |> LatestSubmission.targetId)
+ state.latestSubmissions->List.filter(s =>
+ s->LatestSubmission.targetId != (latestSubmission->LatestSubmission.targetId)
)
{
@@ -89,14 +89,14 @@ let addSubmission = (setState, latestSubmission) =>
let handleLockedLevel = level =>
-
{"Level Locked" |> str}
+
{"Level Locked"->str}
- {switch level |> Level.unlockOn {
+ {switch level->Level.unlockOn {
| Some(date) =>
- let dateString = date |> DateFns.parseString |> DateFns.format("MMMM D, YYYY")
+ let dateString = date->DateFns.parseString->DateFns.format("MMMM D, YYYY")
-
{"The level is currently locked!" |> str}
-
{"You can access the content on " ++ (dateString ++ ".") |> str}
+
{"The level is currently locked!"->str}
+
{"You can access the content on " ++ (dateString ++ ".")->str}
| None => React.null
}}
@@ -104,23 +104,23 @@ let handleLockedLevel = level =>
let statusOfMilestoneTargets = (targetGroups, targets, level, statusOfTargets) => {
let targetGroupsInLevel =
- targetGroups |> List.filter(tg => tg |> TargetGroup.levelId == (level |> Level.id))
+ targetGroups->List.filter(tg => tg->TargetGroup.levelId == (level->Level.id))
let milestoneTargetGroupIds =
targetGroupsInLevel
- |> List.filter(tg => tg |> TargetGroup.milestone)
- |> List.map(tg => tg |> TargetGroup.id)
+ ->List.filter(tg => tg->TargetGroup.milestone)
+ ->List.map(tg => tg->TargetGroup.id)
let milestoneTargetIds =
targets
- |> List.filter(t => (t |> Target.targetGroupId)->List.mem(milestoneTargetGroupIds))
- |> List.map(t => t |> Target.id)
+ ->List.filter(t => (t->Target.targetGroupId)->List.mem(milestoneTargetGroupIds))
+ ->List.map(t => t->Target.id)
- statusOfTargets |> List.filter(ts => (ts |> TargetStatus.targetId)->List.mem(milestoneTargetIds))
+ statusOfTargets->List.filter(ts => (ts->TargetStatus.targetId)->List.mem(milestoneTargetIds))
}
let isLevelComplete = (targetStatuses, eligibleStatuses) =>
- targetStatuses |> ListUtils.isNotEmpty &&
- targetStatuses |> TargetStatus.matchesStatuses(eligibleStatuses)
+ targetStatuses->ListUtils.isNotEmpty &&
+ targetStatuses->TargetStatus.matchesStatuses(eligibleStatuses)
let computeLevelUp = (
levels,
@@ -130,11 +130,11 @@ let computeLevelUp = (
statusOfTargets,
accessLockedLevels,
) => {
- let lastLevel = switch teamLevel |> Level.number {
+ let lastLevel = switch teamLevel->Level.number {
| 0
| 1 =>
None
- | levelTwoOrAbove => levels |> ListUtils.findOpt(l => l |> Level.number == levelTwoOrAbove - 1)
+ | levelTwoOrAbove => levels->ListUtils.findOpt(l => l->Level.number == levelTwoOrAbove - 1)
}
let statusOfCurrentMilestoneTargets = statusOfMilestoneTargets(
@@ -163,13 +163,13 @@ let computeLevelUp = (
}
let nextLevel =
- levels |> ListUtils.findOpt(l => l |> Level.number == (teamLevel |> Level.number) + 1)
+ levels->ListUtils.findOpt(l => l->Level.number == (teamLevel->Level.number) + 1)
switch (nextLevel, currentLevelComplete, lastLevelComplete) {
| (Some(level), true, true) =>
- level |> Level.isUnlocked || accessLockedLevels ? Notice.LevelUp : Nothing
+ level->Level.isUnlocked || accessLockedLevels ? Notice.LevelUp : Nothing
| (None, true, true) => CourseComplete
- | (Some(_), true, false) => LevelUpBlocked(teamLevel |> Level.number)
+ | (Some(_), true, false) => LevelUpBlocked(teamLevel->Level.number)
| (Some(_) | None, false, false | true)
| (None, true, false) =>
Nothing
@@ -187,7 +187,7 @@ let computeNotice = (
preview,
accessLockedLevels,
) =>
- switch (preview, course |> Course.hasEnded, team |> Team.accessEnded) {
+ switch (preview, course->Course.hasEnded, team->Team.accessEnded) {
| (true, _, _) => Notice.Preview
| (false, true, true | false) => CourseEnded
| (false, false, true) => AccessEnded
@@ -205,18 +205,18 @@ let navigationLink = (direction, level, setState) => {
icon->Belt.Option.mapWithDefault(React.null, icon =>
)
}
let quickNavigationLinks = (levels, selectedLevel, setState) => {
- let previous = selectedLevel |> Level.previous(levels)
- let next = selectedLevel |> Level.next(levels)
+ let previous = selectedLevel->Level.previous(levels)
+ let next = selectedLevel->Level.next(levels)
@@ -230,7 +230,7 @@ let quickNavigationLinks = (levels, selectedLevel, setState) => {
{navigationLink(#Next, nextLevel, setState)}
,
- ] |> React.array
+ ]->React.array
| (Some(previousUrl), None) =>
{navigationLink(#Previous, previousUrl, setState)}
@@ -261,8 +261,8 @@ let make = (
let selectedTarget = switch url.path {
| list{"targets", targetId, ..._} =>
Some(
- targets |> ListUtils.unsafeFind(
- t => t |> Target.id == targetId,
+ targets->ListUtils.unsafeFind(
+ t => t->Target.id == targetId,
"Could not find selectedTarget with ID " ++ targetId,
),
)
@@ -277,26 +277,26 @@ let make = (
* used to determine currentLevelId, which is the actual level whose contents
* are shown on the page. */
- let levelZero = levels |> ListUtils.findOpt(l => l |> Level.number == 0)
- let teamLevelId = team |> Team.levelId
+ let levelZero = levels->ListUtils.findOpt(l => l->Level.number == 0)
+ let teamLevelId = team->Team.levelId
let teamLevel =
- levels |> ListUtils.unsafeFind(
- l => l |> Level.id == teamLevelId,
+ levels->ListUtils.unsafeFind(
+ l => l->Level.id == teamLevelId,
"Could not find teamLevel with ID " ++ teamLevelId,
)
let targetLevelId = switch selectedTarget {
| Some(target) =>
- let targetGroupId = target |> Target.targetGroupId
+ let targetGroupId = target->Target.targetGroupId
let targetGroup =
- targetGroups |> ListUtils.unsafeFind(
- t => t |> TargetGroup.id == targetGroupId,
+ targetGroups->ListUtils.unsafeFind(
+ t => t->TargetGroup.id == targetGroupId,
"Could not find targetGroup with ID " ++ targetGroupId,
)
- Some(targetGroup |> TargetGroup.levelId)
+ Some(targetGroup->TargetGroup.levelId)
| None => None
}
@@ -317,14 +317,14 @@ let make = (
{
selectedLevelId: switch (preview, targetLevelId, levelZero) {
- | (true, None, None) => levels |> Level.first |> Level.id
+ | (true, None, None) => levels->Level.first->Level.id
| (_, Some(targetLevelId), Some(levelZero)) =>
- levelZero |> Level.id == targetLevelId ? teamLevelId : targetLevelId
+ levelZero->Level.id == targetLevelId ? teamLevelId : targetLevelId
| (_, Some(targetLevelId), None) => targetLevelId
| (_, None, _) => teamLevelId
},
showLevelZero: switch (levelZero, targetLevelId) {
- | (Some(levelZero), Some(targetLevelId)) => levelZero |> Level.id == targetLevelId
+ | (Some(levelZero), Some(targetLevelId)) => levelZero->Level.id == targetLevelId
| (Some(_), None)
| (None, Some(_))
| (None, None) => false
@@ -346,26 +346,26 @@ let make = (
})
let currentLevelId = switch (levelZero, state.showLevelZero) {
- | (Some(levelZero), true) => levelZero |> Level.id
+ | (Some(levelZero), true) => levelZero->Level.id
| (Some(_), false)
| (None, true | false) =>
state.selectedLevelId
}
let currentLevel =
- levels |> ListUtils.unsafeFind(
- l => l |> Level.id == currentLevelId,
+ levels->ListUtils.unsafeFind(
+ l => l->Level.id == currentLevelId,
"Could not find currentLevel with id " ++ currentLevelId,
)
let selectedLevel =
- levels |> ListUtils.unsafeFind(
- l => l |> Level.id == state.selectedLevelId,
+ levels->ListUtils.unsafeFind(
+ l => l->Level.id == state.selectedLevelId,
"Could not find selectedLevel with id " ++ state.selectedLevelId,
)
React.useEffect1(() => {
- if initialRender |> React.Ref.current {
+ if initialRender->React.Ref.current {
initialRender->React.Ref.setCurrent(false)
} else {
let newStatusOfTargets = computeTargetStatus(state.latestSubmissions)
@@ -390,15 +390,15 @@ let make = (
}, [state.latestSubmissions])
let targetGroupsInLevel =
- targetGroups |> List.filter(tg => tg |> TargetGroup.levelId == currentLevelId)
+ targetGroups->List.filter(tg => tg->TargetGroup.levelId == currentLevelId)
{switch selectedTarget {
| Some(target) =>
let targetStatus =
- state.statusOfTargets |> ListUtils.unsafeFind(
- ts => ts |> TargetStatus.targetId == (target |> Target.id),
- "Could not find targetStatus for selectedTarget with ID " ++ (target |> Target.id),
+ state.statusOfTargets->ListUtils.unsafeFind(
+ ts => ts->TargetStatus.targetId == (target->Target.id),
+ "Could not find targetStatus for selectedTarget with ID " ++ (target->Target.id),
)
{...state, showLevelZero: showLevelZero})}
levelZero
/>
- {currentLevel |> Level.isLocked && accessLockedLevels
+ {currentLevel->Level.isLocked && accessLockedLevels
?
- {"This level is still locked for students, and will be unlocked on " |> str}
- {currentLevel |> Level.unlockDateString |> str}
- {"." |> str}
+ {"This level is still locked for students, and will be unlocked on "->str}
+ {currentLevel->Level.unlockDateString->str}
+ {"."->str}
: React.null}
- {currentLevel |> Level.isUnlocked || accessLockedLevels
+ {currentLevel->Level.isUnlocked || accessLockedLevels
? targetGroupsInLevel
- |> TargetGroup.sort
- |> List.map(targetGroup =>
+ ->TargetGroup.sort
+ ->List.map(targetGroup =>
renderTargetGroup(targetGroup, targets, state.statusOfTargets)
)
- |> Array.of_list
- |> React.array
+ ->Array.of_list
+ ->React.array
: handleLockedLevel(currentLevel)}
}}
diff --git a/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesCurriculum__AutoVerify.res b/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesCurriculum__AutoVerify.res
index 1c438b6f65..5713736ee4 100644
--- a/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesCurriculum__AutoVerify.res
+++ b/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesCurriculum__AutoVerify.res
@@ -17,7 +17,7 @@ module AutoVerifySubmissionQuery = %graphql(`
let redirect = link => {
let window = Webapi.Dom.window
- window |> Webapi.Dom.Window.open_(~url=link, ~name="_blank", ~features="") |> ignore
+ window->Webapi.Dom.Window.open_(~url=link, ~name="_blank", ~features="")->ignore
}
let handleSuccess = (submission, linkToComplete, addSubmissionCB) => {
@@ -36,30 +36,30 @@ let handleSuccess = (submission, linkToComplete, addSubmissionCB) => {
}
let createAutoVerifySubmission = (target, linkToComplete, setSaving, addSubmissionCB, event) => {
- event |> ReactEvent.Mouse.preventDefault
+ event->ReactEvent.Mouse.preventDefault
setSaving(_ => true)
- AutoVerifySubmissionQuery.make(~targetId=target |> Target.id, ())
- |> GraphqlQuery.sendQuery
- |> Js.Promise.then_(response => {
+ AutoVerifySubmissionQuery.make(~targetId=target->Target.id, ())
+ ->GraphqlQuery.sendQuery
+ ->Js.Promise.then_(response => {
switch response["autoVerifySubmission"]["submission"] {
| Some(details) => handleSuccess(details, linkToComplete, addSubmissionCB)
| None => setSaving(_ => false)
}
Js.Promise.resolve()
})
- |> ignore
+ ->ignore
}
let completeButtonText = (title, iconClasses) =>
-
{title |> str}
+
{title->str}
let previewLinkToComplete = link =>
- {"Visit Link " |> str}
+ {"Visit Link "->str}
let autoVerify = (target, linkToComplete, saving, setSaving, addSubmissionCB, preview) =>
@@ -87,11 +87,11 @@ let statusBar = (string, linkToComplete) => {
-
{string |> str}
+
{string->str}
let visitLink = link =>
- {"Visit Link" |> str}
+ {"Visit Link"->str}
@@ -112,17 +112,17 @@ let completionInstructionText = linkToComplete =>
@react.component
let make = (~target, ~targetDetails, ~targetStatus, ~addSubmissionCB, ~preview) => {
let (saving, setSaving) = React.useState(() => false)
- let linkToComplete = targetDetails |> TargetDetails.linkToComplete
+ let linkToComplete = targetDetails->TargetDetails.linkToComplete
[
,
- {switch targetStatus |> TargetStatus.status {
+ {switch targetStatus->TargetStatus.status {
| Pending => autoVerify(target, linkToComplete, saving, setSaving, addSubmissionCB, preview)
| Locked(_) => React.null
| _ => statusBar("Completed", linkToComplete)
}}
,
- ] |> React.array
+ ]->React.array
}
diff --git a/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesCurriculum__ChecklistItem.res b/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesCurriculum__ChecklistItem.res
index 7c51e571a5..8a9b12fa6d 100644
--- a/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesCurriculum__ChecklistItem.res
+++ b/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesCurriculum__ChecklistItem.res
@@ -27,10 +27,10 @@ let optional = t => t.optional
let make = (~result, ~title, ~optional) => {result: result, title: title, optional: optional}
let fromTargetChecklistItem = targetChecklist =>
- targetChecklist |> Array.map(tc => {
- let title = tc |> TargetChecklistItem.title
- let optional = tc |> TargetChecklistItem.optional
- let result = switch tc |> TargetChecklistItem.kind {
+ targetChecklist->Array.map(tc => {
+ let title = tc->TargetChecklistItem.title
+ let optional = tc->TargetChecklistItem.optional
+ let result = switch tc->TargetChecklistItem.kind {
| Files => Files([])
| Link => Link("")
| ShortText => ShortText("")
@@ -41,7 +41,7 @@ let fromTargetChecklistItem = targetChecklist =>
})
let updateResultAtIndex = (index, result, checklist) =>
- checklist |> Array.mapi((i, c) => i == index ? {...c, result: result} : c)
+ checklist->Array.mapi((i, c) => i == index ? {...c, result: result} : c)
let makeFile = (id, name) => {id: id, name: name}
@@ -51,13 +51,13 @@ let fileId = file => file.id
let fileIds = checklist =>
checklist
- |> Array.map(c =>
+ ->Array.map(c =>
switch c.result {
- | Files(files) => files |> Array.map(a => a.id) |> Array.to_list
+ | Files(files) => files->Array.map(a => a.id)->Array.to_list
| _anyOtherResult => list{}
}
)
- |> ArrayUtils.flatten
+ ->ArrayUtils.flatten
let kindAsString = t =>
switch t.result {
@@ -75,11 +75,11 @@ let resultAsString = t =>
| ShortText(t)
| LongText(t) => t
| MultiChoice(choices, index) =>
- index |> OptionUtils.flatMap(i => choices |> ArrayUtils.getOpt(i)) |> OptionUtils.default("")
+ index->OptionUtils.flatMap(i => choices->ArrayUtils.getOpt(i))->OptionUtils.default("")
}
let validString = (s, maxLength) => {
- let length = s |> String.trim |> String.length
+ let length = s->String.trim->String.length
length >= 1 && length <= maxLength
}
@@ -87,19 +87,19 @@ let validShortText = s => validString(s, 250)
let validLongText = s => validString(s, 5000)
-let validFiles = files => files != [] && files |> Array.length < 3
+let validFiles = files => files != [] && files->Array.length < 3
let validMultiChoice = (choices, index) =>
- index |> OptionUtils.mapWithDefault(i => choices |> Array.length > i, false)
+ index->OptionUtils.mapWithDefault(i => choices->Array.length > i, false)
let validResponse = (response, allowBlank) => {
let optional = allowBlank ? response.optional : false
switch (response.result, optional) {
| (Files(files), false) => validFiles(files)
- | (Files(files), true) => files |> ArrayUtils.isEmpty || validFiles(files)
- | (Link(link), false) => link |> UrlUtils.isValid(false)
- | (Link(link), true) => link |> UrlUtils.isValid(true)
+ | (Files(files), true) => files->ArrayUtils.isEmpty || validFiles(files)
+ | (Link(link), false) => link->UrlUtils.isValid(false)
+ | (Link(link), true) => link->UrlUtils.isValid(true)
| (ShortText(t), false) => validShortText(t)
| (ShortText(t), true) => validShortText(t) || t == ""
| (LongText(t), false) => validLongText(t)
@@ -111,43 +111,43 @@ let validResponse = (response, allowBlank) => {
let validChecklist = checklist =>
checklist
- |> Array.map(c => validResponse(c, true))
- |> Js.Array.filter(c => !c)
- |> ArrayUtils.isEmpty
+ ->Array.map(c => validResponse(c, true))
+ ->Js.Array.filter(c => !c)
+ ->ArrayUtils.isEmpty
-let validResonses = responses => responses |> Js.Array.filter(c => validResponse(c, false))
+let validResonses = responses => responses->Js.Array.filter(c => validResponse(c, false))
let encode = t => {
open Json.Encode
object_(list{
- ("title", t.title |> string),
- ("kind", kindAsString(t) |> string),
- ("status", "noAnswer" |> string),
- ("result", resultAsString(t) |> string),
+ ("title", t.title->string),
+ ("kind", kindAsString(t)->string),
+ ("status", "noAnswer"->string),
+ ("result", resultAsString(t)->string),
})
}
let encodeArray = checklist =>
- validResonses(checklist) |> {
+ validResonses(checklist)->{
open Json.Encode
array(encode)
}
let makeFiles = checklist =>
checklist
- |> Js.Array.find(c =>
+ ->Js.Array.find(c =>
switch c.result {
| Files(_files) => true
| _anyOtherResult => false
}
)
- |> OptionUtils.mapWithDefault(c =>
+ ->OptionUtils.mapWithDefault(c =>
switch c.result {
| Files(files) => files
| _anyOtherResult => []
}
, [])
- |> Array.map(f => {
+ ->Array.map(f => {
let url = "/timeline_event_files/" ++ (f.id ++ "/download")
SubmissionChecklistItem.makeFile(~name=f.name, ~id=f.id, ~url)
})
diff --git a/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesCurriculum__Coach.res b/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesCurriculum__Coach.res
index 4b93c20338..98ac7681d9 100644
--- a/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesCurriculum__Coach.res
+++ b/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesCurriculum__Coach.res
@@ -9,7 +9,7 @@ let userId = t => t.userId
let decode = json => {
open Json.Decode
{
- id: json |> field("id", string),
- userId: json |> field("userId", string),
+ id: json->field("id", string),
+ userId: json->field("userId", string),
}
}
diff --git a/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesCurriculum__Community.res b/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesCurriculum__Community.res
index 6670c29a5c..1ee51b54c7 100644
--- a/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesCurriculum__Community.res
+++ b/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesCurriculum__Community.res
@@ -12,17 +12,17 @@ type t = {
let decodeQuestion = json => {
open Json.Decode
{
- questionId: json |> field("id", string),
- questionTitle: json |> field("title", string),
+ questionId: json->field("id", string),
+ questionTitle: json->field("title", string),
}
}
let decode = json => {
open Json.Decode
{
- id: json |> field("id", string),
- name: json |> field("name", string),
- questions: json |> field("questions", list(decodeQuestion)),
+ id: json->field("id", string),
+ name: json->field("name", string),
+ questions: json->field("questions", list(decodeQuestion)),
}
}
diff --git a/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesCurriculum__CompletionInstructions.res b/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesCurriculum__CompletionInstructions.res
index 0179cd438a..5083fdfa17 100644
--- a/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesCurriculum__CompletionInstructions.res
+++ b/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesCurriculum__CompletionInstructions.res
@@ -4,7 +4,7 @@ open CoursesCurriculum__Types
@react.component
let make = (~targetDetails, ~title) =>
- switch targetDetails |> TargetDetails.completionInstructions {
+ switch targetDetails->TargetDetails.completionInstructions {
| Some(completionInstructions) =>
@@ -12,8 +12,8 @@ let make = (~targetDetails, ~title) =>
-
{title |> str}
-
{completionInstructions |> str}
+
{title->str}
+
{completionInstructions->str}
| None => React.null
diff --git a/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesCurriculum__Course.res b/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesCurriculum__Course.res
index 194823d7dd..979dd0745a 100644
--- a/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesCurriculum__Course.res
+++ b/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesCurriculum__Course.res
@@ -6,8 +6,8 @@ type t = {
let decode = json => {
open Json.Decode
{
- id: json |> field("id", string),
- endsAt: json |> field("endsAt", nullable(string)) |> Js.Null.toOption,
+ id: json->field("id", string),
+ endsAt: json->field("endsAt", nullable(string))->Js.Null.toOption,
}
}
@@ -16,6 +16,6 @@ let id = t => t.id
let hasEnded = t =>
switch t.endsAt {
- | Some(date) => date |> DateFns.parseString |> DateFns.isPast
+ | Some(date) => date->DateFns.parseString->DateFns.isPast
| None => false
}
diff --git a/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesCurriculum__Discuss.res b/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesCurriculum__Discuss.res
index 68e668d1c1..e41cac3a5c 100644
--- a/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesCurriculum__Discuss.res
+++ b/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesCurriculum__Discuss.res
@@ -9,14 +9,14 @@ let linkToNewQuestion = (communityId, targetId) =>
"/communities/" ++ (communityId ++ ("/new_question" ++ ("?target_id=" ++ targetId)))
let questionCard = question => {
- let questionId = question |> Community.questionId
+ let questionId = question->Community.questionId
let questionLink = "/questions/" ++ questionId
}
@@ -25,59 +25,59 @@ let handleEmpty = () =>
- {"There's been no recent discussion about this target." |> str}
+ {"There's been no recent discussion about this target."->str}
-
{"Use the community to clear your doubts, and to help your peers!" |> str}
+
{"Use the community to clear your doubts, and to help your peers!"->str}
let actionButtons = (community, targetId) => {
- let communityId = community |> Community.id
- let communityName = community |> Community.name
+ let communityId = community->Community.id
+ let communityName = community->Community.name
}
let communityTitle = community =>
- {"Questions from " ++ ((community |> Community.name) ++ " community") |> str}
+ {"Questions from " ++ ((community->Community.name) ++ " community")->str}
@react.component
let make = (~targetId, ~communities) =>
{communities
- |> List.map(community => {
- let communityId = community |> Community.id
+ ->List.map(community => {
+ let communityId = community->Community.id
{communityTitle(community)}
{actionButtons(community, targetId)}
- {switch community |> Community.questions {
+ {switch community->Community.questions {
| list{} => handleEmpty()
| questions =>
questions
- |> List.map(question => questionCard(question))
- |> Array.of_list
- |> React.array
+ ->List.map(question => questionCard(question))
+ ->Array.of_list
+ ->React.array
}}
})
- |> Array.of_list
- |> React.array}
+ ->Array.of_list
+ ->React.array}
diff --git a/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesCurriculum__Feedback.res b/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesCurriculum__Feedback.res
index 26d2d78ca1..790035ad58 100644
--- a/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesCurriculum__Feedback.res
+++ b/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesCurriculum__Feedback.res
@@ -15,9 +15,9 @@ let feedback = t => t.feedback
let decode = json => {
open Json.Decode
{
- id: json |> field("id", string),
- coachId: json |> field("coachId", string),
- submissionId: json |> field("submissionId", string),
- feedback: json |> field("feedback", string),
+ id: json->field("id", string),
+ coachId: json->field("coachId", string),
+ submissionId: json->field("submissionId", string),
+ feedback: json->field("feedback", string),
}
}
diff --git a/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesCurriculum__FileForm.res b/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesCurriculum__FileForm.res
index 1f95a0d166..c454d42a9c 100644
--- a/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesCurriculum__FileForm.res
+++ b/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesCurriculum__FileForm.res
@@ -24,7 +24,7 @@ let reducer = (state, action) =>
}
let handleResponseJSON = (filename, send, attachFileCB, json) => {
- let id = json |> {
+ let id = json->{
open Json.Decode
field("id", string)
}
@@ -48,19 +48,19 @@ let uploadFile = (filename, send, attachFileCB, formData) => {
(),
),
)
- |> then_(response =>
+ ->then_(response =>
if Fetch.Response.ok(response) {
- response |> Fetch.Response.json
+ response->Fetch.Response.json
} else {
- Js.Promise.reject(UnexpectedResponse(response |> Fetch.Response.status))
+ Js.Promise.reject(UnexpectedResponse(response->Fetch.Response.status))
}
)
- |> then_(json => handleResponseJSON(filename, send, attachFileCB, json) |> resolve)
- |> catch(error =>
- switch error |> handleApiError {
+ ->then_(json => handleResponseJSON(filename, send, attachFileCB, json)->resolve)
+ ->catch(error =>
+ switch error->handleApiError {
| Some(code) =>
Notification.error(
- "Error " ++ (code |> string_of_int),
+ "Error " ++ (code->string_of_int),
"Please reload the page and try again.",
)
| None =>
@@ -68,16 +68,16 @@ let uploadFile = (filename, send, attachFileCB, formData) => {
"Something went wrong!",
"Our team has been notified of this error. Please reload the page and try again.",
)
- } |> resolve
+ }->resolve
)
- |> ignore
+ ->ignore
}
let submitForm = (filename, formId, send, addFileAttachmentCB) => {
let element = ReactDOMRe._getElementById(formId)
switch element {
| Some(element) =>
- DomUtils.FormData.create(element) |> uploadFile(filename, send, addFileAttachmentCB)
+ DomUtils.FormData.create(element)->uploadFile(filename, send, addFileAttachmentCB)
| None => raise(FormNotFound(formId))
}
}
@@ -93,7 +93,7 @@ let attachFile = (state, send, attachingCB, attachFileCB, preview, event) =>
let errors = file["size"] > maxFileSize ? list{"The maximum file size is 5 MB."} : list{}
- if errors |> ListUtils.isEmpty {
+ if errors->ListUtils.isEmpty {
let filename = file["name"]
attachingCB(true)
send(AttachFile(filename))
@@ -108,7 +108,7 @@ let make = (~attachFileCB, ~attachingCB, ~preview) => {
let (state, send) = React.useReducer(
reducer,
{
- formId: Random.int(99999) |> string_of_int,
+ formId: Random.int(99999)->string_of_int,
filename: defaultTitle,
errors: list{},
},
@@ -131,22 +131,22 @@ let make = (~attachFileCB, ~attachingCB, ~preview) => {
htmlFor="attachment_file">
- {state.filename |> str}
+ {state.filename->str}
{state.errors
- |> List.map(error =>
+ ->List.map(error =>
- {error |> str}
+ {error->str}
)
- |> Array.of_list
- |> React.array}
- {state.errors |> ListUtils.isEmpty
+ ->Array.of_list
+ ->React.array}
+ {state.errors->ListUtils.isEmpty
? React.null
:
- {"Please choose another file for upload." |> str}
+ {"Please choose another file for upload."->str}
}
}
diff --git a/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesCurriculum__Grade.res b/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesCurriculum__Grade.res
index d92cf72613..576005e622 100644
--- a/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesCurriculum__Grade.res
+++ b/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesCurriculum__Grade.res
@@ -7,20 +7,20 @@ type t = {
let decode = json => {
open Json.Decode
{
- submissionId: json |> field("submissionId", string),
- evaluationCriterionId: json |> field("evaluationCriterionId", string),
- grade: json |> field("grade", int),
+ submissionId: json->field("submissionId", string),
+ evaluationCriterionId: json->field("evaluationCriterionId", string),
+ grade: json->field("grade", int),
}
}
let sort = (criteria, grades) =>
grades
- |> Array.of_list
- |> ArrayUtils.copyAndSort((g1, g2) => {
+ ->Array.of_list
+ ->ArrayUtils.copyAndSort((g1, g2) => {
let ec1 =
criteria
- |> Array.of_list
- |> ArrayUtils.unsafeFind(
+ ->Array.of_list
+ ->ArrayUtils.unsafeFind(
ec => EvaluationCriterion.id(ec) == g1.evaluationCriterionId,
"Unable to find evaluation criterion with ID: " ++
(g1.evaluationCriterionId ++
@@ -28,16 +28,16 @@ let sort = (criteria, grades) =>
)
let ec2 =
criteria
- |> Array.of_list
- |> ArrayUtils.unsafeFind(
+ ->Array.of_list
+ ->ArrayUtils.unsafeFind(
ec => EvaluationCriterion.id(ec) == g2.evaluationCriterionId,
"Unable to find evaluation criterion with ID: " ++
(g2.evaluationCriterionId ++
" in CoursesCurriculum__Grade"),
)
- String.compare(ec1 |> EvaluationCriterion.name, ec2 |> EvaluationCriterion.name)
+ String.compare(ec1->EvaluationCriterion.name, ec2->EvaluationCriterion.name)
})
- |> Array.to_list
+ ->Array.to_list
let grade = t => t.grade
let submissionId = t => t.submissionId
diff --git a/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesCurriculum__GradeBar.res b/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesCurriculum__GradeBar.res
index 75fa164141..fc3629d4cd 100644
--- a/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesCurriculum__GradeBar.res
+++ b/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesCurriculum__GradeBar.res
@@ -5,20 +5,20 @@ let str = React.string
open CoursesCurriculum__Types
let gradeDescription = (gradeLabels, grading) =>
- {grading |> Grading.criterionName |> str}
- {switch grading |> Grading.grade {
+ {grading->Grading.criterionName->str}
+ {switch grading->Grading.grade {
| Some(grade) =>
- {": " |> str}
+ {": "->str}
- {grade |> GradeLabel.labelFor(gradeLabels) |> str}
+ {grade->GradeLabel.labelFor(gradeLabels)->str}
| None => ReasonReact.null
}}
-let maxGrade = gradeLabels => gradeLabels |> GradeLabel.maxGrade |> string_of_int
+let maxGrade = gradeLabels => gradeLabels->GradeLabel.maxGrade->string_of_int
let gradePillClasses = (gradeReceived, passGrade, pillGrade, callBack) => {
let defaultClasses = "grade-bar__grade-pill cursor-auto"
@@ -40,12 +40,12 @@ let gradePillClasses = (gradeReceived, passGrade, pillGrade, callBack) => {
let gradeBarHeader = (grading, gradeLabels) =>
- {grading |> gradeDescription(gradeLabels)}
- {switch grading |> Grading.grade {
+ {grading->gradeDescription(gradeLabels)}
+ {switch grading->Grading.grade {
| None => ReasonReact.null
| Some(grade) =>
- {(grade |> string_of_int) ++ ("/" ++ maxGrade(gradeLabels)) |> str}
+ {(grade->string_of_int) ++ ("/" ++ maxGrade(gradeLabels))->str}
}}
@@ -53,20 +53,20 @@ let gradeBarHeader = (grading, gradeLabels) =>
let handleClick = (gradeSelectCB, grading, newGrade) =>
switch gradeSelectCB {
| None => ()
- | Some(callBack) => callBack(grading |> Grading.updateGrade(newGrade))
+ | Some(callBack) => callBack(grading->Grading.updateGrade(newGrade))
}
let gradeBarPill = (gradeLabel, grading, gradeSelectCB, passGrade) => {
- let myGrade = gradeLabel |> GradeLabel.grade
+ let myGrade = gradeLabel->GradeLabel.grade
string_of_int}
- title={gradeLabel |> GradeLabel.label}
+ key={myGrade->string_of_int}
+ title={gradeLabel->GradeLabel.label}
role="button"
onClick={_event => handleClick(gradeSelectCB, grading, myGrade)}
- className={gradePillClasses(grading |> Grading.grade, passGrade, myGrade, gradeSelectCB)}>
+ className={gradePillClasses(grading->Grading.grade, passGrade, myGrade, gradeSelectCB)}>
{switch gradeSelectCB {
| None => ReasonReact.null
- | Some(_CB) => myGrade |> string_of_int |> str
+ | Some(_CB) => myGrade->string_of_int->str
}}
}
@@ -74,15 +74,15 @@ let gradeBarPill = (gradeLabel, grading, gradeSelectCB, passGrade) => {
let gradeBarPanel = (grading, gradeLabels, gradeSelectCB, passGrade) =>
{gradeLabels
- |> List.map(gradeLabel => gradeBarPill(gradeLabel, grading, gradeSelectCB, passGrade))
- |> Array.of_list
- |> ReasonReact.array}
+ ->List.map(gradeLabel => gradeBarPill(gradeLabel, grading, gradeSelectCB, passGrade))
+ ->Array.of_list
+ ->ReasonReact.array}
@react.component
let make = (~grading, ~gradeSelectCB=?, ~criterion) => {
- let gradeLabels = criterion |> EvaluationCriterion.gradesAndLabels |> Array.to_list
- let passGrade = criterion |> EvaluationCriterion.passGrade
+ let gradeLabels = criterion->EvaluationCriterion.gradesAndLabels->Array.to_list
+ let passGrade = criterion->EvaluationCriterion.passGrade
{gradeBarHeader(grading, gradeLabels)}
{gradeBarPanel(grading, gradeLabels, gradeSelectCB, passGrade)}
diff --git a/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesCurriculum__Grading.res b/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesCurriculum__Grading.res
index fc9d66d1bd..c0a18faadf 100644
--- a/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesCurriculum__Grading.res
+++ b/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesCurriculum__Grading.res
@@ -7,15 +7,15 @@ type t = {
let decode = json => {
open Json.Decode
{
- criterionId: json |> field("criterionId", string),
- criterionName: json |> field("criterionName", string),
- grade: json |> field("grade", nullable(int)) |> Js.Null.toOption,
+ criterionId: json->field("criterionId", string),
+ criterionName: json->field("criterionName", string),
+ grade: json->field("grade", nullable(int))->Js.Null.toOption,
}
}
let grade = t => t.grade
-let pending = evaluation => evaluation |> List.exists(grading => grading.grade == None)
+let pending = evaluation => evaluation->List.exists(grading => grading.grade == None)
let isFail = (passGrade, grading) =>
switch grading.grade {
@@ -24,7 +24,7 @@ let isFail = (passGrade, grading) =>
}
let anyFail = (passGrade, evaluation) =>
- evaluation |> List.exists(grading => grading |> isFail(passGrade))
+ evaluation->List.exists(grading => grading->isFail(passGrade))
let criterionId = t => t.criterionId
@@ -39,11 +39,11 @@ let updateGrade = (newGrade, t) => {
let gradingEncoder = grading => {
open Json.Encode
object_(list{
- ("criterionId", grading.criterionId |> string),
+ ("criterionId", grading.criterionId->string),
(
"grade",
switch grading.grade {
- | Some(grade) => grade |> int
+ | Some(grade) => grade->int
| None => null
},
),
diff --git a/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesCurriculum__LatestSubmission.res b/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesCurriculum__LatestSubmission.res
index a2d1c08298..7ce36ea752 100644
--- a/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesCurriculum__LatestSubmission.res
+++ b/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesCurriculum__LatestSubmission.res
@@ -7,9 +7,9 @@ type t = {
let decode = json => {
open Json.Decode
{
- targetId: json |> field("targetId", string),
- passedAt: json |> field("passedAt", nullable(string)) |> Js.Null.toOption,
- evaluatorId: json |> field("evaluatorId", nullable(string)) |> Js.Null.toOption,
+ targetId: json->field("targetId", string),
+ passedAt: json->field("passedAt", nullable(string))->Js.Null.toOption,
+ evaluatorId: json->field("evaluatorId", nullable(string))->Js.Null.toOption,
}
}
@@ -29,6 +29,6 @@ let hasBeenEvaluated = t =>
let make = (~pending, ~targetId) => {
targetId: targetId,
- passedAt: pending ? None : Some(Js.Date.make() |> Js.Date.toISOString),
+ passedAt: pending ? None : Some(Js.Date.make()->Js.Date.toISOString),
evaluatorId: None,
}
diff --git a/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesCurriculum__Learn.res b/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesCurriculum__Learn.res
index fd08cb593b..64c2eb1f89 100644
--- a/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesCurriculum__Learn.res
+++ b/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesCurriculum__Learn.res
@@ -3,6 +3,6 @@ open CoursesCurriculum__Types
@react.component
let make = (~targetDetails) => {
let contentBlocks =
- targetDetails |> TargetDetails.contentBlocks |> Array.of_list |> ContentBlock.sort
+ targetDetails->TargetDetails.contentBlocks->Array.of_list->ContentBlock.sort
}
diff --git a/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesCurriculum__Level.res b/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesCurriculum__Level.res
index 385e0be942..daed165c5e 100644
--- a/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesCurriculum__Level.res
+++ b/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesCurriculum__Level.res
@@ -8,10 +8,10 @@ type t = {
let decode = json => {
open Json.Decode
{
- id: json |> field("id", string),
- name: json |> field("name", string),
- number: json |> field("number", int),
- unlockOn: json |> field("unlockOn", nullable(string)) |> Js.Null.toOption,
+ id: json->field("id", string),
+ name: json->field("name", string),
+ number: json->field("number", int),
+ unlockOn: json->field("unlockOn", nullable(string))->Js.Null.toOption,
}
}
@@ -22,16 +22,16 @@ let unlockOn = t => t.unlockOn
let isUnlocked = t =>
switch t.unlockOn {
- | Some(date) => date |> DateFns.parseString |> DateFns.isPast
+ | Some(date) => date->DateFns.parseString->DateFns.isPast
| None => true
}
-let isLocked = t => !(t |> isUnlocked)
+let isLocked = t => !(t->isUnlocked)
-let sort = levels => levels |> List.sort((x, y) => x.number - y.number)
+let sort = levels => levels->List.sort((x, y) => x.number - y.number)
let first = levels =>
- switch levels |> sort {
+ switch levels->sort {
| list{} =>
Rollbar.error("Failed to find the first level from a course's levels.")
raise(Not_found)
@@ -43,13 +43,13 @@ let unlockDateString = t =>
| None =>
Rollbar.error("unlockDateString was called for a CoursesCurriculum__Level without unlockOn")
""
- | Some(unlockOn) => unlockOn |> DateFns.parseString |> DateFns.format("MMM D")
+ | Some(unlockOn) => unlockOn->DateFns.parseString->DateFns.format("MMM D")
}
let findByLevelNumber = (levels, levelNumber) =>
- levels |> List.find_opt(l => l.number == levelNumber)
+ levels->List.find_opt(l => l.number == levelNumber)
-let next = (levels, t) => t.number + 1 |> findByLevelNumber(levels)
+let next = (levels, t) => t.number + 1->findByLevelNumber(levels)
let previous = (levels, t) => {
let previousLevelNumber = t.number - 1
@@ -57,6 +57,6 @@ let previous = (levels, t) => {
if previousLevelNumber == 0 {
None
} else {
- previousLevelNumber |> findByLevelNumber(levels)
+ previousLevelNumber->findByLevelNumber(levels)
}
}
diff --git a/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesCurriculum__LevelSelector.res b/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesCurriculum__LevelSelector.res
index fdf4fb1504..1b0d6950d0 100644
--- a/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesCurriculum__LevelSelector.res
+++ b/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesCurriculum__LevelSelector.res
@@ -10,19 +10,19 @@ let levelZeroSelectorClasses = isSelected => {
}
let levelName = level =>
- "L" ++ ((level |> Level.number |> string_of_int) ++ (": " ++ (level |> Level.name)))
+ "L" ++ ((level->Level.number->string_of_int) ++ (": " ++ (level->Level.name)))
let selectableLevels = (orderedLevels, teamLevel, setSelectedLevelId) => {
- let teamLevelNumber = teamLevel |> Level.number
+ let teamLevelNumber = teamLevel->Level.number
orderedLevels
- |> List.map(level => {
- let levelNumber = level |> Level.number
+ ->List.map(level => {
+ let levelNumber = level->Level.number
let icon = if levelNumber < teamLevelNumber {
"fas fa-check text-green-500"
} else if levelNumber == teamLevelNumber {
"fas fa-map-marker-alt text-blue-400"
- } else if level |> Level.isUnlocked {
+ } else if level->Level.isUnlocked {
"inline-block"
} else {
"fas fa-lock text-gray-600"
@@ -30,20 +30,20 @@ let selectableLevels = (orderedLevels, teamLevel, setSelectedLevelId) => {
})
- |> Array.of_list
+ ->Array.of_list
}
let untabbedLevelSelector = (selectedLevel, orderedLevels, teamLevel, setSelectedLevelId) => {
let selected =
@@ -68,7 +68,7 @@ let tabbedLevelSelector = (
@@ -93,9 +93,9 @@ let tabbedLevelSelector = (
className={"border-l rounded-r-lg bg-white border-gray-400 font-semibold truncate hover:bg-gray-100 hover:text-primary-500 " ++
levelZeroSelectorClasses(showLevelZero)}
onClick={_e => setShowLevelZero(true)}>
- {levelZero |> Level.name |> str}
+ {levelZero->Level.name->str}
,
- ] |> React.array
+ ]->React.array
}
@react.component
@@ -108,7 +108,7 @@ let make = (
~setShowLevelZero,
~levelZero,
) => {
- let orderedLevels = levels |> List.filter(l => l |> Level.number != 0) |> Level.sort
+ let orderedLevels = levels->List.filter(l => l->Level.number != 0)->Level.sort
{
let submitButtonText = (title, iconClasses) =>
-
{title |> str}
+
{title->str}
saving
? submitButtonText("Saving", "fas fa-spinner fa-spin")
@@ -21,20 +21,20 @@ let handleSubmitButton = saving => {
let refreshPage = () => {
open Webapi.Dom
- location |> Location.reload
+ location->Location.reload
}
let createLevelUpQuery = (course, setSaving, event) => {
- event |> ReactEvent.Mouse.preventDefault
+ event->ReactEvent.Mouse.preventDefault
setSaving(_ => true)
- LevelUpQuery.make(~courseId=course |> Course.id, ())
- |> GraphqlQuery.sendQuery
- |> Js.Promise.then_(response => {
+ LevelUpQuery.make(~courseId=course->Course.id, ())
+ ->GraphqlQuery.sendQuery
+ ->Js.Promise.then_(response => {
response["levelUp"]["success"] ? refreshPage() : setSaving(_ => false)
Js.Promise.resolve()
})
- |> ignore
+ ->ignore
}
@react.component
diff --git a/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesCurriculum__NoticeManager.res b/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesCurriculum__NoticeManager.res
index 8646fe3c04..3011f1ee74 100644
--- a/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesCurriculum__NoticeManager.res
+++ b/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesCurriculum__NoticeManager.res
@@ -10,9 +10,9 @@ let showNotice = (
(),
) =>
-
Notice.icon} />
-
{title |> str}
-
{description |> str}
+
Notice.icon} />
+
{title->str}
+
{description->str}
let courseCompletedMessage = () => {
@@ -32,9 +32,9 @@ let showPreviewMessage = () =>
className="flex max-w-lg md:mx-auto mx-3 mt-4 rounded-lg px-3 py-2 shadow-lg items-center border border-primary-300 bg-gray-200 ">
-
{"Preview Mode" |> str}
+
{"Preview Mode"->str}
- {"You are accessing the preview mode for this course" |> str}
+ {"You are accessing the preview mode for this course"->str}
@@ -47,8 +47,8 @@ let accessEndedMessage = () => {
let levelUpBlockedMessage = levelNumber => {
let title = "Level Up Blocked"
- let currentLevel = levelNumber |> string_of_int
- let lastLevel = levelNumber - 1 |> string_of_int
+ let currentLevel = levelNumber->string_of_int
+ let lastLevel = levelNumber - 1->string_of_int
let description =
"You're at Level " ++
(currentLevel ++
diff --git a/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesCurriculum__Overlay.res b/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesCurriculum__Overlay.res
index 4832f81c6f..5ca46e85df 100644
--- a/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesCurriculum__Overlay.res
+++ b/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesCurriculum__Overlay.res
@@ -38,27 +38,27 @@ let reducer = (state, action) =>
| Target.Student => state
| Team => {
...state,
- targetDetails: state.targetDetails |> OptionUtils.map(TargetDetails.clearPendingUserIds),
+ targetDetails: state.targetDetails->OptionUtils.map(TargetDetails.clearPendingUserIds),
}
}
}
let closeOverlay = course =>
- ReasonReactRouter.push("/courses/" ++ ((course |> Course.id) ++ "/curriculum"))
+ ReasonReactRouter.push("/courses/" ++ ((course->Course.id) ++ "/curriculum"))
let loadTargetDetails = (target, send, ()) => {
{
open Js.Promise
- Fetch.fetch("/targets/" ++ ((target |> Target.id) ++ "/details_v2"))
- |> then_(Fetch.Response.json)
- |> then_(json => send(SetTargetDetails(json |> TargetDetails.decode)) |> resolve)
- } |> ignore
+ Fetch.fetch("/targets/" ++ ((target->Target.id) ++ "/details_v2"))
+ ->then_(Fetch.Response.json)
+ ->then_(json => send(SetTargetDetails(json->TargetDetails.decode))->resolve)
+ }->ignore
None
}
let completionTypeToString = (completionType, targetStatus) =>
- switch (targetStatus |> TargetStatus.status, (completionType: TargetDetails.completionType)) {
+ switch (targetStatus->TargetStatus.status, (completionType: TargetDetails.completionType)) {
| (Pending, Evaluated) => "Complete"
| (Pending, TakeQuiz) => "Take Quiz"
| (Pending, LinkToComplete) => "Visit Link to Complete"
@@ -79,7 +79,7 @@ let tabToString = (targetStatus, tab) =>
}
let selectableTabs = targetDetails =>
- targetDetails |> TargetDetails.communities |> ListUtils.isNotEmpty
+ targetDetails->TargetDetails.communities->ListUtils.isNotEmpty
? list{Learn, Discuss}
: list{Learn}
@@ -91,14 +91,14 @@ let tabClasses = (selection, tab) =>
)
let scrollCompleteButtonIntoViewEventually = () => Js.Global.setTimeout(() => {
- let element = Webapi.Dom.document |> Webapi.Dom.Document.getElementById("auto-verify-target")
+ let element = Webapi.Dom.document->Webapi.Dom.Document.getElementById("auto-verify-target")
switch element {
| Some(e) =>
Webapi.Dom.Element.scrollIntoView(e)
e->Webapi.Dom.Element.setClassName("mt-4 complete-button-selected")
| None => Rollbar.error("Could not find the 'Complete' button to scroll to.")
}
- }, 50) |> ignore
+ }, 50)->ignore
let handleTablink = (send, _event) => {
send(Select(Learn))
@@ -107,30 +107,30 @@ let handleTablink = (send, _event) => {
let tabButton = (tab, state, send, targetStatus) =>
tabToString(targetStatus))}
+ key={"select-" ++ (tab->tabToString(targetStatus))}
className={tabClasses(tab, state.tab)}
onClick={_e => send(Select(tab))}>
- {tab |> tabToString(targetStatus) |> str}
+ {tab->tabToString(targetStatus)->str}
let tabLink = (tab, state, send, targetStatus) =>
- {tab |> tabToString(targetStatus) |> str}
+ {tab->tabToString(targetStatus)->str}
let tabOptions = (state, send, targetDetails, targetStatus) => {
- let completionType = targetDetails |> TargetDetails.computeCompletionType
+ let completionType = targetDetails->TargetDetails.computeCompletionType
{selectableTabs(targetDetails)
- |> List.map(selection => tabButton(selection, state, send, targetStatus))
- |> Array.of_list
- |> React.array}
- {switch (targetStatus |> TargetStatus.status, completionType) {
+ ->List.map(selection => tabButton(selection, state, send, targetStatus))
+ ->Array.of_list
+ ->React.array}
+ {switch (targetStatus->TargetStatus.status, completionType) {
| (Pending | Submitted | Passed | Failed, Evaluated | TakeQuiz) =>
tabButton(Complete(completionType), state, send, targetStatus)
| (Locked(CourseLocked | AccessLocked), Evaluated | TakeQuiz) =>
- targetDetails |> TargetDetails.submissions |> ListUtils.isNotEmpty
+ targetDetails->TargetDetails.submissions->ListUtils.isNotEmpty
? tabButton(Complete(completionType), state, send, targetStatus)
: React.null
| (Pending | Submitted | Passed | Failed, LinkToComplete | MarkAsComplete) =>
@@ -143,16 +143,16 @@ let tabOptions = (state, send, targetDetails, targetStatus) => {
let addSubmission = (target, state, send, addSubmissionCB, submission) => {
switch state.targetDetails {
| Some(targetDetails) =>
- let newTargetDetails = targetDetails |> TargetDetails.addSubmission(submission)
+ let newTargetDetails = targetDetails->TargetDetails.addSubmission(submission)
send(SetTargetDetails(newTargetDetails))
| None => ()
}
- switch submission |> Submission.status {
+ switch submission->Submission.status {
| MarkedAsComplete =>
- addSubmissionCB(LatestSubmission.make(~pending=false, ~targetId=target |> Target.id))
- | Pending => addSubmissionCB(LatestSubmission.make(~pending=true, ~targetId=target |> Target.id))
+ addSubmissionCB(LatestSubmission.make(~pending=false, ~targetId=target->Target.id))
+ | Pending => addSubmissionCB(LatestSubmission.make(~pending=true, ~targetId=target->Target.id))
| Passed =>
raise(
UnexpectedSubmissionStatus(
@@ -171,16 +171,16 @@ let addSubmission = (target, state, send, addSubmissionCB, submission) => {
let addVerifiedSubmission = (target, state, send, addSubmissionCB, submission) => {
switch state.targetDetails {
| Some(targetDetails) =>
- let newTargetDetails = targetDetails |> TargetDetails.addSubmission(submission)
+ let newTargetDetails = targetDetails->TargetDetails.addSubmission(submission)
send(SetTargetDetails(newTargetDetails))
| None => ()
}
- addSubmissionCB(LatestSubmission.make(~pending=false, ~targetId=target |> Target.id))
+ addSubmissionCB(LatestSubmission.make(~pending=false, ~targetId=target->Target.id))
}
let targetStatusClass = (prefix, targetStatus) =>
- prefix ++ (targetStatus |> TargetStatus.statusToString |> Js.String.toLowerCase)
+ prefix ++ (targetStatus->TargetStatus.statusToString->Js.String.toLowerCase)
let targetStatusClasses = targetStatus =>
"curriculum__target-status bg-white text-xs mt-2 md:mt-0 py-1 px-2 md:px-4 " ++
@@ -193,7 +193,7 @@ let overlayHeaderTitleCardClasses = targetStatus =>
let renderLocked = text =>
- {text |> str}
+ {text->str}
let overlayStatus = (course, target, targetStatus, preview) =>
@@ -203,14 +203,14 @@ let overlayStatus = (course, target, targetStatus, preview) =>
targetStatusClass("course-overlay__close--", targetStatus)}
onClick={_e => closeOverlay(course)}>
-
{"Close" |> str}
+
{"Close"->str}
- {target |> Target.title |> str}
+ {target->Target.title->str}
- {targetStatus |> TargetStatus.statusToString |> str}
+ {targetStatus->TargetStatus.statusToString->str}
@@ -219,42 +219,42 @@ let overlayStatus = (course, target, targetStatus, preview) =>
: React.null}
-let renderLockReason = reason => renderLocked(reason |> TargetStatus.lockReasonToString)
+let renderLockReason = reason => renderLocked(reason->TargetStatus.lockReasonToString)
let prerequisitesIncomplete = (reason, target, targets, statusOfTargets) => {
- let prerequisiteTargetIds = target |> Target.prerequisiteTargetIds
+ let prerequisiteTargetIds = target->Target.prerequisiteTargetIds
let prerequisiteTargets =
- targets |> List.filter(target => (target |> Target.id)->List.mem(prerequisiteTargetIds))
+ targets->List.filter(target => (target->Target.id)->List.mem(prerequisiteTargetIds))
{renderLockReason(reason)}
{prerequisiteTargets
- |> List.map(target => {
+ ->List.map(target => {
let targetStatus =
- statusOfTargets |> List.find(ts => ts |> TargetStatus.targetId == (target |> Target.id))
+ statusOfTargets->List.find(ts => ts->TargetStatus.targetId == (target->Target.id))
Target.id)}
- ariaLabel={"Select Target " ++ (target |> Target.id)}
- key={target |> Target.id}
+ href={"/targets/" ++ (target->Target.id)}
+ ariaLabel={"Select Target " ++ (target->Target.id)}
+ key={target->Target.id}
className="bg-white border-t px-6 py-4 relative z-10 flex items-center justify-between hover:bg-gray-200 hover:text-primary-500 cursor-pointer">
- {target |> Target.title |> str}
+ {target->Target.title->str}
- {targetStatus |> TargetStatus.statusToString |> str}
+ {targetStatus->TargetStatus.statusToString->str}
})
- |> Array.of_list
- |> React.array}
+ ->Array.of_list
+ ->React.array}
}
let handleLocked = (target, targets, targetStatus, statusOfTargets) =>
- switch targetStatus |> TargetStatus.status {
+ switch targetStatus->TargetStatus.status {
| Locked(reason) =>
switch reason {
| PrerequisitesIncomplete => prerequisitesIncomplete(reason, target, targets, statusOfTargets)
@@ -279,7 +279,7 @@ let learnSection = (targetDetails, tab) =>
let discussSection = (target, targetDetails, tab) =>
Target.id} communities={targetDetails |> TargetDetails.communities}
+ targetId={target->Target.id} communities={targetDetails->TargetDetails.communities}
/>
@@ -303,12 +303,12 @@ let completeSection = (
users,
preview,
) => {
- let completionType = targetDetails |> TargetDetails.computeCompletionType
+ let completionType = targetDetails->TargetDetails.computeCompletionType
let addVerifiedSubmissionCB = addVerifiedSubmission(target, state, send, addSubmissionCB)
- {switch (targetStatus |> TargetStatus.status, completionType) {
+ {switch (targetStatus->TargetStatus.status, completionType) {
| (Pending, Evaluated) =>
[
TargetDetails.checklist}
+ checklist={targetDetails->TargetDetails.checklist}
addSubmissionCB={addSubmission(target, state, send, addSubmissionCB)}
preview
/>,
- ] |> React.array
+ ]->React.array
| (Pending, TakeQuiz) =>
[
,
- ] |> React.array
+ ]->React.array
| (Submitted | Passed | Failed | Locked(CourseLocked | AccessLocked), Evaluated | TakeQuiz) =>
TargetDetails.checklist}
+ checklist={targetDetails->TargetDetails.checklist}
/>
| (Pending | Submitted | Passed | Failed, LinkToComplete | MarkAsComplete) =>
- {"You have team members who are yet to complete this target:" |> str}
+ {"You have team members who are yet to complete this target:"->str}
{pendingUserIds
- |> List.map(studentId => {
+ ->List.map(studentId => {
let user =
- users |> ListUtils.unsafeFind(
- u => u |> User.id == studentId,
+ users->ListUtils.unsafeFind(
+ u => u->User.id == studentId,
"Unable to find user with id " ++ (studentId ++ "in CoursesCurriculum__Overlay"),
)
User.name) ++ " has not completed this target."}
+ title={(user->User.name) ++ " has not completed this target."}
className="w-10 h-10 rounded-full border border-yellow-400 flex items-center justify-center overflow-hidden mx-1 shadow-md flex-shrink-0 mt-2">
-
User.avatarUrl} />
+
User.avatarUrl} />
})
- |> Array.of_list
- |> React.array}
+ ->Array.of_list
+ ->React.array}
let handlePendingStudents = (targetStatus, targetDetails, users) =>
- switch (targetDetails, targetStatus |> TargetStatus.status) {
+ switch (targetDetails, targetStatus->TargetStatus.status) {
| (Some(targetDetails), Submitted | Passed) =>
- let pendingUserIds = targetDetails |> TargetDetails.pendingUserIds
- pendingUserIds |> ListUtils.isNotEmpty
+ let pendingUserIds = targetDetails->TargetDetails.pendingUserIds
+ pendingUserIds->ListUtils.isNotEmpty
? renderPendingStudents(pendingUserIds, users)
: React.null
| (Some(_) | None, Locked(_) | Pending | Submitted | Passed | Failed) => React.null
@@ -396,7 +396,7 @@ let performQuickNavigation = (send, _event) => {
{
open // Scroll to the top of the overlay before pushing the new URL.
Webapi.Dom
- switch document |> Document.getElementById("target-overlay") {
+ switch document->Document.getElementById("target-overlay") {
| Some(element) => Webapi.Dom.Element.setScrollTop(element, 0.0)
| None => ()
}
@@ -420,7 +420,7 @@ let navigationLink = (direction, url, send) => {
onClick={performQuickNavigation(send)}
className="block p-2 md:p-4 text-center border rounded-lg bg-gray-100 hover:bg-gray-200">
{arrow(leftIcon)}
- {text |> str}
+ {text->str}
{arrow(rightIcon)}
}
@@ -428,13 +428,13 @@ let navigationLink = (direction, url, send) => {
let scrollOverlayToTop = _event => {
let element = {
open Webapi.Dom
- document |> Document.getElementById("target-overlay")
+ document->Document.getElementById("target-overlay")
}
element->Belt.Option.mapWithDefault((), element => element->Webapi.Dom.Element.setScrollTop(0.0))
}
let quickNavigationLinks = (targetDetails, send) => {
- let (previous, next) = targetDetails |> TargetDetails.navigation
+ let (previous, next) = targetDetails->TargetDetails.navigation
@@ -448,7 +448,7 @@ let quickNavigationLinks = (targetDetails, send) => {
@@ -462,7 +462,7 @@ let quickNavigationLinks = (targetDetails, send) => {
}
let updatePendingUserIdsWhenAddingSubmission = (send, target, addSubmissionCB, submission) => {
- send(AddSubmission(target |> Target.role))
+ send(AddSubmission(target->Target.role))
addSubmissionCB(submission)
}
@@ -481,7 +481,7 @@ let make = (
) => {
let (state, send) = React.useReducer(reducer, initialState)
- React.useEffect1(loadTargetDetails(target, send), [target |> Target.id])
+ React.useEffect1(loadTargetDetails(target, send), [target->Target.id])
React.useEffect(() => {
ScrollLock.activate()
diff --git a/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesCurriculum__Quiz.res b/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesCurriculum__Quiz.res
index a494678913..b1b012b2fe 100644
--- a/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesCurriculum__Quiz.res
+++ b/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesCurriculum__Quiz.res
@@ -19,16 +19,16 @@ module CreateQuizSubmissionQuery = %graphql(`
let createQuizSubmission = (target, selectedAnswersIds, setSaving, addSubmissionCB) => {
setSaving(_ => true)
CreateQuizSubmissionQuery.make(
- ~targetId=target |> Target.id,
- ~answerIds=selectedAnswersIds |> Array.of_list,
+ ~targetId=target->Target.id,
+ ~answerIds=selectedAnswersIds->Array.of_list,
(),
)
- |> GraphqlQuery.sendQuery
- |> Js.Promise.then_(response => {
+ ->GraphqlQuery.sendQuery
+ ->Js.Promise.then_(response => {
switch response["createQuizSubmission"]["submission"] {
| Some(submission) =>
let checklist =
- submission["checklist"] |> Json.Decode.array(SubmissionChecklistItem.decode([]))
+ submission["checklist"]->Json.Decode.array(SubmissionChecklistItem.decode([]))
addSubmissionCB(
Submission.make(
~id=submission["id"],
@@ -41,7 +41,7 @@ let createQuizSubmission = (target, selectedAnswersIds, setSaving, addSubmission
}
Js.Promise.resolve()
})
- |> ignore
+ ->ignore
}
let answerOptionClasses = (answerOption, selectedAnswer) => {
let defaultClasses = "quiz-root__answer bg-white flex items-center shadow border border-transparent rounded p-3 mt-3 cursor-pointer "
@@ -63,48 +63,48 @@ let iconClasses = (answerOption, selectedAnswer) => {
}
let handleSubmit = (answer, target, selectedAnswersIds, setSaving, addSubmissionCB, event) => {
- event |> ReactEvent.Mouse.preventDefault
- let answerIds = selectedAnswersIds |> List.append(list{answer |> QuizQuestion.answerId})
+ event->ReactEvent.Mouse.preventDefault
+ let answerIds = selectedAnswersIds->List.append(list{answer->QuizQuestion.answerId})
createQuizSubmission(target, answerIds, setSaving, addSubmissionCB)
}
@react.component
let make = (~target, ~targetDetails, ~addSubmissionCB, ~preview) => {
- let quizQuestions = targetDetails |> TargetDetails.quizQuestions
+ let quizQuestions = targetDetails->TargetDetails.quizQuestions
let (saving, setSaving) = React.useState(() => false)
- let (selectedQuestion, setSelectedQuestion) = React.useState(() => quizQuestions |> List.hd)
+ let (selectedQuestion, setSelectedQuestion) = React.useState(() => quizQuestions->List.hd)
let (selectedAnswer, setSelectedAnswer) = React.useState(() => None)
let (selectedAnswersIds, setSelectedAnswersIds) = React.useState(() => list{})
let currentQuestion = selectedQuestion
- {"Question #" |> str} {string_of_int((currentQuestion |> QuizQuestion.index) + 1) |> str}
+ {"Question #"->str} {string_of_int((currentQuestion->QuizQuestion.index) + 1)->str}
QuizQuestion.question}
+ markdown={currentQuestion->QuizQuestion.question}
className="font-semibold text-lg md:text-xl"
profile=Markdown.Permissive
/>
{currentQuestion
- |> QuizQuestion.answerOptions
- |> List.map(answerOption =>
+ ->QuizQuestion.answerOptions
+ ->List.map(answerOption =>
QuizQuestion.answerId}
+ key={answerOption->QuizQuestion.answerId}
onClick={_ => setSelectedAnswer(_ => Some(answerOption))}>
QuizQuestion.answerValue}
+ markdown={answerOption->QuizQuestion.answerValue}
className="overflow-auto ml-2 w-full"
profile=Markdown.Permissive
/>
)
- |> Array.of_list
- |> React.array}
+ ->Array.of_list
+ ->React.array}
{switch selectedAnswer {
@@ -112,7 +112,7 @@ let make = (~target, ~targetDetails, ~addSubmissionCB, ~preview) => {
| Some(answer) =>
- {currentQuestion |> QuizQuestion.isLastQuestion(quizQuestions)
+ {currentQuestion->QuizQuestion.isLastQuestion(quizQuestions)
?
: {
- let nextQuestion = currentQuestion |> QuizQuestion.nextQuestion(quizQuestions)
+ let nextQuestion = currentQuestion->QuizQuestion.nextQuestion(quizQuestions)
: React.null
@@ -117,38 +117,38 @@ let showMultiChoice = (choices, choice, id, updateResultCB) =>
{choices
- |> Array.mapi((index, label) => {
- let checked = choice |> OptionUtils.mapWithDefault(i => i == index, false)
+ ->Array.mapi((index, label) => {
+ let checked = choice->OptionUtils.mapWithDefault(i => i == index, false)
string_of_int}
- id={id ++ (index |> string_of_int)}
+ key={index->string_of_int}
+ id={id ++ (index->string_of_int)}
label
onChange={checkboxOnChange(choices, index, updateResultCB)}
checked
/>
})
- |> React.array}
+ ->React.array}
let attachFile = (updateResultCB, attachingCB, files, id, filename) => {
attachingCB(false)
- updateResultCB(ChecklistItem.Files(files |> Array.append([ChecklistItem.makeFile(id, filename)])))
+ updateResultCB(ChecklistItem.Files(files->Array.append([ChecklistItem.makeFile(id, filename)])))
}
let removeFile = (updateResultCB, files, id) =>
updateResultCB(
- ChecklistItem.Files(files |> Js.Array.filter(a => a |> ChecklistItem.fileId != id)),
+ ChecklistItem.Files(files->Js.Array.filter(a => a->ChecklistItem.fileId != id)),
)
let showFiles = (files, preview, id, attachingCB, updateResultCB) =>
{files
- |> Array.map(file =>
+ ->Array.map(file =>
ChecklistItem.fileId)}
- ariaLabel={"file-" ++ (file |> ChecklistItem.filename)}
+ key={"file-" ++ (file->ChecklistItem.fileId)}
+ ariaLabel={"file-" ++ (file->ChecklistItem.filename)}
target="_blank"
className="w-1/3 pr-2 pb-2">
- {file |> ChecklistItem.filename |> str}
+ {file->ChecklistItem.filename->str}
)
- |> React.array}
+ ->React.array}
- {files |> Array.length < 3
+ {files->Array.length < 3
?
@@ -186,7 +186,7 @@ let make = (~index, ~checklistItem, ~updateResultCB, ~attachingCB, ~preview) =>
{placeholder(id, checklistItem)}
- {switch checklistItem |> ChecklistItem.result {
+ {switch checklistItem->ChecklistItem.result {
| Files(files) => showFiles(files, preview, id, attachingCB, updateResultCB)
| Link(link) => showLink(link, id, updateResultCB)
| ShortText(shortText) => showShortText(shortText, id, updateResultCB)
diff --git a/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesCurriculum__SubmissionsAndFeedback.res b/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesCurriculum__SubmissionsAndFeedback.res
index edc02ca29c..297805316f 100644
--- a/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesCurriculum__SubmissionsAndFeedback.res
+++ b/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesCurriculum__SubmissionsAndFeedback.res
@@ -6,18 +6,18 @@ open CoursesCurriculum__Types
let gradeBar = (evaluationCriteria, grade) => {
let criterion =
- evaluationCriteria |> ListUtils.findOpt(c =>
- c |> EvaluationCriterion.id == (grade |> Grade.evaluationCriterionId)
+ evaluationCriteria->ListUtils.findOpt(c =>
+ c->EvaluationCriterion.id == (grade->Grade.evaluationCriterionId)
)
switch criterion {
| Some(criterion) =>
- let criterionId = criterion |> EvaluationCriterion.id
- let criterionName = criterion |> EvaluationCriterion.name
- let gradeNumber = grade |> Grade.grade
+ let criterionId = criterion->EvaluationCriterion.id
+ let criterionName = criterion->EvaluationCriterion.name
+ let gradeNumber = grade->Grade.grade
let grading = Grading.make(~criterionId, ~criterionName, ~grade=gradeNumber)
-
string_of_int} className="mb-4">
+
string_of_int} className="mb-4">
| None => React.null
@@ -41,7 +41,7 @@ let statusBar = (~color, ~text) => {
className={"font-semibold p-2 py-4 flex border-t w-full items-center justify-center " ++
(textColor ++
bgColor)}>
-
icon {text |> str}
+
icon {text->str}
}
@@ -58,13 +58,13 @@ let submissionStatusIcon = (~passed) => {
:
}
-
{text |> str}
+
{text->str}
}
let undoSubmissionCB = () => {
open Webapi.Dom
- location |> Location.reload
+ location->Location.reload
}
let gradingSection = (~grades, ~evaluationCriteria, ~gradeBar, ~passed) =>
@@ -77,20 +77,20 @@ let gradingSection = (~grades, ~evaluationCriteria, ~gradeBar, ~passed) =>
{submissionStatusIcon(~passed)}
-
{"Grading" |> str}
+
{"Grading"->str}
{grades
- |> Grade.sort(evaluationCriteria)
- |> List.map(grade => gradeBar(grade))
- |> Array.of_list
- |> React.array}
+ ->Grade.sort(evaluationCriteria)
+ ->List.map(grade => gradeBar(grade))
+ ->Array.of_list
+ ->React.array}
let handleAddAnotherSubmission = (setShowSubmissionForm, event) => {
- event |> ReactEvent.Mouse.preventDefault
+ event->ReactEvent.Mouse.preventDefault
setShowSubmissionForm(showSubmissionForm => !showSubmissionForm)
}
@@ -98,33 +98,33 @@ let submissions = (target, targetStatus, targetDetails, evaluationCriteria, coac
let curriedGradeBar = gradeBar(evaluationCriteria)
targetDetails
- |> TargetDetails.submissions
- |> List.sort((s1, s2) => {
- let s1CreatedAt = s1 |> Submission.createdAtDate
- let s2CreatedAt = s2 |> Submission.createdAtDate
+ ->TargetDetails.submissions
+ ->List.sort((s1, s2) => {
+ let s1CreatedAt = s1->Submission.createdAtDate
+ let s2CreatedAt = s2->Submission.createdAtDate
- s1CreatedAt |> DateFns.differenceInSeconds(s2CreatedAt) |> int_of_float
+ s1CreatedAt->DateFns.differenceInSeconds(s2CreatedAt)->int_of_float
})
- |> List.map(submission => {
- let grades = targetDetails |> TargetDetails.grades(submission |> Submission.id)
+ ->List.map(submission => {
+ let grades = targetDetails->TargetDetails.grades(submission->Submission.id)
Submission.id}
+ key={submission->Submission.id}
className="mt-4 pb-4 relative curriculum__submission-feedback-container"
- ariaLabel={"Details about your submission on " ++ (submission |> Submission.createdAtPretty)}>
+ ariaLabel={"Details about your submission on " ++ (submission->Submission.createdAtPretty)}>
- {"Submitted on " ++ (submission |> Submission.createdAtPretty) |> str}
+ {"Submitted on " ++ (submission->Submission.createdAtPretty)->str}
Submission.checklist}
+ checklist={submission->Submission.checklist}
updateChecklistCB=None
- pending={submission |> Submission.pending}
+ pending={submission->Submission.pending}
/>
- {switch submission |> Submission.status {
+ {switch submission->Submission.status {
| MarkedAsComplete => statusBar(~color="green", ~text="Marked as complete")
| Pending =>
- {"Review pending" |> str}
+ {"Review pending"->str}
- {switch targetStatus |> TargetStatus.status {
+ {switch targetStatus->TargetStatus.status {
| Submitted =>
-
Target.id} />
+ Target.id} />
| Pending
| Passed
@@ -153,25 +153,25 @@ let submissions = (target, targetStatus, targetDetails, evaluationCriteria, coac
gradingSection(~grades, ~evaluationCriteria, ~passed=false, ~gradeBar=curriedGradeBar)
}}
{targetDetails
- |> TargetDetails.feedback
- |> List.filter(feedback =>
- feedback |> Feedback.submissionId == (submission |> Submission.id)
+ ->TargetDetails.feedback
+ ->List.filter(feedback =>
+ feedback->Feedback.submissionId == (submission->Submission.id)
)
- |> List.map(feedback => {
+ ->List.map(feedback => {
let coach =
- coaches |> ListUtils.findOpt(c => c |> Coach.id == (feedback |> Feedback.coachId))
+ coaches->ListUtils.findOpt(c => c->Coach.id == (feedback->Feedback.coachId))
let user = switch coach {
| Some(coach) =>
- users |> ListUtils.findOpt(up => up |> User.id == (coach |> Coach.userId))
+ users->ListUtils.findOpt(up => up->User.id == (coach->Coach.userId))
| None => None
}
let (coachName, coachTitle, coachAvatar) = switch user {
| Some(user) =>
- let name = user |> User.name
- let avatar = user |> User.avatarUrl
- let title = user |> User.title
+ let name = user->User.name
+ let avatar = user->User.avatarUrl
+ let title = user->User.title
(name, title, 
)
| None => (
"Unknown Coach",
@@ -183,24 +183,24 @@ let submissions = (target, targetStatus, targetDetails, evaluationCriteria, coac
)
}
- Feedback.id}>
+
Feedback.id}>
coachAvatar
-
{"Feedback from:" |> str}
+
{"Feedback from:"->str}
- {coachName |> str}
+ {coachName->str}
{switch coachTitle {
| Some(title) =>
- {"(" ++ (title ++ ")") |> str}
+ {"(" ++ (title ++ ")")->str}
| None => React.null
}}
@@ -210,17 +210,17 @@ let submissions = (target, targetStatus, targetDetails, evaluationCriteria, coac
Feedback.feedback}
+ markdown={feedback->Feedback.feedback}
/>
})
- |> Array.of_list
- |> React.array}
+ ->Array.of_list
+ ->React.array}
})
- |> Array.of_list
- |> React.array
+ ->Array.of_list
+ ->React.array
}
let addSubmission = (setShowSubmissionForm, addSubmissionCB, submission) => {
@@ -244,22 +244,22 @@ let make = (
-
{"Your Submissions" |> str}
- {targetStatus |> TargetStatus.canSubmit(~resubmittable=target |> Target.resubmittable)
+
{"Your Submissions"->str}
+ {targetStatus->TargetStatus.canSubmit(~resubmittable=target->Target.resubmittable)
? showSubmissionForm
?
:
: React.null}
diff --git a/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesCurriculum__Target.res b/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesCurriculum__Target.res
index 98ea4e6adb..56c437e3bf 100644
--- a/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesCurriculum__Target.res
+++ b/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesCurriculum__Target.res
@@ -18,18 +18,18 @@ type t = {
let decode = json => {
open Json.Decode
{
- id: json |> field("id", string),
- role: switch json |> field("role", string) {
+ id: json->field("id", string),
+ role: switch json->field("role", string) {
| "student" => Student
| "team" => Team
| unknownRole => raise(CannotParseUnknownRole(unknownRole))
},
- title: json |> field("title", string),
- targetGroupId: json |> field("targetGroupId", string),
- sortIndex: json |> field("sortIndex", int),
- resubmittable: json |> field("resubmittable", bool),
- prerequisiteTargetIds: json |> field("prerequisiteTargetIds", list(string)),
- reviewed: json |> field("reviewed", bool),
+ title: json->field("title", string),
+ targetGroupId: json->field("targetGroupId", string),
+ sortIndex: json->field("sortIndex", int),
+ resubmittable: json->field("resubmittable", bool),
+ prerequisiteTargetIds: json->field("prerequisiteTargetIds", list(string)),
+ reviewed: json->field("reviewed", bool),
}
}
diff --git a/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesCurriculum__TargetDetails.res b/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesCurriculum__TargetDetails.res
index 030354fc6f..0a7f711619 100644
--- a/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesCurriculum__TargetDetails.res
+++ b/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesCurriculum__TargetDetails.res
@@ -34,34 +34,34 @@ type completionType =
let decodeNavigation = json => {
open Json.Decode
{
- previous: json |> optional(field("previous", string)),
- next: json |> optional(field("next", string)),
+ previous: json->optional(field("previous", string)),
+ next: json->optional(field("next", string)),
}
}
let decode = json => {
open Json.Decode
{
- pendingUserIds: json |> field("pendingUserIds", list(string)),
- submissions: json |> field("submissions", list(CoursesCurriculum__Submission.decode)),
- feedback: json |> field("feedback", list(CoursesCurriculum__Feedback.decode)),
- quizQuestions: json |> field("quizQuestions", list(CoursesCurriculum__QuizQuestion.decode)),
- contentBlocks: json |> field("contentBlocks", list(ContentBlock.decode)),
- communities: json |> field("communities", list(CoursesCurriculum__Community.decode)),
- linkToComplete: json |> field("linkToComplete", nullable(string)) |> Js.Null.toOption,
- evaluated: json |> field("evaluated", bool),
- grading: json |> field("grading", list(CoursesCurriculum__Grade.decode)),
+ pendingUserIds: json->field("pendingUserIds", list(string)),
+ submissions: json->field("submissions", list(CoursesCurriculum__Submission.decode)),
+ feedback: json->field("feedback", list(CoursesCurriculum__Feedback.decode)),
+ quizQuestions: json->field("quizQuestions", list(CoursesCurriculum__QuizQuestion.decode)),
+ contentBlocks: json->field("contentBlocks", list(ContentBlock.decode)),
+ communities: json->field("communities", list(CoursesCurriculum__Community.decode)),
+ linkToComplete: json->field("linkToComplete", nullable(string))->Js.Null.toOption,
+ evaluated: json->field("evaluated", bool),
+ grading: json->field("grading", list(CoursesCurriculum__Grade.decode)),
completionInstructions: json
- |> field("completionInstructions", nullable(string))
- |> Js.Null.toOption,
- navigation: json |> field("navigation", decodeNavigation),
- checklist: json |> field("checklist", array(TargetChecklistItem.decode)),
+ ->field("completionInstructions", nullable(string))
+ ->Js.Null.toOption,
+ navigation: json->field("navigation", decodeNavigation),
+ checklist: json->field("checklist", array(TargetChecklistItem.decode)),
}
}
let computeCompletionType = targetDetails => {
let evaluated = targetDetails.evaluated
- let hasQuiz = targetDetails.quizQuestions |> ListUtils.isNotEmpty
+ let hasQuiz = targetDetails.quizQuestions->ListUtils.isNotEmpty
let hasLinkToComplete = switch targetDetails.linkToComplete {
| Some(_) => true
| None => false
@@ -82,11 +82,11 @@ let linkToComplete = t => t.linkToComplete
let completionInstructions = t => t.completionInstructions
let grades = (submissionId, t) =>
- t.grading |> List.filter(grade => grade |> CoursesCurriculum__Grade.submissionId == submissionId)
+ t.grading->List.filter(grade => grade->CoursesCurriculum__Grade.submissionId == submissionId)
let addSubmission = (submission, t) => {
...t,
- submissions: list{submission, ...t |> submissions},
+ submissions: list{submission, ...t->submissions},
}
let clearPendingUserIds = t => {...t, pendingUserIds: list{}}
diff --git a/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesCurriculum__TargetGroup.res b/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesCurriculum__TargetGroup.res
index 929aea5957..e28b57bdd4 100644
--- a/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesCurriculum__TargetGroup.res
+++ b/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesCurriculum__TargetGroup.res
@@ -10,16 +10,16 @@ type t = {
let decode = json => {
open Json.Decode
{
- id: json |> field("id", string),
- levelId: json |> field("levelId", string),
- name: json |> field("name", string),
- description: json |> field("description", string),
- sortIndex: json |> field("sortIndex", int),
- milestone: json |> field("milestone", bool),
+ id: json->field("id", string),
+ levelId: json->field("levelId", string),
+ name: json->field("name", string),
+ description: json->field("description", string),
+ sortIndex: json->field("sortIndex", int),
+ milestone: json->field("milestone", bool),
}
}
-let sort = targetGroups => targetGroups |> List.sort((x, y) => x.sortIndex - y.sortIndex)
+let sort = targetGroups => targetGroups->List.sort((x, y) => x.sortIndex - y.sortIndex)
let id = t => t.id
let name = t => t.name
diff --git a/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesCurriculum__TargetStatus.res b/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesCurriculum__TargetStatus.res
index 898f6df079..6ea7abc19e 100644
--- a/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesCurriculum__TargetStatus.res
+++ b/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesCurriculum__TargetStatus.res
@@ -50,18 +50,18 @@ type cachedTarget = {
let isPast = dateString =>
switch dateString {
- | Some(date) => date |> DateFns.parseString |> DateFns.isBefore(Js.Date.make())
+ | Some(date) => date->DateFns.parseString->DateFns.isBefore(Js.Date.make())
| None => false
}
-let makePending = targets => targets |> List.map(t => {targetId: t |> Target.id, status: Pending})
+let makePending = targets => targets->List.map(t => {targetId: t->Target.id, status: Pending})
let lockTargets = (targets, reason) =>
- targets |> List.map(t => {targetId: t |> Target.id, status: Locked(reason)})
+ targets->List.map(t => {targetId: t->Target.id, status: Locked(reason)})
let allTargetsComplete = (targetCache, targetIds) =>
- targetIds |> List.for_all(targetId => {
- let cachedTarget = targetCache |> List.find(ct => ct.targetId == targetId)
+ targetIds->List.for_all(targetId => {
+ let cachedTarget = targetCache->List.find(ct => ct.targetId == targetId)
cachedTarget.submissionStatus == SubmissionPassed
})
@@ -69,37 +69,37 @@ let compute = (preview, team, course, levels, targetGroups, targets, submissions
/* Eliminate the two course ended and student access ended conditions. */
if preview {
makePending(targets)
- } else if course |> Course.endsAt |> isPast {
+ } else if course->Course.endsAt->isPast {
lockTargets(targets, CourseLocked)
- } else if team |> Team.accessEndsAt |> isPast {
+ } else if team->Team.accessEndsAt->isPast {
lockTargets(targets, AccessLocked)
} else {
/* Cache level number of the student. */
let studentLevelNumber =
- levels |> List.find(l => l |> Level.id == (team |> Team.levelId)) |> Level.number
+ levels->List.find(l => l->Level.id == (team->Team.levelId))->Level.number
/* Cache level number, milestone boolean, and submission status for all targets. */
- let targetsCache = targets |> List.map(target => {
- let targetId = target |> Target.id
+ let targetsCache = targets->List.map(target => {
+ let targetId = target->Target.id
let targetGroup =
- targetGroups |> List.find(tg => tg |> TargetGroup.id == (target |> Target.targetGroupId))
+ targetGroups->List.find(tg => tg->TargetGroup.id == (target->Target.targetGroupId))
- let milestone = targetGroup |> TargetGroup.milestone
+ let milestone = targetGroup->TargetGroup.milestone
let levelNumber =
levels
- |> List.find(l => l |> Level.id == (targetGroup |> TargetGroup.levelId))
- |> Level.number
+ ->List.find(l => l->Level.id == (targetGroup->TargetGroup.levelId))
+ ->Level.number
let submission =
- submissions |> ListUtils.findOpt(s => s |> LatestSubmission.targetId == targetId)
+ submissions->ListUtils.findOpt(s => s->LatestSubmission.targetId == targetId)
let submissionStatus = switch submission {
| Some(s) =>
- if s |> LatestSubmission.hasPassed {
+ if s->LatestSubmission.hasPassed {
SubmissionPassed
- } else if s |> LatestSubmission.hasBeenEvaluated {
+ } else if s->LatestSubmission.hasBeenEvaluated {
SubmissionFailed
} else {
SubmissionPendingReview
@@ -109,16 +109,16 @@ let compute = (preview, team, course, levels, targetGroups, targets, submissions
{
targetId: targetId,
- targetReviewed: target |> Target.reviewed,
+ targetReviewed: target->Target.reviewed,
levelNumber: levelNumber,
milestone: milestone,
submissionStatus: submissionStatus,
- prerequisiteTargetIds: target |> Target.prerequisiteTargetIds,
+ prerequisiteTargetIds: target->Target.prerequisiteTargetIds,
}
})
/* Scan the targets cache again to form final list of target statuses. */
- targetsCache |> List.map(ct => {
+ targetsCache->List.map(ct => {
let status = switch ct.submissionStatus {
| SubmissionPendingReview => Submitted
| SubmissionPassed => Passed
@@ -126,7 +126,7 @@ let compute = (preview, team, course, levels, targetGroups, targets, submissions
| SubmissionMissing =>
if ct.levelNumber > studentLevelNumber && ct.targetReviewed {
Locked(LevelLocked)
- } else if !(ct.prerequisiteTargetIds |> allTargetsComplete(targetsCache)) {
+ } else if !(ct.prerequisiteTargetIds->allTargetsComplete(targetsCache)) {
Locked(PrerequisitesIncomplete)
} else {
Pending
@@ -171,7 +171,7 @@ let currentLevelStatuses = list{Submitted, Passed}
let lastLevelStatuses = list{Passed}
let matchesStatuses = (statuses, ts) => {
- let matchedTargetStatuses = ts |> List.filter(t => t.status->List.mem(statuses))
+ let matchedTargetStatuses = ts->List.filter(t => t.status->List.mem(statuses))
ts == matchedTargetStatuses
}
diff --git a/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesCurriculum__Team.res b/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesCurriculum__Team.res
index 961537cac6..0d0b117d01 100644
--- a/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesCurriculum__Team.res
+++ b/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesCurriculum__Team.res
@@ -8,9 +8,9 @@ type t = {
let decode = json => {
open Json.Decode
{
- name: json |> field("name", string),
- levelId: json |> field("levelId", string),
- accessEndsAt: json |> field("accessEndsAt", nullable(string)) |> Js.Null.toOption,
+ name: json->field("name", string),
+ levelId: json->field("levelId", string),
+ accessEndsAt: json->field("accessEndsAt", nullable(string))->Js.Null.toOption,
}
}
@@ -19,6 +19,6 @@ let accessEndsAt = t => t.accessEndsAt
let accessEnded = t =>
switch t.accessEndsAt {
- | Some(date) => date |> DateFns.parseString |> DateFns.isPast
+ | Some(date) => date->DateFns.parseString->DateFns.isPast
| None => false
}
diff --git a/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesCurriculum__UndoButton.res b/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesCurriculum__UndoButton.res
index 174496805a..44f554535d 100644
--- a/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesCurriculum__UndoButton.res
+++ b/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesCurriculum__UndoButton.res
@@ -14,17 +14,17 @@ type status =
| Errored
let handleClick = (targetId, setStatus, undoSubmissionCB, event) => {
- event |> ReactEvent.Mouse.preventDefault
+ event->ReactEvent.Mouse.preventDefault
if {
open Webapi.Dom
- window |> Window.confirm("Are you sure you want to delete this submission?")
+ window->Window.confirm("Are you sure you want to delete this submission?")
} {
setStatus(_ => Undoing)
DeleteSubmissionQuery.make(~targetId, ())
- |> GraphqlQuery.sendQuery
- |> Js.Promise.then_(response => {
+ ->GraphqlQuery.sendQuery
+ ->Js.Promise.then_(response => {
if response["undoSubmission"]["success"] {
undoSubmissionCB()
} else {
@@ -36,7 +36,7 @@ let handleClick = (targetId, setStatus, undoSubmissionCB, event) => {
}
Js.Promise.resolve()
})
- |> Js.Promise.catch(_ => {
+ ->Js.Promise.catch(_ => {
Notification.error(
"Unexpected Error",
"An unexpected error occured, and our team has been notified about this. Please reload the page before trying again.",
@@ -44,7 +44,7 @@ let handleClick = (targetId, setStatus, undoSubmissionCB, event) => {
setStatus(_ => Errored)
Js.Promise.resolve()
})
- |> ignore
+ ->ignore
} else {
()
}
@@ -52,15 +52,15 @@ let handleClick = (targetId, setStatus, undoSubmissionCB, event) => {
let buttonContents = status =>
switch status {
- | Undoing =>
{"Undoing..." |> str}
+ | Undoing =>
{"Undoing..."->str}
| Pending =>
- {"Undo submission" |> str}
- {"Undo" |> str}
+ {"Undo submission"->str}
+ {"Undo"->str}
| Errored =>
-
{"Error!" |> str}
+
{"Error!"->str}
}
let isDisabled = status =>
@@ -86,7 +86,7 @@ let make = (~undoSubmissionCB, ~targetId) => {
let (status, setStatus) = React.useState(() => Pending)
{state.errors
- |> List.map(error =>
+ ->List.map(error =>
- {error |> str}
+ {error->str}
)
- |> Array.of_list
- |> React.array}
+ ->Array.of_list
+ ->React.array}
}
diff --git a/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesCurriculum__User.res b/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesCurriculum__User.res
index 12df38f27b..d5dd8405b6 100644
--- a/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesCurriculum__User.res
+++ b/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesCurriculum__User.res
@@ -13,9 +13,9 @@ let title = t => t.title
let decode = json => {
open Json.Decode
{
- id: json |> field("id", string),
- name: json |> field("name", string),
- avatarUrl: json |> field("avatarUrl", string),
- title: json |> field("title", nullable(string)) |> Js.Null.toOption,
+ id: json->field("id", string),
+ name: json->field("name", string),
+ avatarUrl: json->field("avatarUrl", string),
+ title: json->field("title", nullable(string))->Js.Null.toOption,
}
}
diff --git a/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesReview__Checklist.res b/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesReview__Checklist.res
index c842587e46..befea45e55 100644
--- a/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesReview__Checklist.res
+++ b/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesReview__Checklist.res
@@ -26,10 +26,10 @@ let handleEmpty = setState =>
- {"Create a review checklist" |> str}
+ {"Create a review checklist"->str}
- {"Prepare for your review by creating a checklist" |> str}
+ {"Prepare for your review by creating a checklist"->str}
@@ -49,7 +49,7 @@ let make = (
-
{"Review Checklist" |> str}
+
{"Review Checklist"->str}
@@ -62,7 +62,7 @@ let make = (
targetId
/>
| Show =>
- reviewChecklist |> ArrayUtils.isEmpty
+ reviewChecklist->ArrayUtils.isEmpty
? handleEmpty(setState)
:
{
setState(state => {...state, saving: true})
- let trimmedChecklist = reviewChecklist |> Array.map(ReviewChecklistItem.trim)
+ let trimmedChecklist = reviewChecklist->Array.map(ReviewChecklistItem.trim)
UpdateReviewChecklistMutation.make(
~targetId,
~reviewChecklist=ReviewChecklistItem.encodeArray(trimmedChecklist),
(),
)
- |> GraphqlQuery.sendQuery
- |> Js.Promise.then_(response => {
+ ->GraphqlQuery.sendQuery
+ ->Js.Promise.then_(response => {
if response["updateReviewChecklist"]["success"] {
updateReviewChecklistCB(trimmedChecklist)
}
@@ -36,13 +36,13 @@ let updateReviewChecklist = (targetId, reviewChecklist, setState, updateReviewCh
setState(state => {...state, saving: false})
Js.Promise.resolve()
})
- |> ignore
+ ->ignore
}
let updateChecklistItem = (checklistItem, itemIndex, setState) =>
setState(state => {
...state,
- reviewChecklist: state.reviewChecklist |> ReviewChecklistItem.replace(checklistItem, itemIndex),
+ reviewChecklist: state.reviewChecklist->ReviewChecklistItem.replace(checklistItem, itemIndex),
})
let updateChecklistItemTitle = (itemIndex, title, checklistItem, setState) =>
@@ -57,10 +57,10 @@ let updateChecklistResultTitle = (
setState,
) => {
let newReviewChecklistItem =
- reviewChecklistItem |> ReviewChecklistItem.updateChecklist(
+ reviewChecklistItem->ReviewChecklistItem.updateChecklist(
reviewChecklistItem
- |> ReviewChecklistItem.result
- |> ReviewChecklistResult.updateTitle(title, resultItem, resultIndex),
+ ->ReviewChecklistItem.result
+ ->ReviewChecklistResult.updateTitle(title, resultItem, resultIndex),
)
updateChecklistItem(newReviewChecklistItem, itemIndex, setState)
}
@@ -74,17 +74,17 @@ let updateChecklistResultFeedback = (
setState,
) => {
let newReviewChecklistItem =
- reviewChecklistItem |> ReviewChecklistItem.updateChecklist(
+ reviewChecklistItem->ReviewChecklistItem.updateChecklist(
reviewChecklistItem
- |> ReviewChecklistItem.result
- |> ReviewChecklistResult.updateFeedback(feedback, resultItem, resultIndex),
+ ->ReviewChecklistItem.result
+ ->ReviewChecklistResult.updateFeedback(feedback, resultItem, resultIndex),
)
updateChecklistItem(newReviewChecklistItem, itemIndex, setState)
}
let addEmptyResultItem = (reviewChecklistItem, itemIndex, setState) =>
updateChecklistItem(
- reviewChecklistItem |> ReviewChecklistItem.appendEmptyChecklistItem,
+ reviewChecklistItem->ReviewChecklistItem.appendEmptyChecklistItem,
itemIndex,
setState,
)
@@ -92,12 +92,12 @@ let addEmptyResultItem = (reviewChecklistItem, itemIndex, setState) =>
let addEmptyChecklistItem = setState =>
setState(state => {
...state,
- reviewChecklist: ReviewChecklistItem.empty() |> Array.append(state.reviewChecklist),
+ reviewChecklist: ReviewChecklistItem.empty()->Array.append(state.reviewChecklist),
})
let removeChecklistResult = (itemIndex, resultIndex, reviewChecklistItem, setState) =>
updateChecklistItem(
- reviewChecklistItem |> ReviewChecklistItem.deleteResultItem(resultIndex),
+ reviewChecklistItem->ReviewChecklistItem.deleteResultItem(resultIndex),
itemIndex,
setState,
)
@@ -105,41 +105,41 @@ let removeChecklistResult = (itemIndex, resultIndex, reviewChecklistItem, setSta
let removeChecklistItem = (itemIndex, setState) =>
setState(state => {
...state,
- reviewChecklist: state.reviewChecklist |> Js.Array.filteri((_el, i) => i != itemIndex),
+ reviewChecklist: state.reviewChecklist->Js.Array.filteri((_el, i) => i != itemIndex),
})
let initialStateForReviewChecklist = reviewChecklist =>
- reviewChecklist |> ArrayUtils.isEmpty ? ReviewChecklistItem.emptyTemplate() : reviewChecklist
+ reviewChecklist->ArrayUtils.isEmpty ? ReviewChecklistItem.emptyTemplate() : reviewChecklist
-let invalidTitle = title => title |> String.trim == ""
+let invalidTitle = title => title->String.trim == ""
let invalidChecklist = reviewChecklist =>
reviewChecklist
- |> Array.map(reviewChecklistItem =>
- reviewChecklistItem |> ReviewChecklistItem.title |> invalidTitle ||
+ ->Array.map(reviewChecklistItem =>
+ reviewChecklistItem->ReviewChecklistItem.title->invalidTitle ||
reviewChecklistItem
- |> ReviewChecklistItem.result
- |> Js.Array.filter(resultItem => resultItem |> ReviewChecklistResult.title |> invalidTitle)
- |> ArrayUtils.isNotEmpty
+ ->ReviewChecklistItem.result
+ ->Js.Array.filter(resultItem => resultItem->ReviewChecklistResult.title->invalidTitle)
+ ->ArrayUtils.isNotEmpty
)
- |> Js.Array.filter(valid => valid)
- |> ArrayUtils.isNotEmpty
+ ->Js.Array.filter(valid => valid)
+ ->ArrayUtils.isNotEmpty
@react.component
let make = (~reviewChecklist, ~updateReviewChecklistCB, ~closeEditModeCB, ~targetId) => {
let (state, setState) = React.useState(() => {
- reviewChecklist: reviewChecklist |> initialStateForReviewChecklist,
+ reviewChecklist: reviewChecklist->initialStateForReviewChecklist,
saving: false,
})
{state.reviewChecklist
- |> Array.mapi((itemIndex, reviewChecklistItem) =>
+ ->Array.mapi((itemIndex, reviewChecklistItem) =>
string_of_int}
- ariaLabel={"checklist-item-" ++ (itemIndex |> string_of_int)}>
+ key={itemIndex->string_of_int}
+ ariaLabel={"checklist-item-" ++ (itemIndex->string_of_int)}>
ReviewChecklistItem.title}
+ value={reviewChecklistItem->ReviewChecklistItem.title}
onChange={event =>
updateChecklistItemTitle(
itemIndex,
@@ -158,7 +158,7 @@ let make = (~reviewChecklist, ~updateReviewChecklistCB, ~closeEditModeCB, ~targe
/>
ReviewChecklistItem.title |> invalidTitle}
+ active={reviewChecklistItem->ReviewChecklistItem.title->invalidTitle}
/>
@@ -281,10 +281,10 @@ let make = (~reviewChecklist, ~updateReviewChecklistCB, ~closeEditModeCB, ~targe
updateReviewChecklistCB,
)}
className="btn btn-success w-1/2 md:w-auto">
- {"Save Checklist" |> str}
+ {"Save Checklist"->str}
diff --git a/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesReview__ChecklistShow.res b/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesReview__ChecklistShow.res
index 749a0fba04..9ddde9956a 100644
--- a/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesReview__ChecklistShow.res
+++ b/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesReview__ChecklistShow.res
@@ -11,12 +11,12 @@ let str = React.string
let selectChecklist = (itemIndex, resultIndex, setSelecton) =>
setSelecton(selection =>
- selection |> List.append(list{{itemIndex: itemIndex, resultIndex: resultIndex}})
+ selection->List.append(list{{itemIndex: itemIndex, resultIndex: resultIndex}})
)
let unSelectChecklist = (itemIndex, resultIndex, setSelecton) =>
setSelecton(selection =>
- selection |> List.filter(item =>
+ selection->List.filter(item =>
!(item.itemIndex == itemIndex && item.resultIndex == resultIndex)
)
)
@@ -31,42 +31,42 @@ let generateFeedback = (reviewChecklist, selection, feedback, updateFeedbackCB)
feedback ++
("\n\n" ++
(reviewChecklist
- |> Array.mapi((i, reviewChecklistItem) => {
+ ->Array.mapi((i, reviewChecklistItem) => {
let resultIndexList =
selection
- |> List.filter(selectionItem => selectionItem.itemIndex == i)
- |> List.map(item => item.resultIndex)
+ ->List.filter(selectionItem => selectionItem.itemIndex == i)
+ ->List.map(item => item.resultIndex)
reviewChecklistItem
- |> ReviewChecklistItem.result
- |> Array.mapi((index, resultItem) =>
- resultIndexList |> List.mem(index)
- ? switch resultItem |> ReviewChecklistResult.feedback {
+ ->ReviewChecklistItem.result
+ ->Array.mapi((index, resultItem) =>
+ resultIndexList->List.mem(index)
+ ? switch resultItem->ReviewChecklistResult.feedback {
| Some(feedback) => list{feedback}
| None => list{}
}
: list{}
)
- |> Array.to_list
- |> List.flatten
+ ->Array.to_list
+ ->List.flatten
})
- |> Array.to_list
- |> List.flatten
- |> Array.of_list
- |> Js.Array.joinWith("\n\n")))
+ ->Array.to_list
+ ->List.flatten
+ ->Array.of_list
+ ->Js.Array.joinWith("\n\n")))
updateFeedbackCB(newFeedback)
}
let checklistItemCheckedClasses = (itemIndex, selection) =>
"mb-4 px-2 pb-2 md:px-4 border-l-2 border-transparent " ++ (
- selection |> List.filter(s => s.itemIndex == itemIndex) |> ListUtils.isNotEmpty
+ selection->List.filter(s => s.itemIndex == itemIndex)->ListUtils.isNotEmpty
? "border-green-400"
: ""
)
let checklistItemChecked = (itemIndex, resultIndex, selection) =>
selection
- |> List.filter(s => s.itemIndex == itemIndex && s.resultIndex == resultIndex)
- |> ListUtils.isNotEmpty
+ ->List.filter(s => s.itemIndex == itemIndex && s.resultIndex == resultIndex)
+ ->ListUtils.isNotEmpty
@react.component
let make = (~reviewChecklist, ~feedback, ~updateFeedbackCB, ~showEditorCB) => {
@@ -78,50 +78,50 @@ let make = (~reviewChecklist, ~feedback, ~updateFeedbackCB, ~showEditorCB) => {
{reviewChecklist
- |> Array.mapi((itemIndex, reviewChecklistItem) =>
+ ->Array.mapi((itemIndex, reviewChecklistItem) =>
string_of_int}
- ariaLabel={"checklist-item-" ++ (itemIndex |> string_of_int)}>
+ key={itemIndex->string_of_int}
+ ariaLabel={"checklist-item-" ++ (itemIndex->string_of_int)}>
- {reviewChecklistItem |> ReviewChecklistItem.title |> str}
+ {reviewChecklistItem->ReviewChecklistItem.title->str}
{reviewChecklistItem
- |> ReviewChecklistItem.result
- |> Array.mapi((resultIndex, checklistItem) =>
+ ->ReviewChecklistItem.result
+ ->Array.mapi((resultIndex, checklistItem) =>
string_of_int)}
- key={(itemIndex |> string_of_int) ++ (resultIndex |> string_of_int)}>
+ ariaLabel={"result-item-" ++ (resultIndex->string_of_int)}
+ key={(itemIndex->string_of_int) ++ (resultIndex->string_of_int)}>
string_of_int) ++ (resultIndex |> string_of_int))}
- label={checklistItem |> ReviewChecklistResult.title}
+ id={id ++ ((itemIndex->string_of_int) ++ (resultIndex->string_of_int))}
+ label={checklistItem->ReviewChecklistResult.title}
onChange={checkboxOnChange(itemIndex, resultIndex, setSelecton)}
checked={checklistItemChecked(itemIndex, resultIndex, selection)}
/>
ReviewChecklistResult.feedback}
+ feedback={checklistItem->ReviewChecklistResult.feedback}
/>
)
- |> React.array}
+ ->React.array}
: React.null}
diff --git a/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesReview__Feedback.res b/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesReview__Feedback.res
index 49cdce1fab..b2ced1070a 100644
--- a/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesReview__Feedback.res
+++ b/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesReview__Feedback.res
@@ -9,7 +9,7 @@ let value = t => t.value
let coachName = t => t.coachName
let coachAvatarUrl = t => t.coachAvatarUrl
let coachTitle = t => t.coachTitle
-let createdAtPretty = t => t.createdAt |> DateFns.format("MMMM D, YYYY")
+let createdAtPretty = t => t.createdAt->DateFns.format("MMMM D, YYYY")
let make = (~coachName, ~coachAvatarUrl, ~coachTitle, ~createdAt, ~value) => {
coachName: coachName,
diff --git a/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesReview__FeedbackEditor.res b/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesReview__FeedbackEditor.res
index c8d671fb53..8713d5eecb 100644
--- a/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesReview__FeedbackEditor.res
+++ b/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesReview__FeedbackEditor.res
@@ -11,7 +11,7 @@ let make = (
~targetId,
) => {
let (checklistVisible, setChecklistVisible) = React.useState(() => checklistVisible)
- let reviewChecklistIsNotEmpty = reviewChecklist |> ArrayUtils.isNotEmpty
+ let reviewChecklistIsNotEmpty = reviewChecklist->ArrayUtils.isNotEmpty
{switch (checklistVisible, reviewChecklistIsNotEmpty) {
@@ -30,7 +30,7 @@ let make = (
className="inline-flex w-10 h-10 border border-white items-center justify-center rounded-full bg-primary-100 text-primary-500">
- {"Show Review Checklist" |> str}
+ {"Show Review Checklist"->str}
}}
@@ -40,7 +40,7 @@ let make = (
-
{label |> str}
+
{label->str}
{
}
let sort = (criteria, grades) =>
- grades |> ArrayUtils.copyAndSort((g1, g2) => {
+ grades->ArrayUtils.copyAndSort((g1, g2) => {
let ec1 =
- criteria |> ArrayUtils.unsafeFind(
+ criteria->ArrayUtils.unsafeFind(
ec => EvaluationCriterion.id(ec) == g1.evaluationCriterionId,
"Unable to find evaluation criterion with ID: " ++
(g1.evaluationCriterionId ++
" in CoursesReview__Grade"),
)
let ec2 =
- criteria |> ArrayUtils.unsafeFind(
+ criteria->ArrayUtils.unsafeFind(
ec => EvaluationCriterion.id(ec) == g2.evaluationCriterionId,
"Unable to find evaluation criterion with ID: " ++
(g2.evaluationCriterionId ++
" in CoursesReview__Grade"),
)
- String.compare(ec1 |> EvaluationCriterion.name, ec2 |> EvaluationCriterion.name)
+ String.compare(ec1->EvaluationCriterion.name, ec2->EvaluationCriterion.name)
})
let evaluationCriterionId = t => t.evaluationCriterionId
diff --git a/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesReview__GradeCard.res b/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesReview__GradeCard.res
index 9c5f7a9ce6..e11f4cc45f 100644
--- a/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesReview__GradeCard.res
+++ b/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesReview__GradeCard.res
@@ -36,19 +36,19 @@ let reducer = (state, action) =>
let passed = (grades, evaluationCriteria) =>
grades
- |> Js.Array.filter(g => {
+ ->Js.Array.filter(g => {
let passGrade =
evaluationCriteria
- |> ArrayUtils.unsafeFind(
- ec => EvaluationCriterion.id(ec) == (g |> Grade.evaluationCriterionId),
+ ->ArrayUtils.unsafeFind(
+ ec => EvaluationCriterion.id(ec) == (g->Grade.evaluationCriterionId),
"CoursesReview__GradeCard: Unable to find evaluation criterion with id - " ++
- (g |> Grade.evaluationCriterionId),
+ (g->Grade.evaluationCriterionId),
)
- |> EvaluationCriterion.passGrade
+ ->EvaluationCriterion.passGrade
- g |> Grade.value < passGrade
+ g->Grade.value < passGrade
})
- |> ArrayUtils.isEmpty
+ ->ArrayUtils.isEmpty
module CreateGradingMutation = %graphql(`
mutation CreateGradingMutation($submissionId: ID!, $feedback: String, $grades: [GradeInput!]!, $note: String, $checklist: JSON!) {
@@ -70,28 +70,28 @@ let undoGrading = (submissionId, send) => {
send(BeginSaving)
UndoGradingMutation.make(~submissionId, ())
- |> GraphqlQuery.sendQuery
- |> Js.Promise.then_(response => {
- response["undoGrading"]["success"] ? DomUtils.reload() |> ignore : send(FinishSaving)
+ ->GraphqlQuery.sendQuery
+ ->Js.Promise.then_(response => {
+ response["undoGrading"]["success"] ? DomUtils.reload()->ignore : send(FinishSaving)
Js.Promise.resolve()
})
- |> ignore
+ ->ignore
}
let trimToOption = s =>
- switch s |> String.trim {
+ switch s->String.trim {
| "" => None
| s => Some(s)
}
let gradeSubmissionQuery = (submissionId, state, send, evaluationCriteria, addGradingCB) => {
- let jsGradesArray = state.grades |> Array.map(g => g |> Grade.asJsType)
+ let jsGradesArray = state.grades->Array.map(g => g->Grade.asJsType)
- let checklist = state.checklist |> SubmissionChecklistItem.encodeArray
+ let checklist = state.checklist->SubmissionChecklistItem.encodeArray
send(BeginSaving)
- let feedback = state.newFeedback |> trimToOption
- let note = state.note |> OptionUtils.flatMap(trimToOption)
+ let feedback = state.newFeedback->trimToOption
+ let note = state.note->OptionUtils.flatMap(trimToOption)
CreateGradingMutation.make(
~submissionId,
@@ -101,8 +101,8 @@ let gradeSubmissionQuery = (submissionId, state, send, evaluationCriteria, addGr
~checklist,
(),
)
- |> GraphqlQuery.sendQuery
- |> Js.Promise.then_(response => {
+ ->GraphqlQuery.sendQuery
+ ->Js.Promise.then_(response => {
response["createGrading"]["success"]
? addGradingCB(
~newFeedback=state.newFeedback,
@@ -114,22 +114,22 @@ let gradeSubmissionQuery = (submissionId, state, send, evaluationCriteria, addGr
send(FinishSaving)
Js.Promise.resolve()
})
- |> ignore
+ ->ignore
}
let updateGrading = (grade, state, send) => {
let newGrades =
state.grades
- |> Js.Array.filter(g =>
- g |> Grade.evaluationCriterionId != (grade |> Grade.evaluationCriterionId)
+ ->Js.Array.filter(g =>
+ g->Grade.evaluationCriterionId != (grade->Grade.evaluationCriterionId)
)
- |> Array.append([grade])
+ ->Array.append([grade])
send(UpdateGrades(newGrades))
}
let handleGradePillClick = (evaluationCriterionId, value, state, send, event) => {
- event |> ReactEvent.Mouse.preventDefault
+ event->ReactEvent.Mouse.preventDefault
switch send {
| Some(send) => updateGrading(Grade.make(~evaluationCriterionId, ~value), state, send)
| None => ()
@@ -137,8 +137,8 @@ let handleGradePillClick = (evaluationCriterionId, value, state, send, event) =>
}
let findEvaluationCriterion = (evaluationCriteria, evaluationCriterionId) =>
- switch evaluationCriteria |> Js.Array.find(ec =>
- ec |> EvaluationCriterion.id == evaluationCriterionId
+ switch evaluationCriteria->Js.Array.find(ec =>
+ ec->EvaluationCriterion.id == evaluationCriterionId
) {
| Some(ec) => ec
| None =>
@@ -152,11 +152,11 @@ let findEvaluationCriterion = (evaluationCriteria, evaluationCriterionId) =>
let gradePillHeader = (evaluationCriteriaName, selectedGrade, gradeLabels) =>
-
{evaluationCriteriaName |> str}
+
{evaluationCriteriaName->str}
- {(selectedGrade |> string_of_int) ++
+ {(selectedGrade->string_of_int) ++
("/" ++
- (GradeLabel.maxGrade(gradeLabels |> Array.to_list) |> string_of_int)) |> str}
+ (GradeLabel.maxGrade(gradeLabels->Array.to_list)->string_of_int))->str}
EvaluationCriterion.id)}
- key={key |> string_of_int}
+ ariaLabel={"evaluation-criterion-" ++ (evaluationCriterion->EvaluationCriterion.id)}
+ key={key->string_of_int}
className="md:pr-8 mt-4">
{gradePillHeader(
- evaluationCriterion |> EvaluationCriterion.name,
+ evaluationCriterion->EvaluationCriterion.name,
gradeValue,
- evaluationCriterion |> EvaluationCriterion.gradesAndLabels,
+ evaluationCriterion->EvaluationCriterion.gradesAndLabels,
)}
{evaluationCriterion
- |> EvaluationCriterion.gradesAndLabels
- |> Array.map(gradeLabel => {
- let gradeLabelGrade = gradeLabel |> GradeLabel.grade
+ ->EvaluationCriterion.gradesAndLabels
+ ->Array.map(gradeLabel => {
+ let gradeLabelGrade = gradeLabel->GradeLabel.grade
string_of_int}
+ key={gradeLabelGrade->string_of_int}
onClick={handleGradePillClick(
- evaluationCriterion |> EvaluationCriterion.id,
+ evaluationCriterion->EvaluationCriterion.id,
gradeLabelGrade,
state,
send,
)}
- title={gradeLabel |> GradeLabel.label}
+ title={gradeLabel->GradeLabel.label}
className={gradePillClasses(gradeValue, gradeLabelGrade, passGrade, send)}>
{switch send {
- | Some(_) => gradeLabelGrade |> string_of_int |> str
+ | Some(_) => gradeLabelGrade->string_of_int->str
| None => React.null
}}
})
- |> React.array}
+ ->React.array}
{grades
- |> Grade.sort(evaluationCriteria)
- |> Array.mapi((key, grade) => {
+ ->Grade.sort(evaluationCriteria)
+ ->Array.mapi((key, grade) => {
let gradeEcId = Grade.evaluationCriterionId(grade)
let ec =
- evaluationCriteria |> ArrayUtils.unsafeFind(
- ec => ec |> EvaluationCriterion.id == gradeEcId,
+ evaluationCriteria->ArrayUtils.unsafeFind(
+ ec => ec->EvaluationCriterion.id == gradeEcId,
"Unable to find evaluation Criterion with id: " ++
(gradeEcId ++
"in CoursesRevew__GradeCard"),
)
- showGradePill(key, ec, grade |> Grade.value, ec |> EvaluationCriterion.passGrade, state, None)
+ showGradePill(key, ec, grade->Grade.value, ec->EvaluationCriterion.passGrade, state, None)
})
- |> React.array}
+ ->React.array}
let renderGradePills = (evaluationCriteria, targetEvaluationCriteriaIds, state, send) =>
targetEvaluationCriteriaIds
- |> Array.mapi((key, evaluationCriterionId) => {
+ ->Array.mapi((key, evaluationCriterionId) => {
let ec =
- evaluationCriteria |> ArrayUtils.unsafeFind(
- e => e |> EvaluationCriterion.id == evaluationCriterionId,
+ evaluationCriteria->ArrayUtils.unsafeFind(
+ e => e->EvaluationCriterion.id == evaluationCriterionId,
"CoursesReview__GradeCard: Unable to find evaluation criterion with id - " ++
evaluationCriterionId,
)
let grade =
- state.grades |> Js.Array.find(g =>
- g |> Grade.evaluationCriterionId == (ec |> EvaluationCriterion.id)
+ state.grades->Js.Array.find(g =>
+ g->Grade.evaluationCriterionId == (ec->EvaluationCriterion.id)
)
let gradeValue = switch grade {
- | Some(g) => g |> Grade.value
+ | Some(g) => g->Grade.value
| None => 0
}
- let passGrade = ec |> EvaluationCriterion.passGrade
+ let passGrade = ec->EvaluationCriterion.passGrade
showGradePill(key, ec, gradeValue, passGrade, state, Some(send))
})
- |> React.array
+ ->React.array
let gradeStatusClasses = (color, status) =>
"w-12 h-10 p-1 mr-2 md:mr-0 md:w-24 md:h-20 rounded md:rounded-lg border flex justify-center items-center bg-" ++
(color ++
@@ -285,22 +285,22 @@ let submissionStatusIcon = (status, overlaySubmission, send) => {
className="flex w-full md:w-3/6 flex-col items-center justify-center md:border-l mt-4 md:mt-0">
- {switch (overlaySubmission |> OverlaySubmission.evaluatedAt, status) {
+ {switch (overlaySubmission->OverlaySubmission.evaluatedAt, status) {
| (Some(date), Graded(_)) =>
-
{"Evaluated By" |> str}
+
{"Evaluated By"->str}
- {switch overlaySubmission |> OverlaySubmission.evaluatorName {
- | Some(name) => name |> str
- | None => {"Deleted Coach" |> str}
+ {switch overlaySubmission->OverlaySubmission.evaluatorName {
+ | Some(name) => name->str
+ | None => {"Deleted Coach"->str}
}}
- {"on " ++ (date |> DateFns.format("MMMM D, YYYY")) |> str}
+ {"on " ++ (date->DateFns.format("MMMM D, YYYY"))->str}
| (None, Graded(_))
@@ -325,17 +325,17 @@ let submissionStatusIcon = (status, overlaySubmission, send) => {
(color ++
("-400 " ++
("bg-" ++ (color ++ ("-100 " ++ ("text-" ++ (color ++ "-800 "))))))))}>
- {text |> str}
+ {text->str}
- {switch (overlaySubmission |> OverlaySubmission.evaluatedAt, status) {
+ {switch (overlaySubmission->OverlaySubmission.evaluatedAt, status) {
| (Some(_), Graded(_)) =>
| (None, Graded(_))
@@ -354,7 +354,7 @@ let gradeSubmission = (
status,
event,
) => {
- event |> ReactEvent.Mouse.preventDefault
+ event->ReactEvent.Mouse.preventDefault
switch status {
| Graded(_) => gradeSubmissionQuery(submissionId, state, send, evaluationCriteria, addGradingCB)
| Grading
@@ -385,15 +385,15 @@ let reviewButtonDisabled = status =>
let computeStatus = (overlaySubmission, selectedGrades, evaluationCriteria) =>
switch (
- overlaySubmission |> OverlaySubmission.passedAt,
- overlaySubmission |> OverlaySubmission.grades |> ArrayUtils.isNotEmpty,
+ overlaySubmission->OverlaySubmission.passedAt,
+ overlaySubmission->OverlaySubmission.grades->ArrayUtils.isNotEmpty,
) {
| (Some(_), _) => Graded(true)
| (None, true) => Graded(false)
| (_, _) =>
if selectedGrades == [] {
Ungraded
- } else if selectedGrades |> Array.length != (evaluationCriteria |> Array.length) {
+ } else if selectedGrades->Array.length != (evaluationCriteria->Array.length) {
Grading
} else {
Graded(passed(selectedGrades, evaluationCriteria))
@@ -401,7 +401,7 @@ let computeStatus = (overlaySubmission, selectedGrades, evaluationCriteria) =>
}
let submitButtonText = (feedback, grades) =>
- switch (feedback != "", grades |> ArrayUtils.isNotEmpty) {
+ switch (feedback != "", grades->ArrayUtils.isNotEmpty) {
| (false, false)
| (false, true) => "Save grades"
| (true, false)
@@ -409,7 +409,7 @@ let submitButtonText = (feedback, grades) =>
}
let noteForm = (overlaySubmission, teamSubmission, note, send) =>
- switch overlaySubmission |> OverlaySubmission.grades {
+ switch overlaySubmission->OverlaySubmission.grades {
| [] =>
let (noteAbout, additionalHelp) = teamSubmission
? (
@@ -423,10 +423,10 @@ let noteForm = (overlaySubmission, teamSubmission, note, send) =>
{"Notes can be used to keep track of a " ++
(noteAbout ++
("'s progress. These notes are shown only to coaches in a student's report." ++
- additionalHelp)) |> str}
+ additionalHelp))->str}
- let textareaId = "note-for-submission-" ++ (overlaySubmission |> OverlaySubmission.id)
+ let textareaId = "note-for-submission-" ++ (overlaySubmission->OverlaySubmission.id)
@@ -434,19 +434,19 @@ let noteForm = (overlaySubmission, teamSubmission, note, send) =>
{switch note {
| Some(_) =>
- help
+ help
| None =>
- {"Would you like to write a note about this " ++ (noteAbout ++ "?") |> str}
+ {"Would you like to write a note about this " ++ (noteAbout ++ "?")->str}
help
}}
@@ -487,17 +487,17 @@ let make = (
newFeedback: "",
saving: false,
note: None,
- checklist: overlaySubmission |> OverlaySubmission.checklist,
+ checklist: overlaySubmission->OverlaySubmission.checklist,
},
)
let status = computeStatus(overlaySubmission, state.grades, evaluationCriteria)
- let updateChecklistCB = switch overlaySubmission |> OverlaySubmission.grades {
+ let updateChecklistCB = switch overlaySubmission->OverlaySubmission.grades {
| [] => Some(checklist => send(UpdateChecklist(checklist)))
| _ => None
}
- let pending = overlaySubmission |> OverlaySubmission.grades |> ArrayUtils.isEmpty
+ let pending = overlaySubmission->OverlaySubmission.grades->ArrayUtils.isEmpty
@@ -505,7 +505,7 @@ let make = (
{showFeedbackForm(
- overlaySubmission |> OverlaySubmission.grades,
+ overlaySubmission->OverlaySubmission.grades,
reviewChecklist,
updateReviewChecklistCB,
state,
@@ -516,12 +516,12 @@ let make = (
{noteForm(overlaySubmission, teamSubmission, state.note, send)}
- {"Grade Card" |> str}
+ {"Grade Card"->str}
- {switch overlaySubmission |> OverlaySubmission.grades {
+ {switch overlaySubmission->OverlaySubmission.grades {
| [] => renderGradePills(evaluationCriteria, targetEvaluationCriteriaIds, state, send)
| grades => showGrades(grades, evaluationCriteria, state)
@@ -531,21 +531,21 @@ let make = (
- {switch overlaySubmission |> OverlaySubmission.grades {
+ {switch overlaySubmission->OverlaySubmission.grades {
| [] =>
diff --git a/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesReview__IndexSubmission.res b/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesReview__IndexSubmission.res
index 468326276a..4bfc2d0833 100644
--- a/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesReview__IndexSubmission.res
+++ b/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesReview__IndexSubmission.res
@@ -22,25 +22,25 @@ let coachIds = t => t.coachIds
let failed = t =>
switch t.status {
| None => false
- | Some(status) => status.passedAt |> OptionUtils.mapWithDefault(_ => false, true)
+ | Some(status) => status.passedAt->OptionUtils.mapWithDefault(_ => false, true)
}
-let pendingReview = t => t.status |> OptionUtils.mapWithDefault(_ => false, true)
+let pendingReview = t => t.status->OptionUtils.mapWithDefault(_ => false, true)
-let feedbackSent = t => t.status |> OptionUtils.mapWithDefault(status => status.feedbackSent, false)
+let feedbackSent = t => t.status->OptionUtils.mapWithDefault(status => status.feedbackSent, false)
-let createdAtPretty = t => t.createdAt |> DateFns.format("MMMM D, YYYY")
+let createdAtPretty = t => t.createdAt->DateFns.format("MMMM D, YYYY")
-let timeDistance = t => t.createdAt |> DateFns.distanceInWordsToNow(~addSuffix=true)
+let timeDistance = t => t.createdAt->DateFns.distanceInWordsToNow(~addSuffix=true)
let sortArray = (sortDirection, submissions) => {
let sortDescending =
- submissions |> ArrayUtils.copyAndSort((x, y) =>
- DateFns.differenceInSeconds(y.createdAt, x.createdAt) |> int_of_float
+ submissions->ArrayUtils.copyAndSort((x, y) =>
+ DateFns.differenceInSeconds(y.createdAt, x.createdAt)->int_of_float
)
switch sortDirection {
| #Descending => sortDescending
- | #Ascending => sortDescending |> Js.Array.reverseInPlace
+ | #Ascending => sortDescending->Js.Array.reverseInPlace
}
}
@@ -57,13 +57,13 @@ let make = (~id, ~title, ~createdAt, ~levelId, ~userNames, ~status, ~coachIds) =
let makeStatus = (~passedAt, ~feedbackSent) => {passedAt: passedAt, feedbackSent: feedbackSent}
let decodeJs = details =>
- details |> Js.Array.map(s =>
+ details->Js.Array.map(s =>
switch s {
| Some(submission) =>
let status =
- submission["evaluatedAt"] |> OptionUtils.map(_ =>
+ submission["evaluatedAt"]->OptionUtils.map(_ =>
makeStatus(
- ~passedAt=submission["passedAt"] |> OptionUtils.map(DateFns.parseString),
+ ~passedAt=submission["passedAt"]->OptionUtils.map(DateFns.parseString),
~feedbackSent=submission["feedbackSent"],
)
)
@@ -72,7 +72,7 @@ let decodeJs = details =>
make(
~id=submission["id"],
~title=submission["title"],
- ~createdAt=submission["createdAt"] |> DateFns.parseString,
+ ~createdAt=submission["createdAt"]->DateFns.parseString,
~levelId=submission["levelId"],
~userNames=submission["userNames"],
~status,
@@ -83,10 +83,10 @@ let decodeJs = details =>
}
)
-let replace = (e, l) => l |> Array.map(s => s.id == e.id ? e : s)
+let replace = (e, l) => l->Array.map(s => s.id == e.id ? e : s)
let statusEq = (overlaySubmission, t) =>
- switch (t.status, overlaySubmission |> CoursesReview__OverlaySubmission.evaluatedAt) {
+ switch (t.status, overlaySubmission->CoursesReview__OverlaySubmission.evaluatedAt) {
| (None, None) => true
| (Some({passedAt}), Some(_)) =>
passedAt == CoursesReview__OverlaySubmission.passedAt(overlaySubmission)
diff --git a/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesReview__Level.res b/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesReview__Level.res
index e6328c5986..d3293d8a27 100644
--- a/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesReview__Level.res
+++ b/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesReview__Level.res
@@ -7,9 +7,9 @@ type t = {
let decode = json => {
open Json.Decode
{
- id: json |> field("id", string),
- name: json |> field("name", string),
- number: json |> field("number", int),
+ id: json->field("id", string),
+ name: json->field("name", string),
+ number: json->field("number", int),
}
}
@@ -17,14 +17,14 @@ let id = t => t.id
let name = t => t.name
let number = t => t.number
-let sort = levels => levels |> ArrayUtils.copyAndSort((x, y) => x.number - y.number)
+let sort = levels => levels->ArrayUtils.copyAndSort((x, y) => x.number - y.number)
let unsafeLevelNumber = (levels, componentName, levelId) =>
"Level " ++
(levels
- |> ArrayUtils.unsafeFind(
+ ->ArrayUtils.unsafeFind(
l => l.id == levelId,
"Unable to find level with id: " ++ (levelId ++ ("in CoursesRevew__" ++ componentName)),
)
- |> number
- |> string_of_int)
+ ->number
+ ->string_of_int)
diff --git a/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesReview__OverlaySubmission.res b/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesReview__OverlaySubmission.res
index c550ba6566..70b810fa21 100644
--- a/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesReview__OverlaySubmission.res
+++ b/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesReview__OverlaySubmission.res
@@ -38,34 +38,34 @@ let make = (
}
let makeFromJs = details =>
- details |> Js.Array.map(s =>
+ details->Js.Array.map(s =>
make(
~id=s["id"],
- ~createdAt=s["createdAt"] |> DateFns.parseString,
- ~passedAt=s["passedAt"] |> OptionUtils.map(DateFns.parseString),
+ ~createdAt=s["createdAt"]->DateFns.parseString,
+ ~passedAt=s["passedAt"]->OptionUtils.map(DateFns.parseString),
~evaluatorName=s["evaluatorName"],
- ~evaluatedAt=s["evaluatedAt"] |> OptionUtils.map(DateFns.parseString),
- ~feedback=s["feedback"] |> Js.Array.map(f =>
+ ~evaluatedAt=s["evaluatedAt"]->OptionUtils.map(DateFns.parseString),
+ ~feedback=s["feedback"]->Js.Array.map(f =>
CoursesReview__Feedback.make(
~coachName=f["coachName"],
~coachAvatarUrl=f["coachAvatarUrl"],
~coachTitle=f["coachTitle"],
- ~createdAt=f["createdAt"] |> DateFns.parseString,
+ ~createdAt=f["createdAt"]->DateFns.parseString,
~value=f["value"],
)
),
- ~grades=s["grades"] |> Js.Array.map(g =>
+ ~grades=s["grades"]->Js.Array.map(g =>
CoursesReview__Grade.make(
~evaluationCriterionId=g["evaluationCriterionId"],
~value=g["grade"],
)
),
- ~checklist=s["checklist"] |> Json.Decode.array(
+ ~checklist=s["checklist"]->Json.Decode.array(
SubmissionChecklistItem.decode(SubmissionChecklistItem.makeFiles(s["files"])),
),
)
)
-let feedbackSent = t => t.feedback |> ArrayUtils.isNotEmpty
+let feedbackSent = t => t.feedback->ArrayUtils.isNotEmpty
let updateFeedback = (feedback, t) => {...t, feedback: feedback}
diff --git a/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesReview__ReviewChecklistItem.res b/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesReview__ReviewChecklistItem.res
index 9fed311363..757c82726c 100644
--- a/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesReview__ReviewChecklistItem.res
+++ b/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesReview__ReviewChecklistItem.res
@@ -8,10 +8,10 @@ let result = t => t.result
let make = (~title, ~result) => {title: title, result: result}
let makeFromJs = data =>
- data |> Js.Array.map(rc =>
+ data->Js.Array.map(rc =>
make(
~title=rc["title"],
- ~result=rc["result"] |> CoursesReview__ReviewChecklistResult.makeFromJs,
+ ~result=rc["result"]->CoursesReview__ReviewChecklistResult.makeFromJs,
)
)
@@ -26,32 +26,32 @@ let updateTitle = (title, t) => make(~title, ~result=t.result)
let updateChecklist = (result, t) => make(~title=t.title, ~result)
let replace = (t, itemIndex, result) =>
- result |> Array.mapi((index, item) => index == itemIndex ? t : item)
+ result->Array.mapi((index, item) => index == itemIndex ? t : item)
let appendEmptyChecklistItem = t =>
make(
~title=t.title,
- ~result=[CoursesReview__ReviewChecklistResult.empty()] |> Array.append(t.result),
+ ~result=[CoursesReview__ReviewChecklistResult.empty()]->Array.append(t.result),
)
let deleteResultItem = (index, t) =>
- make(~title=t.title, ~result=t.result |> Js.Array.filteri((_el, i) => i != index))
+ make(~title=t.title, ~result=t.result->Js.Array.filteri((_el, i) => i != index))
let trim = t => {
- title: t.title |> String.trim,
- result: t.result |> Array.map(CoursesReview__ReviewChecklistResult.trim),
+ title: t.title->String.trim,
+ result: t.result->Array.map(CoursesReview__ReviewChecklistResult.trim),
}
let encode = t => {
open Json.Encode
object_(list{
- ("title", t.title |> string),
- ("result", t.result |> array(CoursesReview__ReviewChecklistResult.encode)),
+ ("title", t.title->string),
+ ("result", t.result->array(CoursesReview__ReviewChecklistResult.encode)),
})
}
let encodeArray = checklist =>
- checklist |> {
+ checklist->{
open Json.Encode
array(encode)
}
diff --git a/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesReview__ReviewChecklistResult.res b/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesReview__ReviewChecklistResult.res
index 6605919022..05eddfba37 100644
--- a/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesReview__ReviewChecklistResult.res
+++ b/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesReview__ReviewChecklistResult.res
@@ -7,7 +7,7 @@ let feedback = t => t.feedback
let make = (~title, ~feedback) => {title: title, feedback: feedback}
-let makeFromJs = data => data |> Js.Array.map(r => make(~title=r["title"], ~feedback=r["feedback"]))
+let makeFromJs = data => data->Js.Array.map(r => make(~title=r["title"], ~feedback=r["feedback"]))
let emptyTemplate = () => [
make(~title="Yes", ~feedback=Some("Sample feedback for yes")),
@@ -17,24 +17,24 @@ let emptyTemplate = () => [
let empty = () => make(~title="", ~feedback=None)
let replace = (t, index, checklist) =>
- checklist |> Array.mapi((resultIndex, result) => resultIndex == index ? t : result)
+ checklist->Array.mapi((resultIndex, result) => resultIndex == index ? t : result)
let updateTitle = (title, t, index, checklist) =>
- checklist |> replace(make(~title, ~feedback=t.feedback), index)
+ checklist->replace(make(~title, ~feedback=t.feedback), index)
let updateFeedback = (feedback, t, index, checklist) => {
- let optionalFeedback = feedback |> Js.String.trim == "" ? None : Some(feedback)
+ let optionalFeedback = feedback->Js.String.trim == "" ? None : Some(feedback)
- checklist |> replace(make(~title=t.title, ~feedback=optionalFeedback), index)
+ checklist->replace(make(~title=t.title, ~feedback=optionalFeedback), index)
}
-let trim = t => {...t, title: t.title |> String.trim}
+let trim = t => {...t, title: t.title->String.trim}
let encode = t => {
- let title = list{("title", t.title |> Json.Encode.string)}
+ let title = list{("title", t.title->Json.Encode.string)}
let feedback = switch t.feedback {
- | Some(f) => list{("feedback", f |> Json.Encode.string)}
+ | Some(f) => list{("feedback", f->Json.Encode.string)}
| None => list{}
}
diff --git a/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesReview__Root.res b/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesReview__Root.res
index baa18e3e36..66cbf4f51c 100644
--- a/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesReview__Root.res
+++ b/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesReview__Root.res
@@ -85,7 +85,7 @@ let reducer = (state, action) =>
| Unloaded => Unloaded
| PartiallyLoaded({submissions, totalCount}, cursor) =>
Submissions.partiallyLoaded(
- ~submissions=submissions |> IndexSubmission.replace(submission),
+ ~submissions=submissions->IndexSubmission.replace(submission),
~filter,
~sortDirection=state.sortDirection,
~totalCount,
@@ -93,7 +93,7 @@ let reducer = (state, action) =>
)
| FullyLoaded({submissions, totalCount}) =>
Submissions.fullyLoaded(
- ~submissions=submissions |> IndexSubmission.replace(submission),
+ ~submissions=submissions->IndexSubmission.replace(submission),
~filter,
~totalCount,
~sortDirection=state.sortDirection,
@@ -113,13 +113,13 @@ let reducer = (state, action) =>
| SyncSubmissionStatus(overlaySubmission) =>
let skipReload =
state.pendingSubmissions
- |> Submissions.toArray
- |> Array.append(state.reviewedSubmissions |> Submissions.toArray)
- |> Js.Array.find(indexSubmission =>
- indexSubmission |> IndexSubmission.id == OverlaySubmission.id(overlaySubmission)
+ ->Submissions.toArray
+ ->Array.append(state.reviewedSubmissions->Submissions.toArray)
+ ->Js.Array.find(indexSubmission =>
+ indexSubmission->IndexSubmission.id == OverlaySubmission.id(overlaySubmission)
)
- |> OptionUtils.mapWithDefault(
- indexSubmission => indexSubmission |> IndexSubmission.statusEq(overlaySubmission),
+ ->OptionUtils.mapWithDefault(
+ indexSubmission => indexSubmission->IndexSubmission.statusEq(overlaySubmission),
true,
)
@@ -149,14 +149,14 @@ let computeInitialState = currentTeamCoach => {
}
let openOverlay = (submissionId, event) => {
- event |> ReactEvent.Mouse.preventDefault
+ event->ReactEvent.Mouse.preventDefault
ReasonReactRouter.push("/submissions/" ++ submissionId)
}
let dropdownElementClasses = (level, selectedLevel) =>
"p-3 w-full text-left font-semibold focus:outline-none " ++
switch (selectedLevel, level) {
- | (Some(sl), Some(l)) if l |> Level.id == (sl |> Level.id) => "bg-gray-200 text-primary-500"
+ | (Some(sl), Some(l)) if l->Level.id == (sl->Level.id) => "bg-gray-200 text-primary-500"
| (None, None) => "bg-gray-200 text-primary-500"
| _ => ""
}
@@ -175,26 +175,26 @@ module Selectable = {
let label = t =>
switch t {
- | Level(level) => Some("Level " ++ (level |> Level.number |> string_of_int))
+ | Level(level) => Some("Level " ++ (level->Level.number->string_of_int))
| AssignedToCoach(_) => Some("Assigned to")
}
let value = t =>
switch t {
- | Level(level) => level |> Level.name
+ | Level(level) => level->Level.name
| AssignedToCoach(coach, currentCoachId) =>
- coach |> Coach.id == currentCoachId ? "Me" : coach |> Coach.name
+ coach->Coach.id == currentCoachId ? "Me" : coach->Coach.name
}
let searchString = t =>
switch t {
| Level(level) =>
- "level " ++ ((level |> Level.number |> string_of_int) ++ (" " ++ (level |> Level.name)))
+ "level " ++ ((level->Level.number->string_of_int) ++ (" " ++ (level->Level.name)))
| AssignedToCoach(coach, currentCoachId) =>
- if coach |> Coach.id == currentCoachId {
- (coach |> Coach.name) ++ " assigned to me"
+ if coach->Coach.id == currentCoachId {
+ (coach->Coach.name) ++ " assigned to me"
} else {
- "assigned to " ++ (coach |> Coach.name)
+ "assigned to " ++ (coach->Coach.name)
}
}
@@ -208,41 +208,41 @@ module Multiselect = MultiselectDropdown.Make(Selectable)
let unselected = (levels, coaches, currentCoachId, state) => {
let unselectedLevels =
levels
- |> Js.Array.filter(level =>
- state.selectedLevel |> OptionUtils.mapWithDefault(
- selectedLevel => level |> Level.id != (selectedLevel |> Level.id),
+ ->Js.Array.filter(level =>
+ state.selectedLevel->OptionUtils.mapWithDefault(
+ selectedLevel => level->Level.id != (selectedLevel->Level.id),
true,
)
)
- |> Array.map(Selectable.level)
+ ->Array.map(Selectable.level)
let unselectedCoaches =
coaches
- |> Js.Array.filter(coach =>
- state.selectedCoach |> OptionUtils.mapWithDefault(
- selectedCoach => coach |> Coach.id != Coach.id(selectedCoach),
+ ->Js.Array.filter(coach =>
+ state.selectedCoach->OptionUtils.mapWithDefault(
+ selectedCoach => coach->Coach.id != Coach.id(selectedCoach),
true,
)
)
- |> Array.map(coach => Selectable.assignedToCoach(coach, currentCoachId))
+ ->Array.map(coach => Selectable.assignedToCoach(coach, currentCoachId))
- unselectedLevels |> Array.append(unselectedCoaches)
+ unselectedLevels->Array.append(unselectedCoaches)
}
let selected = (state, currentCoachId) => {
let selectedLevel =
- state.selectedLevel |> OptionUtils.mapWithDefault(
+ state.selectedLevel->OptionUtils.mapWithDefault(
selectedLevel => [Selectable.level(selectedLevel)],
[],
)
let selectedCoach =
- state.selectedCoach |> OptionUtils.mapWithDefault(
+ state.selectedCoach->OptionUtils.mapWithDefault(
selectedCoach => [Selectable.assignedToCoach(selectedCoach, currentCoachId)],
[],
)
- selectedLevel |> Array.append(selectedCoach)
+ selectedLevel->Array.append(selectedCoach)
}
let onSelectFilter = (send, selectable) =>
@@ -268,16 +268,16 @@ let filterPlaceholder = state =>
let restoreFilterNotice = (send, currentCoach, message) =>
- {message |> str}
+ {message->str}
let restoreAssignedToMeFilter = (state, send, currentTeamCoach) =>
- currentTeamCoach |> OptionUtils.mapWithDefault(currentCoach =>
+ currentTeamCoach->OptionUtils.mapWithDefault(currentCoach =>
switch state.selectedCoach {
| None =>
restoreFilterNotice(
@@ -285,28 +285,28 @@ let restoreAssignedToMeFilter = (state, send, currentTeamCoach) =>
currentCoach,
"Now showing submissions from all students in this course.",
)
- | Some(selectedCoach) if selectedCoach |> Coach.id == Coach.id(currentCoach) => React.null
+ | Some(selectedCoach) if selectedCoach->Coach.id == Coach.id(currentCoach) => React.null
| Some(selectedCoach) =>
restoreFilterNotice(
send,
currentCoach,
- "Now showing submissions assigned to " ++ ((selectedCoach |> Coach.name) ++ "."),
+ "Now showing submissions assigned to " ++ ((selectedCoach->Coach.name) ++ "."),
)
}
, React.null)
let filterSubmissions = (selectedLevel, selectedCoach, submissions) => {
let levelFiltered =
- selectedLevel |> OptionUtils.mapWithDefault(
+ selectedLevel->OptionUtils.mapWithDefault(
level =>
- submissions |> Js.Array.filter(l => l |> IndexSubmission.levelId == (level |> Level.id)),
+ submissions->Js.Array.filter(l => l->IndexSubmission.levelId == (level->Level.id)),
submissions,
)
- selectedCoach |> OptionUtils.mapWithDefault(
+ selectedCoach->OptionUtils.mapWithDefault(
coach =>
- levelFiltered |> Js.Array.filter(l =>
- l |> IndexSubmission.coachIds |> Array.mem(coach |> Coach.id)
+ levelFiltered->Js.Array.filter(l =>
+ l->IndexSubmission.coachIds->Array.mem(coach->Coach.id)
),
levelFiltered,
)
@@ -324,7 +324,7 @@ module SubmissionsSorter = Sorter.Make(Sortable)
let submissionsSorter = (state, send) => {
let criteria = [{criterion: "Submitted At", criterionType: #Number}]
-
+
let submissionsCount = submissions =>
submissions
- |> Submissions.totalCount
- |> OptionUtils.mapWithDefault(
+ ->Submissions.totalCount
+ ->OptionUtils.mapWithDefault(
count =>
- {count |> string_of_int |> str}
+ {count->string_of_int->str}
,
React.null,
)
@@ -356,7 +356,7 @@ let submissionsCount = submissions =>
@react.component
let make = (~levels, ~courseId, ~teamCoaches, ~currentCoach) => {
let (currentTeamCoach, _) = React.useState(() =>
- teamCoaches->Belt.Array.some(coach => coach |> Coach.id == (currentCoach |> Coach.id))
+ teamCoaches->Belt.Array.some(coach => coach->Coach.id == (currentCoach->Coach.id))
? Some(currentCoach)
: None
)
@@ -389,24 +389,24 @@ let make = (~levels, ~courseId, ~teamCoaches, ~currentCoach) => {
Coach.id, state)}
- selected={selected(state, currentCoach |> Coach.id)}
+ unselected={unselected(levels, teamCoaches, currentCoach->Coach.id, state)}
+ selected={selected(state, currentCoach->Coach.id)}
onSelect={onSelectFilter(send)}
onDeselect={onDeselectFilter(send)}
value=state.filterString
diff --git a/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesReview__ShowFeedback.res b/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesReview__ShowFeedback.res
index 87c69fd923..ffbcce7e96 100644
--- a/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesReview__ShowFeedback.res
+++ b/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesReview__ShowFeedback.res
@@ -20,8 +20,8 @@ let createFeedback = (submissionId, feedback, setState, addFeedbackCB) => {
setState(state => {...state, saving: true})
CreateFeedbackMutation.make(~submissionId, ~feedback, ())
- |> GraphqlQuery.sendQuery
- |> Js.Promise.then_(response => {
+ ->GraphqlQuery.sendQuery
+ ->Js.Promise.then_(response => {
response["createFeedback"]["success"]
? {
addFeedbackCB(feedback)
@@ -30,30 +30,30 @@ let createFeedback = (submissionId, feedback, setState, addFeedbackCB) => {
: setState(state => {...state, saving: false})
Js.Promise.resolve()
})
- |> ignore
+ ->ignore
}
let showFeedback = feedback =>
feedback
- |> Array.mapi((index, f) =>
- string_of_int} className="border-t p-4 md:p-6">
+ ->Array.mapi((index, f) =>
+
string_of_int} className="border-t p-4 md:p-6">
- {switch f |> Feedback.coachAvatarUrl {
+ {switch f->Feedback.coachAvatarUrl {
| Some(avatarUrl) =>
- | None =>
Feedback.coachName} />
+ | None => Feedback.coachName} />
}}
-
{"Feedback from:" |> str}
+
{"Feedback from:"->str}
- {f |> Feedback.coachName |> str}
+ {f->Feedback.coachName->str}
- {"(" ++ ((f |> Feedback.coachTitle) ++ ")") |> str}
+ {"(" ++ ((f->Feedback.coachTitle) ++ ")")->str}
@@ -61,15 +61,15 @@ let showFeedback = feedback =>
- {f |> Feedback.createdAtPretty |> str}
+ {f->Feedback.createdAtPretty->str}
Feedback.value}
+ className="pt-1 text-sm" profile=Markdown.Permissive markdown={f->Feedback.value}
/>
)
- |> React.array
+ ->React.array
let updateFeedbackCB = (setState, newFeedback) =>
setState(state => {...state, newFeedback: newFeedback})
@@ -112,7 +112,7 @@ let make = (
className="btn btn-success border border-green-600 w-full md:w-auto"
onClick={_ =>
createFeedback(submissionId, state.newFeedback, setState, addFeedbackCB)}>
- {"Share Feedback" |> str}
+ {"Share Feedback"->str}
}
diff --git a/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesReview__SubmissionDetails.res b/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesReview__SubmissionDetails.res
index e600486c4c..3dd1293511 100644
--- a/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesReview__SubmissionDetails.res
+++ b/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesReview__SubmissionDetails.res
@@ -55,49 +55,49 @@ let make = (
let decodeJs = details =>
make(
- ~submissions=details["submissions"] |> OverlaySubmission.makeFromJs,
+ ~submissions=details["submissions"]->OverlaySubmission.makeFromJs,
~targetId=details["targetId"],
~targetTitle=details["targetTitle"],
- ~students=details["students"] |> Array.map(Student.makeFromJs),
+ ~students=details["students"]->Array.map(Student.makeFromJs),
~levelNumber=details["levelNumber"],
~levelId=details["levelId"],
~targetEvaluationCriteriaIds=details["targetEvaluationCriteriaIds"],
~inactiveStudents=details["inactiveStudents"],
- ~evaluationCriteria=details["evaluationCriteria"] |> Js.Array.map(ec =>
+ ~evaluationCriteria=details["evaluationCriteria"]->Js.Array.map(ec =>
EvaluationCriterion.make(
~id=ec["id"],
~name=ec["name"],
~maxGrade=ec["maxGrade"],
~passGrade=ec["passGrade"],
- ~gradesAndLabels=ec["gradeLabels"] |> Array.map(gradeAndLabel =>
+ ~gradesAndLabels=ec["gradeLabels"]->Array.map(gradeAndLabel =>
GradeLabel.makeFromJs(gradeAndLabel)
),
)
),
- ~reviewChecklist=details["reviewChecklist"] |> ReviewChecklistItem.makeFromJs,
+ ~reviewChecklist=details["reviewChecklist"]->ReviewChecklistItem.makeFromJs,
~coachIds=details["coachIds"],
)
let updateSubmission = (submission, t) => {
...t,
submissions: t.submissions
- |> Js.Array.filter(s => s |> OverlaySubmission.id != (submission |> OverlaySubmission.id))
- |> Array.append([submission]),
+ ->Js.Array.filter(s => s->OverlaySubmission.id != (submission->OverlaySubmission.id))
+ ->Array.append([submission]),
}
let makeIndexSubmission = (overlaySubmission, t) =>
IndexSubmission.make(
- ~id=overlaySubmission |> OverlaySubmission.id,
+ ~id=overlaySubmission->OverlaySubmission.id,
~title=t.targetTitle,
- ~createdAt=overlaySubmission |> OverlaySubmission.createdAt,
+ ~createdAt=overlaySubmission->OverlaySubmission.createdAt,
~levelId=t.levelId,
~userNames=t.students
- |> Array.map(student => student |> CoursesReview__Student.name)
- |> Js.Array.joinWith(", "),
+ ->Array.map(student => student->CoursesReview__Student.name)
+ ->Js.Array.joinWith(", "),
~status=Some(
IndexSubmission.makeStatus(
- ~passedAt=overlaySubmission |> OverlaySubmission.passedAt,
- ~feedbackSent=overlaySubmission |> OverlaySubmission.feedbackSent,
+ ~passedAt=overlaySubmission->OverlaySubmission.passedAt,
+ ~feedbackSent=overlaySubmission->OverlaySubmission.feedbackSent,
),
),
~coachIds=t.coachIds,
diff --git a/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesReview__SubmissionOverlay.res b/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesReview__SubmissionOverlay.res
index 37a4a5424f..eff55a1807 100644
--- a/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesReview__SubmissionOverlay.res
+++ b/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesReview__SubmissionOverlay.res
@@ -51,15 +51,15 @@ module SubmissionDetailsQuery = %graphql(`
* Then, set the state of this component to Loaded.
*/
let updateSubmissionDetails = (setState, submissionId, syncSubmissionCB, details) => {
- let submissionDetails = details |> SubmissionDetails.decodeJs
+ let submissionDetails = details->SubmissionDetails.decodeJs
submissionDetails
- |> SubmissionDetails.submissions
- |> ArrayUtils.unsafeFind(
- submission => submission |> OverlaySubmission.id == submissionId,
+ ->SubmissionDetails.submissions
+ ->ArrayUtils.unsafeFind(
+ submission => submission->OverlaySubmission.id == submissionId,
"Could not find overlaySubmission with ID " ++ (submissionId ++ " in loaded submissions"),
)
- |> syncSubmissionCB
+ ->syncSubmissionCB
setState(_ => Loaded(submissionDetails))
}
@@ -67,16 +67,16 @@ let updateSubmissionDetails = (setState, submissionId, syncSubmissionCB, details
let getSubmissionDetails = (submissionId, setState, syncSubmissionCB, ()) => {
setState(_ => Loading)
SubmissionDetailsQuery.make(~submissionId, ())
- |> GraphqlQuery.sendQuery
- |> Js.Promise.then_(response => {
- response["submissionDetails"] |> updateSubmissionDetails(
+ ->GraphqlQuery.sendQuery
+ ->Js.Promise.then_(response => {
+ response["submissionDetails"]->updateSubmissionDetails(
setState,
submissionId,
syncSubmissionCB,
)
Js.Promise.resolve()
})
- |> ignore
+ ->ignore
None
}
@@ -94,40 +94,40 @@ let headerSection = (submissionDetails, courseId, assignedCoaches) =>
onClick={_ => closeOverlay(courseId)}
className="review-submission-overlay__close flex flex-col items-center justify-center absolute rounded-t-lg lg:rounded-lg leading-tight px-4 py-1 h-8 lg:h-full cursor-pointer border border-b-0 border-gray-400 lg:border-0 lg:shadow lg:border-gray-300 bg-white text-gray-700 hover:text-gray-900 hover:bg-gray-100">
-
{"close" |> str}
+
{"close"->str}
@@ -135,7 +135,7 @@ let headerSection = (submissionDetails, courseId, assignedCoaches) =>
tooltipPosition=#Bottom
defaultAvatarSize="8"
mdAvatarSize="8"
- title={
{"Assigned Coaches" |> str} }
+ title={
{"Assigned Coaches"->str} }
className="mt-2 flex w-full md:w-auto items-center flex-shrink-0"
coaches=assignedCoaches
/>
@@ -145,7 +145,7 @@ let headerSection = (submissionDetails, courseId, assignedCoaches) =>
let updateSubmissionDetails = (setState, submissionDetails, overlaySubmission) => {
// Create new details for overlay with updated overlaySubmission.
let newSubmissionDetails =
- submissionDetails |> SubmissionDetails.updateSubmission(overlaySubmission)
+ submissionDetails->SubmissionDetails.updateSubmission(overlaySubmission)
// Re-render the overlay with the updated submission details.
setState(_ => Loaded(newSubmissionDetails))
@@ -154,7 +154,7 @@ let updateSubmissionDetails = (setState, submissionDetails, overlaySubmission) =
}
let addGrading = (setState, removePendingSubmissionCB, submissionDetails, overlaySubmission) => {
- updateSubmissionDetails(setState, submissionDetails, overlaySubmission) |> ignore
+ updateSubmissionDetails(setState, submissionDetails, overlaySubmission)->ignore
removePendingSubmissionCB()
}
@@ -166,24 +166,24 @@ let addFeedbackToReviewedSubmission = (
overlaySubmission,
) =>
updateSubmissionDetails(setState, submissionDetails, overlaySubmission)
- |> SubmissionDetails.makeIndexSubmission(overlaySubmission)
- |> updateReviewedSubmissionCB
+ ->SubmissionDetails.makeIndexSubmission(overlaySubmission)
+ ->updateReviewedSubmissionCB
let updateReviewChecklist = (submissionDetails, setState, reviewChecklist) =>
setState(_ => Loaded(
- submissionDetails |> SubmissionDetails.updateReviewChecklist(reviewChecklist),
+ submissionDetails->SubmissionDetails.updateReviewChecklist(reviewChecklist),
))
let inactiveWarning = submissionDetails =>
- if submissionDetails |> SubmissionDetails.inactiveStudents {
- let warning = if submissionDetails |> SubmissionDetails.students |> Array.length > 1 {
+ if submissionDetails->SubmissionDetails.inactiveStudents {
+ let warning = if submissionDetails->SubmissionDetails.students->Array.length > 1 {
"This submission is linked to one or more students whose access to the course has ended, or have dropped out."
} else {
"This submission is from a student whose access to the course has ended, or has dropped out."
}
- {warning |> str}
+ {warning->str}
} else {
React.null
@@ -211,8 +211,8 @@ let make = (
{switch state {
| Loaded(submissionDetails) =>
let assignedCoaches =
- teamCoaches |> Js.Array.filter(coach =>
- submissionDetails |> SubmissionDetails.coachIds |> Array.mem(coach |> Coach.id)
+ teamCoaches->Js.Array.filter(coach =>
+ submissionDetails->SubmissionDetails.coachIds->Array.mem(coach->Coach.id)
)
@@ -223,13 +223,13 @@ let make = (
{submissionDetails
- |> SubmissionDetails.submissions
- |> Array.mapi((index, overlaySubmission) =>
+ ->SubmissionDetails.submissions
+ ->Array.mapi((index, overlaySubmission) =>
string_of_int}
+ key={index->string_of_int}
overlaySubmission
- teamSubmission={submissionDetails |> SubmissionDetails.students |> Array.length > 1}
- targetEvaluationCriteriaIds={submissionDetails |> SubmissionDetails.targetEvaluationCriteriaIds}
+ teamSubmission={submissionDetails->SubmissionDetails.students->Array.length > 1}
+ targetEvaluationCriteriaIds={submissionDetails->SubmissionDetails.targetEvaluationCriteriaIds}
addGradingCB={addGrading(setState, removePendingSubmissionCB, submissionDetails)}
addFeedbackCB={addFeedbackToReviewedSubmission(
setState,
@@ -237,16 +237,16 @@ let make = (
submissionDetails,
)}
submissionNumber={(submissionDetails
- |> SubmissionDetails.submissions
- |> Array.length) - index}
+ ->SubmissionDetails.submissions
+ ->Array.length) - index}
currentCoach
- evaluationCriteria={submissionDetails |> SubmissionDetails.evaluationCriteria}
- reviewChecklist={submissionDetails |> SubmissionDetails.reviewChecklist}
+ evaluationCriteria={submissionDetails->SubmissionDetails.evaluationCriteria}
+ reviewChecklist={submissionDetails->SubmissionDetails.reviewChecklist}
updateReviewChecklistCB={updateReviewChecklist(submissionDetails, setState)}
- targetId={submissionDetails |> SubmissionDetails.targetId}
+ targetId={submissionDetails->SubmissionDetails.targetId}
/>
)
- |> React.array}
+ ->React.array}
diff --git a/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesReview__Submissions.res b/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesReview__Submissions.res
index 95b8c1d05b..572ba08050 100644
--- a/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesReview__Submissions.res
+++ b/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesReview__Submissions.res
@@ -7,12 +7,12 @@ type filter = {
let makeFilter = (level, coach) => {level: level, coach: coach}
-let filterLevelId = level => level |> OptionUtils.mapWithDefault(Level.id, "none")
-let filterCoachId = coach => coach |> OptionUtils.mapWithDefault(UserProxy.id, "none")
+let filterLevelId = level => level->OptionUtils.mapWithDefault(Level.id, "none")
+let filterCoachId = coach => coach->OptionUtils.mapWithDefault(UserProxy.id, "none")
let filterEq = (level, coach, filter) =>
- filter.level |> filterLevelId == filterLevelId(level) &&
- filter.coach |> filterCoachId == filterCoachId(coach)
+ filter.level->filterLevelId == filterLevelId(level) &&
+ filter.coach->filterCoachId == filterCoachId(coach)
type sortDirection = [#Ascending | #Descending]
@@ -63,7 +63,7 @@ let needsReloading = (selectedLevel, selectedCoach, sortDirection, t) =>
| Unloaded => true
| FullyLoaded(data)
| PartiallyLoaded(data, _) =>
- !(data.filter |> filterEq(selectedLevel, selectedCoach) && data.sortDirection == sortDirection)
+ !(data.filter->filterEq(selectedLevel, selectedCoach) && data.sortDirection == sortDirection)
}
let toArray = t =>
diff --git a/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesReview__SubmissionsList.res b/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesReview__SubmissionsList.res
index 06734ef594..1d80e7a8c5 100644
--- a/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesReview__SubmissionsList.res
+++ b/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesReview__SubmissionsList.res
@@ -3,30 +3,30 @@ let str = React.string
let showSubmissionStatus = overlaySubmission => {
let (text, classes) = switch (
- overlaySubmission |> OverlaySubmission.passedAt,
- overlaySubmission |> OverlaySubmission.evaluatorName,
+ overlaySubmission->OverlaySubmission.passedAt,
+ overlaySubmission->OverlaySubmission.evaluatorName,
) {
| (None, None) => ("Pending", "bg-orange-100 border border-orange-500 text-orange-800 ")
| (None, Some(_)) => ("Failed", "bg-red-100 border border-red-500 text-red-700")
| (Some(_), None)
| (Some(_), Some(_)) => ("Passed", "bg-green-100 border border-green-500 text-green-800")
}
-
{text |> str}
+
{text->str}
}
let showFeedbackSent = feedbackSent =>
feedbackSent
?
- {"Feedback Sent" |> str}
+ {"Feedback Sent"->str}
: React.null
let cardClasses = overlaySubmission =>
"mt-6 rounded-b-lg bg-white border-t-3 " ++
switch (
- overlaySubmission |> OverlaySubmission.passedAt,
- overlaySubmission |> OverlaySubmission.evaluatorName,
+ overlaySubmission->OverlaySubmission.passedAt,
+ overlaySubmission->OverlaySubmission.evaluatorName,
) {
| (None, None) => "border-orange-300"
| (None, Some(_)) => "border-red-500"
@@ -46,39 +46,39 @@ let updateSubmission = (
) => {
let feedback = switch newFeedback {
| Some(f) =>
- f |> String.trim == ""
- ? overlaySubmission |> OverlaySubmission.feedback
+ f->String.trim == ""
+ ? overlaySubmission->OverlaySubmission.feedback
: overlaySubmission
- |> OverlaySubmission.feedback
- |> Array.append([
+ ->OverlaySubmission.feedback
+ ->Array.append([
Feedback.make(
- ~coachName=currentCoach |> Coach.name,
- ~coachAvatarUrl=currentCoach |> Coach.avatarUrl,
- ~coachTitle=currentCoach |> Coach.title,
+ ~coachName=currentCoach->Coach.name,
+ ~coachAvatarUrl=currentCoach->Coach.avatarUrl,
+ ~coachTitle=currentCoach->Coach.title,
~createdAt=Js.Date.make(),
~value=f,
),
])
- | None => overlaySubmission |> OverlaySubmission.feedback
+ | None => overlaySubmission->OverlaySubmission.feedback
}
let (passedAt, evaluatedAt, newGrades) = switch passed {
| Some(p) => (p ? Some(Js.Date.make()) : None, Some(Js.Date.make()), grades)
| None => (
- overlaySubmission |> OverlaySubmission.passedAt,
- overlaySubmission |> OverlaySubmission.evaluatedAt,
- overlaySubmission |> OverlaySubmission.grades,
+ overlaySubmission->OverlaySubmission.passedAt,
+ overlaySubmission->OverlaySubmission.evaluatedAt,
+ overlaySubmission->OverlaySubmission.grades,
)
}
let newSubmission = OverlaySubmission.make(
- ~id=overlaySubmission |> OverlaySubmission.id,
- ~createdAt=overlaySubmission |> OverlaySubmission.createdAt,
+ ~id=overlaySubmission->OverlaySubmission.id,
+ ~createdAt=overlaySubmission->OverlaySubmission.createdAt,
~passedAt,
~evaluatorName=if feedbackUpdate {
- overlaySubmission |> OverlaySubmission.evaluatorName
+ overlaySubmission->OverlaySubmission.evaluatorName
} else {
- Some(currentCoach |> Coach.name)
+ Some(currentCoach->Coach.name)
},
~feedback,
~grades=newGrades,
@@ -90,15 +90,15 @@ let updateSubmission = (
}
let updateFeedbackArray = (currentCoach, overlaySubmission, newFeedback) =>
- newFeedback |> String.trim == ""
- ? overlaySubmission |> OverlaySubmission.feedback
+ newFeedback->String.trim == ""
+ ? overlaySubmission->OverlaySubmission.feedback
: overlaySubmission
- |> OverlaySubmission.feedback
- |> Array.append([
+ ->OverlaySubmission.feedback
+ ->Array.append([
Feedback.make(
- ~coachName=currentCoach |> Coach.name,
- ~coachAvatarUrl=currentCoach |> Coach.avatarUrl,
- ~coachTitle=currentCoach |> Coach.title,
+ ~coachName=currentCoach->Coach.name,
+ ~coachAvatarUrl=currentCoach->Coach.avatarUrl,
+ ~coachTitle=currentCoach->Coach.title,
~createdAt=Js.Date.make(),
~value=newFeedback,
),
@@ -119,21 +119,21 @@ let addGrading = (
let evaluatedAt = Some(Js.Date.make())
OverlaySubmission.make(
- ~id=overlaySubmission |> OverlaySubmission.id,
- ~createdAt=overlaySubmission |> OverlaySubmission.createdAt,
+ ~id=overlaySubmission->OverlaySubmission.id,
+ ~createdAt=overlaySubmission->OverlaySubmission.createdAt,
~passedAt,
- ~evaluatorName=Some(currentCoach |> Coach.name),
+ ~evaluatorName=Some(currentCoach->Coach.name),
~feedback,
~grades,
~evaluatedAt,
~checklist,
- ) |> addGradingCB
+ )->addGradingCB
}
let addFeedback = (addFeedbackCB, currentCoach, overlaySubmission, newFeedback) => {
let feedback = updateFeedbackArray(currentCoach, overlaySubmission, newFeedback)
- overlaySubmission |> OverlaySubmission.updateFeedback(feedback) |> addFeedbackCB
+ overlaySubmission->OverlaySubmission.updateFeedback(feedback)->addFeedbackCB
}
@react.component
@@ -151,25 +151,25 @@ let make = (
~targetEvaluationCriteriaIds,
) =>
OverlaySubmission.id)}
+ ariaLabel={"submissions-overlay-card-" ++ (overlaySubmission->OverlaySubmission.id)}
className={cardClasses(overlaySubmission)}>
- {"Submission #" ++ (submissionNumber |> string_of_int) |> str}
+ {"Submission #" ++ (submissionNumber->string_of_int)->str}
{overlaySubmission
- |> OverlaySubmission.createdAt
- |> DateFns.format("MMMM D, YYYY")
- |> str}
+ ->OverlaySubmission.createdAt
+ ->DateFns.format("MMMM D, YYYY")
+ ->str}
{showFeedbackSent(
- overlaySubmission |> OverlaySubmission.feedback |> ArrayUtils.isNotEmpty,
+ overlaySubmission->OverlaySubmission.feedback->ArrayUtils.isNotEmpty,
)}
{showSubmissionStatus(overlaySubmission)}
@@ -185,9 +185,9 @@ let make = (
targetId
/>
OverlaySubmission.feedback}
- reviewed={overlaySubmission |> OverlaySubmission.grades |> ArrayUtils.isNotEmpty}
- submissionId={overlaySubmission |> OverlaySubmission.id}
+ feedback={overlaySubmission->OverlaySubmission.feedback}
+ reviewed={overlaySubmission->OverlaySubmission.grades->ArrayUtils.isNotEmpty}
+ submissionId={overlaySubmission->OverlaySubmission.id}
reviewChecklist
addFeedbackCB={addFeedback(addFeedbackCB, currentCoach, overlaySubmission)}
updateReviewChecklistCB
diff --git a/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesReview__SubmissionsTab.res b/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesReview__SubmissionsTab.res
index ce68ee90cf..3b1cb43d13 100644
--- a/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesReview__SubmissionsTab.res
+++ b/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesReview__SubmissionsTab.res
@@ -48,14 +48,14 @@ let updateSubmissions = (
nodes,
) => {
updateSubmissionsCB(
- ~submissions=submissions |> Array.append(
+ ~submissions=submissions->Array.append(
switch nodes {
| None => []
- | Some(submissionsArray) => submissionsArray |> IndexSubmission.decodeJs
+ | Some(submissionsArray) => submissionsArray->IndexSubmission.decodeJs
}
- |> Array.to_list
- |> List.flatten
- |> Array.of_list,
+ ->Array.to_list
+ ->List.flatten
+ ->Array.of_list,
),
~selectedTab,
~hasNextPage,
@@ -86,8 +86,8 @@ let getSubmissions = (
}
)
- let levelId = selectedLevel |> OptionUtils.map(level => level |> Level.id)
- let coachId = selectedCoach |> OptionUtils.map(coach => coach |> Coach.id)
+ let levelId = selectedLevel->OptionUtils.map(level => level->Level.id)
+ let coachId = selectedCoach->OptionUtils.map(coach => coach->Coach.id)
SubmissionsQuery.make(
~courseId,
@@ -98,9 +98,9 @@ let getSubmissions = (
~after=?cursor,
(),
)
- |> GraphqlQuery.sendQuery
- |> Js.Promise.then_(response => {
- response["submissions"]["nodes"] |> updateSubmissions(
+ ->GraphqlQuery.sendQuery
+ ->Js.Promise.then_(response => {
+ response["submissions"]["nodes"]->updateSubmissions(
setState,
response["submissions"]["pageInfo"]["endCursor"],
response["submissions"]["pageInfo"]["hasNextPage"],
@@ -111,37 +111,37 @@ let getSubmissions = (
)
Js.Promise.resolve()
})
- |> ignore
+ ->ignore
}
let submissionStatus = submission => {
let classes = "border flex-shrink-0 leading-normal font-semibold px-3 py-px rounded "
- let (className, text) = if submission |> IndexSubmission.pendingReview {
- (classes ++ "bg-orange-100 text-orange-600", submission |> IndexSubmission.timeDistance)
- } else if submission |> IndexSubmission.failed {
+ let (className, text) = if submission->IndexSubmission.pendingReview {
+ (classes ++ "bg-orange-100 text-orange-600", submission->IndexSubmission.timeDistance)
+ } else if submission->IndexSubmission.failed {
(classes ++ "bg-red-100 border-red-500 text-red-800", "Failed")
} else {
("bg-green-100 border-green-500 text-green-800", "Passed")
}
- {text |> str}
+ {text->str}
}
let feedbackSentNotice = feedbackSent =>
feedbackSent
?
- {"Feedback Sent" |> str}
+ {"Feedback Sent"->str}
: React.null
let submissionCardClasses = submission =>
"flex flex-col md:flex-row items-start md:items-center justify-between bg-white border-l-3 p-3 md:py-6 md:px-5 mb-4 cursor-pointer rounded-r-lg shadow hover:border-primary-500 hover:text-primary-500 hover:shadow-md " ++ if (
- submission |> IndexSubmission.pendingReview
+ submission->IndexSubmission.pendingReview
) {
"border-orange-400"
- } else if submission |> IndexSubmission.failed {
+ } else if submission->IndexSubmission.failed {
"border-red-500"
} else {
"border-green-500"
@@ -150,42 +150,42 @@ let submissionCardClasses = submission =>
let showSubmission = (submissions, levels, sortDirection) =>
{submissions
- |> IndexSubmission.sortArray(sortDirection)
- |> Array.map(submission =>
+ ->IndexSubmission.sortArray(sortDirection)
+ ->Array.map(submission =>
IndexSubmission.id)}
- key={submission |> IndexSubmission.id}
- ariaLabel={"Submission " ++ (submission |> IndexSubmission.id)}
+ href={"/submissions/" ++ (submission->IndexSubmission.id)}
+ key={submission->IndexSubmission.id}
+ ariaLabel={"Submission " ++ (submission->IndexSubmission.id)}
className={submissionCardClasses(submission)}>
{submission
- |> IndexSubmission.levelId
- |> Level.unsafeLevelNumber(levels, "SubmissionsTab")
- |> str}
+ ->IndexSubmission.levelId
+ ->Level.unsafeLevelNumber(levels, "SubmissionsTab")
+ ->str}
- {submission |> IndexSubmission.title |> str}
+ {submission->IndexSubmission.title->str}
- {"Submitted by " |> str}
+ {"Submitted by "->str}
- {submission |> IndexSubmission.userNames |> str}
+ {submission->IndexSubmission.userNames->str}
- {"on " ++ (submission |> IndexSubmission.createdAtPretty) |> str}
+ {"on " ++ (submission->IndexSubmission.createdAtPretty)->str}
- {feedbackSentNotice(submission |> IndexSubmission.feedbackSent)}
+ {feedbackSentNotice(submission->IndexSubmission.feedbackSent)}
{submissionStatus(submission)}
)
- |> React.array}
+ ->React.array}
- {"No submissions found" |> str}
+ {"No submissions found"->str}
@@ -218,7 +218,7 @@ let make = (
) => {
let (state, setState) = React.useState(() => Loading)
React.useEffect5(() => {
- if submissions |> Submissions.needsReloading(selectedLevel, selectedCoach, sortDirection) {
+ if submissions->Submissions.needsReloading(selectedLevel, selectedCoach, sortDirection) {
setState(_ => Reloading)
getSubmissions(
@@ -260,7 +260,7 @@ let make = (
submissions,
updateSubmissionsCB,
)}>
- {"Load More..." |> str}
+ {"Load More..."->str}
}
| FullyLoaded({submissions}) => showSubmissions(submissions, selectedTab, levels, sortDirection)
diff --git a/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesStudents__CoachNote.res b/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesStudents__CoachNote.res
index c6b6e90950..412d10933d 100644
--- a/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesStudents__CoachNote.res
+++ b/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesStudents__CoachNote.res
@@ -20,17 +20,17 @@ let createdAt = t => t.createdAt
let author = t => t.author
-let noteOn = t => t.createdAt |> DateFns.format("MMMM D, YYYY")
+let noteOn = t => t.createdAt->DateFns.format("MMMM D, YYYY")
let sort = notes =>
- notes |> ArrayUtils.copyAndSort((x, y) =>
- DateFns.differenceInSeconds(y.createdAt, x.createdAt) |> int_of_float
+ notes->ArrayUtils.copyAndSort((x, y) =>
+ DateFns.differenceInSeconds(y.createdAt, x.createdAt)->int_of_float
)
let makeFromJs = note =>
make(
~id=note["id"],
~note=note["note"],
- ~createdAt=note["createdAt"] |> DateFns.parseString,
- ~author=note["author"] |> OptionUtils.map(User.makeFromJs),
+ ~createdAt=note["createdAt"]->DateFns.parseString,
+ ~author=note["author"]->OptionUtils.map(User.makeFromJs),
)
diff --git a/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesStudents__CoachNoteShow.res b/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesStudents__CoachNoteShow.res
index d6b220e0b9..bc22ce429e 100644
--- a/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesStudents__CoachNoteShow.res
+++ b/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesStudents__CoachNoteShow.res
@@ -13,15 +13,15 @@ module ArchiveCoachNoteMutation = %graphql(`
`)
let removeCoachNote = (id, removeNoteCB, setArchiving, event) => {
- event |> ReactEvent.Mouse.preventDefault
+ event->ReactEvent.Mouse.preventDefault
setArchiving(_ => true)
if {
open Webapi.Dom
- window |> Window.confirm("Are you sure you want to delete this note?")
+ window->Window.confirm("Are you sure you want to delete this note?")
} {
ArchiveCoachNoteMutation.make(~id, ())
- |> GraphqlQuery.sendQuery
- |> Js.Promise.then_(response => {
+ ->GraphqlQuery.sendQuery
+ ->Js.Promise.then_(response => {
if response["archiveCoachNote"]["success"] {
removeNoteCB(id)
} else {
@@ -29,7 +29,7 @@ let removeCoachNote = (id, removeNoteCB, setArchiving, event) => {
}
Js.Promise.resolve()
})
- |> ignore
+ ->ignore
} else {
()
}
@@ -39,20 +39,20 @@ let deleteIcon = (note, removeCoachNote, removeNoteCB, setArchiving, archiving)
@react.component
let make = (~note, ~userId, ~removeNoteCB) => {
let (archiving, setArchiving) = React.useState(() => false)
-
CoachNote.id} ariaLabel={"Note " ++ (note |> CoachNote.id)}>
+
CoachNote.id} ariaLabel={"Note " ++ (note->CoachNote.id)}>
- {switch note |> CoachNote.author {
+ {switch note->CoachNote.author {
| Some(user) =>
- switch user |> User.avatarUrl {
+ switch user->User.avatarUrl {
| Some(avatarUrl) =>
![]()
{
/>
| None =>
User.name}
+ name={user->User.name}
className="w-8 h-8 md:w-10 md:h-10 text-xs border border-gray-400 rounded-full overflow-hidden flex-shrink-0 mt-1 md:mt-0 mr-2 md:mr-3 object-cover"
/>
}
@@ -73,21 +73,21 @@ let make = (~note, ~userId, ~removeNoteCB) => {
}}
- {switch note |> CoachNote.author {
- | Some(user) => user |> User.name
+ {switch note->CoachNote.author {
+ | Some(user) => user->User.name
| None => "Deleted Coach"
- } |> str}
+ }->str}
- {switch note |> CoachNote.author {
- | Some(user) => user |> User.title
+ {switch note->CoachNote.author {
+ | Some(user) => user->User.title
| None => "Unknown"
- } |> str}
+ }->str}
{
- let showDeleteIcon = switch note |> CoachNote.author {
+ let showDeleteIcon = switch note->CoachNote.author {
| None => false
| Some(user) => User.id(user) == userId
}
@@ -99,10 +99,10 @@ let make = (~note, ~userId, ~removeNoteCB) => {
- {"on " ++ (note |> CoachNote.noteOn) |> str}
+ {"on " ++ (note->CoachNote.noteOn)->str}
CoachNote.note}
+ className="pt-1 text-sm" profile=Markdown.Permissive markdown={note->CoachNote.note}
/>
diff --git a/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesStudents__CoachNotes.res b/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesStudents__CoachNotes.res
index 5926b087e1..f975dc8627 100644
--- a/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesStudents__CoachNotes.res
+++ b/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesStudents__CoachNotes.res
@@ -30,8 +30,8 @@ module CreateCoachNotesMutation = %graphql(`
let saveNote = (studentId, setState, state, addNoteCB) => {
setState(state => {...state, saving: true})
CreateCoachNotesMutation.make(~studentId, ~note=state.newNote, ())
- |> GraphqlQuery.sendQuery
- |> Js.Promise.then_(response => {
+ ->GraphqlQuery.sendQuery
+ ->Js.Promise.then_(response => {
switch response["createCoachNote"]["coachNote"] {
| Some(note) =>
let newNote = CoachNote.makeFromJs(note)
@@ -41,17 +41,17 @@ let saveNote = (studentId, setState, state, addNoteCB) => {
}
Js.Promise.resolve()
})
- |> Js.Promise.catch(_error => {
+ ->Js.Promise.catch(_error => {
setState(state => {...state, saving: false})
Js.Promise.resolve()
})
- |> ignore
+ ->ignore
}
let updateCoachNoteCB = (setState, newNote) => setState(state => {...state, newNote: newNote})
let saveNoteButtonText = (title, iconClasses) =>
-
{title |> str}
+
{title->str}
@react.component
let make = (~studentId, ~coachNotes, ~addNoteCB, ~removeNoteCB, ~userId) => {
@@ -59,7 +59,7 @@ let make = (~studentId, ~coachNotes, ~addNoteCB, ~removeNoteCB, ~userId) => {
{
/>
-
{"All Notes" |> str}
- {coachNotes |> ArrayUtils.isEmpty
+
{"All Notes"->str}
+ {coachNotes->ArrayUtils.isEmpty
?
-
{"No notes here!" |> str}
+
{"No notes here!"->str}
: React.null}
{coachNotes
- |> CoachNote.sort
- |> Array.map(note =>
-
CoachNote.id} note userId removeNoteCB />
+ ->CoachNote.sort
+ ->Array.map(note =>
+ CoachNote.id} note userId removeNoteCB />
)
- |> React.array}
+ ->React.array}
}
diff --git a/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesStudents__Course.res b/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesStudents__Course.res
index c5f64e7189..e81d5cbe01 100644
--- a/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesStudents__Course.res
+++ b/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesStudents__Course.res
@@ -4,5 +4,5 @@ let id = t => t.id
let decode = json => {
open Json.Decode
- {id: json |> field("id", string)}
+ {id: json->field("id", string)}
}
diff --git a/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesStudents__EvaluationCriterion.res b/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesStudents__EvaluationCriterion.res
index d24d11a10b..2075da9e88 100644
--- a/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesStudents__EvaluationCriterion.res
+++ b/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesStudents__EvaluationCriterion.res
@@ -19,6 +19,6 @@ let make = (~id, ~name, ~maxGrade, ~passGrade) => {
}
let makeFromJs = ecData =>
- ecData |> Js.Array.map(ec =>
+ ecData->Js.Array.map(ec =>
make(~id=ec["id"], ~name=ec["name"], ~maxGrade=ec["maxGrade"], ~passGrade=ec["passGrade"])
)
diff --git a/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesStudents__Level.res b/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesStudents__Level.res
index 23e27df9cc..ad650cce5f 100644
--- a/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesStudents__Level.res
+++ b/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesStudents__Level.res
@@ -21,31 +21,31 @@ let teamsInLevel = t => t.teamsInLevel
let decode = json => {
open Json.Decode
{
- id: json |> field("id", string),
- name: json |> field("name", string),
- number: json |> field("number", int),
- studentsInLevel: json |> field("studentsInLevel", int),
- teamsInLevel: json |> field("teamsInLevel", int),
- unlocked: json |> field("unlocked", bool),
+ id: json->field("id", string),
+ name: json->field("name", string),
+ number: json->field("number", int),
+ studentsInLevel: json->field("studentsInLevel", int),
+ teamsInLevel: json->field("teamsInLevel", int),
+ unlocked: json->field("unlocked", bool),
}
}
let percentageStudents = (t, totalStudents) =>
float_of_int(t.studentsInLevel) /. float_of_int(totalStudents) *. 100.0
-let shortName = t => "L" ++ (t.number |> string_of_int)
+let shortName = t => "L" ++ (t.number->string_of_int)
-let sort = levels => levels |> ArrayUtils.copyAndSort((x, y) => x.number - y.number)
+let sort = levels => levels->ArrayUtils.copyAndSort((x, y) => x.number - y.number)
let unsafeLevelNumber = (levels, componentName, levelId) =>
"Level " ++
(levels
- |> ArrayUtils.unsafeFind(
+ ->ArrayUtils.unsafeFind(
l => l.id == levelId,
"Unable to find level with id: " ++ (levelId ++ (" in CoursesStudents__" ++ componentName)),
)
- |> number
- |> string_of_int)
+ ->number
+ ->string_of_int)
let levelsCompletedByAllStudents = levels => {
let rec aux = (completedLevels, levels) =>
@@ -59,6 +59,6 @@ let levelsCompletedByAllStudents = levels => {
}
}
- let ls = levels |> sort |> Array.to_list |> aux([])
- ls |> Array.length == (levels |> Array.length) ? [] : ls
+ let ls = levels->sort->Array.to_list->aux([])
+ ls->Array.length == (levels->Array.length) ? [] : ls
}
diff --git a/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesStudents__LevelDistribution.res b/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesStudents__LevelDistribution.res
index 3b4ccd07a2..f3832eef0d 100644
--- a/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesStudents__LevelDistribution.res
+++ b/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesStudents__LevelDistribution.res
@@ -6,7 +6,7 @@ let str = React.string
let stylingForLevelPills = percentageStudents => {
let emptyStyle = ReactDOMRe.Style.make()
let styleWithWidth = ReactDOMRe.Style.make(
- ~width=(percentageStudents |> Js.Float.toString) ++ "%",
+ ~width=(percentageStudents->Js.Float.toString) ++ "%",
(),
)
if 0.0 <= percentageStudents && percentageStudents < 5.0 {
@@ -26,7 +26,7 @@ let stylingForLevelPills = percentageStudents => {
@react.component
let make = (~levels, ~selectLevelCB) => {
- let totalStudentsInCourse = levels |> Array.fold_left((x, y) => x + Level.studentsInLevel(y), 0)
+ let totalStudentsInCourse = levels->Array.fold_left((x, y) => x + Level.studentsInLevel(y), 0)
let completedLevels = Level.levelsCompletedByAllStudents(levels)
totalStudentsInCourse > 0
?
{
className="w-full pt-8 max-w-3xl mx-auto hidden md:block">
{levels
- |> Js.Array.filter(level => Level.number(level) != 0)
- |> Level.sort
- |> Array.map(level => {
+ ->Js.Array.filter(level => Level.number(level) != 0)
+ ->Level.sort
+ ->Array.map(level => {
let percentageStudents = Level.percentageStudents(level, totalStudentsInCourse)
let (pillClass, style, pillColor) = stylingForLevelPills(percentageStudents)
let tip =
-
{"Level: " ++ string_of_int(Level.number(level)) |> str}
-
{"Students: " ++ string_of_int(Level.studentsInLevel(level)) |> str}
+
{"Level: " ++ string_of_int(Level.number(level))->str}
+
{"Students: " ++ string_of_int(Level.studentsInLevel(level))->str}
{Level.studentsInLevel(level) != Level.teamsInLevel(level)
- ?
{"Teams: " ++ string_of_int(Level.teamsInLevel(level)) |> str}
+ ?
{"Teams: " ++ string_of_int(Level.teamsInLevel(level))->str}
: React.null}
{"Percentage: " ++ Js.Float.toFixedWithPrecision(percentageStudents, ~digits=1)
- |> str}
+ ->str}
string_of_int)}
+ ariaLabel={"Students in level " ++ (Level.number(level)->string_of_int)}
className={"level-distribution__container text-center relative " ++ pillClass}
style>
selectLevelCB(level)}
className={"level-distribution__pill hover:shadow-inner focus:shadow-inner relative cursor-pointer border-white text-xs leading-none text-center " ++ (
- completedLevels |> Array.mem(level)
+ completedLevels->Array.mem(level)
? "bg-yellow-300 text-yellow-900"
: Level.unlocked(level)
? pillColor
: "level-distribution__pill--locked cursor-default bg-gray-300" ++ " text-gray-800"
)}>
- {completedLevels |> Array.mem(level)
+ {completedLevels->Array.mem(level)
?
:
Level.unlocked
+ className={level->Level.unlocked
? ""
: "level-distribution__team-count-value"}>
- {level |> Level.teamsInLevel |> string_of_int |> str}
+ {level->Level.teamsInLevel->string_of_int->str}
- {level |> Level.unlocked
+ {level->Level.unlocked
? React.null
:
@@ -88,7 +88,7 @@ let make = (~levels, ~selectLevelCB) => {
})
- |> React.array}
+ ->React.array}
- {message |> str}
+ {message->str}
let restoreAssignedToMeFilter = (state, send, currentTeamCoach) =>
- currentTeamCoach |> OptionUtils.mapWithDefault(currentCoach =>
+ currentTeamCoach->OptionUtils.mapWithDefault(currentCoach =>
switch state.filter.coach {
| None => restoreFilterNotice(send, currentCoach, "Now showing all students in this course.")
- | Some(selectedCoach) if selectedCoach |> Coach.id == Coach.id(currentCoach) => React.null
+ | Some(selectedCoach) if selectedCoach->Coach.id == Coach.id(currentCoach) => React.null
| Some(selectedCoach) =>
restoreFilterNotice(
send,
currentCoach,
- "Now showing students assigned to " ++ ((selectedCoach |> Coach.name) ++ "."),
+ "Now showing students assigned to " ++ ((selectedCoach->Coach.name) ++ "."),
)
}
, React.null)
@@ -303,14 +303,14 @@ let computeInitialState = currentTeamCoach => {
@react.component
let make = (~levels, ~course, ~userId, ~teamCoaches, ~currentCoach) => {
let (currentTeamCoach, _) = React.useState(() =>
- teamCoaches->Belt.Array.some(coach => coach |> Coach.id == (currentCoach |> Coach.id))
+ teamCoaches->Belt.Array.some(coach => coach->Coach.id == (currentCoach->Coach.id))
? Some(currentCoach)
: None
)
let (state, send) = React.useReducerWithMapState(reducer, currentTeamCoach, computeInitialState)
- let courseId = course |> Course.id
+ let courseId = course->Course.id
let url = ReasonReactRouter.useUrl()
@@ -335,8 +335,8 @@ let make = (~levels, ~course, ~userId, ~teamCoaches, ~currentCoach) => {
Coach.id, state)}
- selected={selected(state, currentCoach |> Coach.id)}
+ unselected={unselected(levels, teamCoaches, currentCoach->Coach.id, state)}
+ selected={selected(state, currentCoach->Coach.id)}
onSelect={onSelectFilter(send)}
onDeselect={onDeselectFilter(send)}
value=state.filterString
@@ -361,7 +361,7 @@ let make = (~levels, ~course, ~userId, ~teamCoaches, ~currentCoach) => {
send(BeginLoadingMore)
getTeams(send, courseId, Some(cursor), state.filter)
}}>
- {"Load More..." |> str}
+ {"Load More..."->str}
| Reloading => React.null
}}
diff --git a/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesStudents__StudentDetails.res b/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesStudents__StudentDetails.res
index 3f04c2c077..bc01411727 100644
--- a/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesStudents__StudentDetails.res
+++ b/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesStudents__StudentDetails.res
@@ -20,45 +20,45 @@ type t = {
let team = t => t.team
-let student = t => t.team |> CoursesStudents__TeamInfo.studentWithId(t.id)
+let student = t => t.team->CoursesStudents__TeamInfo.studentWithId(t.id)
-let name = t => t |> student |> CoursesStudents__TeamInfo.studentName
+let name = t => t->student->CoursesStudents__TeamInfo.studentName
-let title = t => t |> student |> CoursesStudents__TeamInfo.studentTitle
+let title = t => t->student->CoursesStudents__TeamInfo.studentTitle
let email = t => t.email
-let levelId = t => t.team |> CoursesStudents__TeamInfo.levelId
+let levelId = t => t.team->CoursesStudents__TeamInfo.levelId
let phone = t => t.phone
let socialLinks = t => t.socialLinks
-let avatarUrl = t => t |> student |> CoursesStudents__TeamInfo.studentAvatarUrl
+let avatarUrl = t => t->student->CoursesStudents__TeamInfo.studentAvatarUrl
let coachNotes = t => t.coachNotes
-let teamCoachUserIds = t => t.team |> CoursesStudents__TeamInfo.coachUserIds
+let teamCoachUserIds = t => t.team->CoursesStudents__TeamInfo.coachUserIds
let makeAverageGrade = gradesData =>
- gradesData |> Js.Array.map(gradeData => {
+ gradesData->Js.Array.map(gradeData => {
evaluationCriterionId: gradeData["evaluationCriterionId"],
grade: gradeData["averageGrade"],
})
-let totalTargets = t => t.totalTargets |> float_of_int
+let totalTargets = t => t.totalTargets->float_of_int
let gradeAsPercentage = (
averageGrade: averageGrade,
evaluationCriterion: CoursesStudents__EvaluationCriterion.t,
) => {
- let maxGrade = evaluationCriterion.maxGrade |> float_of_int
- averageGrade.grade /. maxGrade *. 100.0 |> int_of_float |> string_of_int
+ let maxGrade = evaluationCriterion.maxGrade->float_of_int
+ averageGrade.grade /. maxGrade *. 100.0->int_of_float->string_of_int
}
-let targetsCompleted = t => t.targetsCompleted |> float_of_int
+let targetsCompleted = t => t.targetsCompleted->float_of_int
-let quizzesAttempted = t => t.quizScores |> Array.length |> string_of_int
+let quizzesAttempted = t => t.quizScores->Array.length->string_of_int
let evaluationCriteria = t => t.evaluationCriteria
@@ -69,7 +69,7 @@ let completedLevelIds = t => t.completedLevelIds
let gradeValue = averageGrade => averageGrade.grade
let evaluationCriterionForGrade = (grade, evaluationCriteria, componentName) =>
- evaluationCriteria |> ArrayUtils.unsafeFind(
+ evaluationCriteria->ArrayUtils.unsafeFind(
ec => CoursesStudents__EvaluationCriterion.id(ec) == grade.evaluationCriterionId,
"Unable to find evaluation criterion with id: " ++
(grade.evaluationCriterionId ++
@@ -82,43 +82,43 @@ let addNewNote = (note, t) => {
}
let removeNote = (noteId, t) => {
- let notes = t.coachNotes |> Js.Array.filter(note => CoursesStudents__CoachNote.id(note) != noteId)
+ let notes = t.coachNotes->Js.Array.filter(note => CoursesStudents__CoachNote.id(note) != noteId)
{...t, coachNotes: notes}
}
let computeAverageQuizScore = quizScores => {
let sumOfPercentageScores =
quizScores
- |> Array.map(quizScore => {
- let fractionArray = quizScore |> String.split_on_char('/') |> Array.of_list
+ ->Array.map(quizScore => {
+ let fractionArray = quizScore->String.split_on_char('/')->Array.of_list
let (numerator, denominator) = (
- fractionArray[0] |> float_of_string,
- fractionArray[1] |> float_of_string,
+ fractionArray[0]->float_of_string,
+ fractionArray[1]->float_of_string,
)
numerator /. denominator *. 100.0
})
- |> Js.Array.reduce((a, b) => a +. b, 0.0)
- sumOfPercentageScores /. (quizScores |> Array.length |> float_of_int)
+ ->Js.Array.reduce((a, b) => a +. b, 0.0)
+ sumOfPercentageScores /. (quizScores->Array.length->float_of_int)
}
let averageQuizScore = t =>
- t.quizScores |> ArrayUtils.isEmpty ? None : Some(computeAverageQuizScore(t.quizScores))
+ t.quizScores->ArrayUtils.isEmpty ? None : Some(computeAverageQuizScore(t.quizScores))
let makeFromJs = (id, studentDetails) => {
id: id,
email: studentDetails["email"],
phone: studentDetails["phone"],
- coachNotes: studentDetails["coachNotes"] |> Js.Array.map(note =>
- note |> CoursesStudents__CoachNote.makeFromJs
+ coachNotes: studentDetails["coachNotes"]->Js.Array.map(note =>
+ note->CoursesStudents__CoachNote.makeFromJs
),
- evaluationCriteria: studentDetails["evaluationCriteria"] |> CoursesStudents__EvaluationCriterion.makeFromJs,
+ evaluationCriteria: studentDetails["evaluationCriteria"]->CoursesStudents__EvaluationCriterion.makeFromJs,
socialLinks: studentDetails["socialLinks"],
totalTargets: studentDetails["totalTargets"],
targetsCompleted: studentDetails["targetsCompleted"],
quizScores: studentDetails["quizScores"],
- averageGrades: studentDetails["averageGrades"] |> makeAverageGrade,
+ averageGrades: studentDetails["averageGrades"]->makeAverageGrade,
completedLevelIds: studentDetails["completedLevelIds"],
- team: studentDetails["team"] |> CoursesStudents__TeamInfo.makeFromJS,
+ team: studentDetails["team"]->CoursesStudents__TeamInfo.makeFromJS,
}
-let teamHasManyStudents = t => t.team |> CoursesStudents__TeamInfo.students |> Array.length > 1
+let teamHasManyStudents = t => t.team->CoursesStudents__TeamInfo.students->Array.length > 1
diff --git a/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesStudents__StudentOverlay.res b/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesStudents__StudentOverlay.res
index c80f8a1c3e..d893793281 100644
--- a/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesStudents__StudentOverlay.res
+++ b/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesStudents__StudentOverlay.res
@@ -73,18 +73,18 @@ module StudentDetailsQuery = %graphql(`
let updateStudentDetails = (setState, studentId, details) =>
setState(state => {
...state,
- studentData: Loaded(details |> StudentDetails.makeFromJs(studentId)),
+ studentData: Loaded(details->StudentDetails.makeFromJs(studentId)),
})
let getStudentDetails = (studentId, setState, ()) => {
setState(state => {...state, studentData: Loading})
StudentDetailsQuery.make(~studentId, ())
- |> GraphqlQuery.sendQuery
- |> Js.Promise.then_(response => {
- response["studentDetails"] |> updateStudentDetails(setState, studentId)
+ ->GraphqlQuery.sendQuery
+ ->Js.Promise.then_(response => {
+ response["studentDetails"]->updateStudentDetails(setState, studentId)
Js.Promise.resolve()
})
- |> ignore
+ ->ignore
None
}
@@ -104,21 +104,21 @@ let doughnutChart = (color, percentage) =>
d="M18 2.0845 a 15.9155 15.9155 0 0 1 0 31.831 a 15.9155 15.9155 0 0 1 0 -31.831"
/>
- {percentage ++ "%" |> str}
+ {percentage ++ "%"->str}
let targetsCompletionStatus = (targetsCompleted, totalTargets) => {
let targetCompletionPercent =
- targetsCompleted /. totalTargets *. 100.0 |> int_of_float |> string_of_int
+ targetsCompleted /. totalTargets *. 100.0->int_of_float->string_of_int
{doughnutChart("purple", targetCompletionPercent)}
-
{"Total Targets Completed" |> str}
+
{"Total Targets Completed"->str}
- {(targetsCompleted |> int_of_float |> string_of_int) ++
+ {(targetsCompleted->int_of_float->string_of_int) ++
("/" ++
- ((totalTargets |> int_of_float |> string_of_int) ++ " Targets")) |> str}
+ ((totalTargets->int_of_float->string_of_int) ++ " Targets"))->str}
@@ -129,10 +129,10 @@ let quizPerformanceChart = (averageQuizScore, quizzesAttempted) =>
| Some(score) =>
- {doughnutChart("pink", score |> int_of_float |> string_of_int)}
-
{"Average Quiz Score" |> str}
+ {doughnutChart("pink", score->int_of_float->string_of_int)}
+
{"Average Quiz Score"->str}
- {quizzesAttempted ++ " Quizzes Attempted" |> str}
+ {quizzesAttempted ++ " Quizzes Attempted"->str}
@@ -144,18 +144,18 @@ let averageGradeCharts = (
averageGrades: array,
) =>
averageGrades
- |> Array.map(grade => {
+ ->Array.map(grade => {
let criterion = StudentDetails.evaluationCriterionForGrade(
grade,
evaluationCriteria,
"CoursesStudents__StudentOverlay",
)
- let passGrade = criterion |> CoursesStudents__EvaluationCriterion.passGrade |> float_of_int
- let averageGrade = grade |> StudentDetails.gradeValue
+ let passGrade = criterion->CoursesStudents__EvaluationCriterion.passGrade->float_of_int
+ let averageGrade = grade->StudentDetails.gradeValue
CoursesStudents__EvaluationCriterion.id)}
- key={criterion |> CoursesStudents__EvaluationCriterion.id}
+ (criterion->CoursesStudents__EvaluationCriterion.id)}
+ key={criterion->CoursesStudents__EvaluationCriterion.id}
className="flex w-full lg:w-1/2 px-2 mt-2">
@@ -179,33 +179,33 @@ let averageGradeCharts = (
/>
- {(grade.grade |> Js.Float.toString) ++ ("/" ++ (criterion.maxGrade |> string_of_int))
- |> str}
+ {(grade.grade->Js.Float.toString) ++ ("/" ++ (criterion.maxGrade->string_of_int))
+ ->str}
- {criterion |> CoursesStudents__EvaluationCriterion.name |> str}
+ {criterion->CoursesStudents__EvaluationCriterion.name->str}
-
{studentDetails |> StudentDetails.email |> str}
+
{studentDetails->StudentDetails.email->str}
- {switch studentDetails |> StudentDetails.phone {
+ {switch studentDetails->StudentDetails.phone {
| Some(phone) =>
-
{phone |> str}
+
{phone->str}
| None => React.null
}}
{
- let socialLinks = studentDetails |> StudentDetails.socialLinks
- socialLinks |> ArrayUtils.isNotEmpty ? showSocialLinks(socialLinks) : React.null
+ let socialLinks = studentDetails->StudentDetails.socialLinks
+ socialLinks->ArrayUtils.isNotEmpty ? showSocialLinks(socialLinks) : React.null
}
@@ -260,25 +260,25 @@ let studentLevelClasses = (levelNumber, levelCompleted, currentLevelNumber) => {
}
let levelProgressBar = (levelId, levels, levelsCompleted) => {
- let applicableLevels = levels |> Js.Array.filter(level => Level.number(level) != 0)
+ let applicableLevels = levels->Js.Array.filter(level => Level.number(level) != 0)
let courseCompleted =
- applicableLevels |> Array.for_all(level => levelsCompleted |> Array.mem(level |> Level.id))
+ applicableLevels->Array.for_all(level => levelsCompleted->Array.mem(level->Level.id))
let currentLevelNumber =
applicableLevels
- |> ArrayUtils.unsafeFind(
+ ->ArrayUtils.unsafeFind(
level => Level.id(level) == levelId,
"Unable to find level with id" ++ (levelId ++ "in StudentOverlay"),
)
- |> Level.number
+ ->Level.number
-
{"Level Progress" |> str}
+
{"Level Progress"->str}
{courseCompleted
?
- {`🎉` |> str} {"Course Completed!" |> str}
+ {`🎉`->str} {"Course Completed!"->str}
: React.null}
@@ -288,21 +288,21 @@ let levelProgressBar = (levelId, levels, levelsCompleted) => {
courseCompleted ? "student-overlay__student-level-progress--completed" : ""
)}>
{applicableLevels
- |> Level.sort
- |> Array.map(level => {
- let levelNumber = level |> Level.number
- let levelCompleted = levelsCompleted |> Array.mem(level |> Level.id)
+ ->Level.sort
+ ->Array.map(level => {
+ let levelNumber = level->Level.number
+ let levelCompleted = levelsCompleted->Array.mem(level->Level.id)
Level.id}
+ key={level->Level.id}
className={"flex-1 student-overlay__student-level " ++
studentLevelClasses(levelNumber, levelCompleted, currentLevelNumber)}>
- {levelNumber |> string_of_int |> str}
+ {levelNumber->string_of_int->str}
})
- |> React.array}
+ ->React.array}
@@ -324,30 +324,30 @@ let userInfo = (~key, ~avatarUrl, ~name, ~title) =>
{CoursesStudents__TeamCoaches.avatar(avatarUrl, name)}
-
{name |> str}
-
{title |> str}
+
{name->str}
+
{title->str}
let coachInfo = (teamCoaches, studentDetails) => {
- let coaches = studentDetails |> StudentDetails.team |> TeamInfo.coaches(teamCoaches)
+ let coaches = studentDetails->StudentDetails.team->TeamInfo.coaches(teamCoaches)
let title =
- studentDetails |> StudentDetails.teamHasManyStudents ? "Team Coaches" : "Personal Coaches"
+ studentDetails->StudentDetails.teamHasManyStudents ? "Team Coaches" : "Personal Coaches"
- coaches |> ArrayUtils.isNotEmpty
+ coaches->ArrayUtils.isNotEmpty
?
-
{title |> str}
+ {title->str}
{coaches
- |> Array.map(coach =>
+ ->Array.map(coach =>
userInfo(
- ~key=coach |> Coach.userId,
- ~avatarUrl=coach |> Coach.avatarUrl,
- ~name=coach |> Coach.name,
- ~title=coach |> Coach.title,
+ ~key=coach->Coach.userId,
+ ~avatarUrl=coach->Coach.avatarUrl,
+ ~name=coach->Coach.name,
+ ~title=coach->Coach.title,
)
)
- |> React.array}
+ ->React.array}
: React.null
}
@@ -355,58 +355,58 @@ let coachInfo = (teamCoaches, studentDetails) => {
let navigateToStudent = (setState, _event) => setState(_ => initialState)
let otherTeamMembers = (setState, studentId, studentDetails) =>
- if studentDetails |> StudentDetails.teamHasManyStudents {
+ if studentDetails->StudentDetails.teamHasManyStudents {
-
{"Other Team Members" |> str}
+ {"Other Team Members"->str}
{studentDetails
- |> StudentDetails.team
- |> TeamInfo.otherStudents(studentId)
- |> Array.map(student => {
- let path = "/students/" ++ ((student |> TeamInfo.studentId) ++ "/report")
+ ->StudentDetails.team
+ ->TeamInfo.otherStudents(studentId)
+ ->Array.map(student => {
+ let path = "/students/" ++ ((student->TeamInfo.studentId) ++ "/report")
TeamInfo.studentId}>
+ key={student->TeamInfo.studentId}>
{userInfo(
- ~key=student |> TeamInfo.studentId,
- ~avatarUrl=student |> TeamInfo.studentAvatarUrl,
- ~name=student |> TeamInfo.studentName,
- ~title=student |> TeamInfo.studentTitle,
+ ~key=student->TeamInfo.studentId,
+ ~avatarUrl=student->TeamInfo.studentAvatarUrl,
+ ~name=student->TeamInfo.studentName,
+ ~title=student->TeamInfo.studentTitle,
)}
})
- |> React.array}
+ ->React.array}
} else {
React.null
}
let inactiveWarning = teamInfo => {
- let warning = switch (teamInfo |> TeamInfo.droppedOutAt, teamInfo |> TeamInfo.accessEndsAt) {
+ let warning = switch (teamInfo->TeamInfo.droppedOutAt, teamInfo->TeamInfo.accessEndsAt) {
| (Some(droppedOutAt), _) =>
Some(
"This student dropped out of the course on " ++
- ((droppedOutAt |> DateTime.format(DateTime.OnlyDate)) ++
+ ((droppedOutAt->DateTime.format(DateTime.OnlyDate)) ++
"."),
)
| (None, Some(accessEndsAt)) =>
- accessEndsAt |> DateFns.isPast
+ accessEndsAt->DateFns.isPast
? Some(
"This student's access to the course ended on " ++
- ((accessEndsAt |> DateTime.format(DateTime.OnlyDate)) ++
+ ((accessEndsAt->DateTime.format(DateTime.OnlyDate)) ++
"."),
)
: None
| (None, None) => None
}
- warning |> OptionUtils.mapWithDefault(
+ warning->OptionUtils.mapWithDefault(
warning =>
- {warning |> str}
+ {warning->str}
,
React.null,
)
@@ -438,46 +438,46 @@ let make = (~courseId, ~studentId, ~levels, ~userId, ~teamCoaches) => {
- {switch studentDetails |> StudentDetails.avatarUrl {
+ {switch studentDetails->StudentDetails.avatarUrl {
| Some(avatarUrl) =>
| None =>
-
StudentDetails.name} className="object-cover" />
+ StudentDetails.name} className="object-cover" />
}}
- {studentDetails |> StudentDetails.name |> str}
+ {studentDetails->StudentDetails.name->str}
- {studentDetails |> StudentDetails.title |> str}
+ {studentDetails->StudentDetails.title->str}
{personalInfo(studentDetails)}
- {inactiveWarning(studentDetails |> StudentDetails.team)}
+ {inactiveWarning(studentDetails->StudentDetails.team)}
{levelProgressBar(
- studentDetails |> StudentDetails.levelId,
+ studentDetails->StudentDetails.levelId,
levels,
- studentDetails |> StudentDetails.completedLevelIds,
+ studentDetails->StudentDetails.completedLevelIds,
)}
-
{"Targets Overview" |> str}
+
{"Targets Overview"->str}
{targetsCompletionStatus(
- studentDetails |> StudentDetails.targetsCompleted,
- studentDetails |> StudentDetails.totalTargets,
+ studentDetails->StudentDetails.targetsCompleted,
+ studentDetails->StudentDetails.totalTargets,
)}
{quizPerformanceChart(
- studentDetails |> StudentDetails.averageQuizScore,
- studentDetails |> StudentDetails.quizzesAttempted,
+ studentDetails->StudentDetails.averageQuizScore,
+ studentDetails->StudentDetails.quizzesAttempted,
)}
- {studentDetails |> StudentDetails.averageGrades |> ArrayUtils.isNotEmpty
+ {studentDetails->StudentDetails.averageGrades->ArrayUtils.isNotEmpty
?
-
{"Average Grades" |> str}
+
{"Average Grades"->str}
{averageGradeCharts(
- studentDetails |> StudentDetails.evaluationCriteria,
- studentDetails |> StudentDetails.averageGrades,
+ studentDetails->StudentDetails.evaluationCriteria,
+ studentDetails->StudentDetails.averageGrades,
)}
@@ -497,7 +497,7 @@ let make = (~courseId, ~studentId, ~levels, ~userId, ~teamCoaches) => {
| Notes => "border-b-3 border-primary-500 text-primary-500 -mb-px"
| Submissions => "hover:bg-gray-200 hover:text-gray-900"
}}>
- {"Notes" |> str}
+ {"Notes"->str}
setSelectedTab(Submissions, setState)}
@@ -506,7 +506,7 @@ let make = (~courseId, ~studentId, ~levels, ~userId, ~teamCoaches) => {
| Submissions => "border-b-3 border-primary-500 text-primary-500 -mb-px"
| Notes => "hover:bg-gray-200 hover:text-gray-900"
}}>
- {"Submissions" |> str}
+ {"Submissions"->str}
@@ -515,7 +515,7 @@ let make = (~courseId, ~studentId, ~levels, ~userId, ~teamCoaches) => {
| Notes =>
StudentDetails.coachNotes}
+ coachNotes={studentDetails->StudentDetails.coachNotes}
addNoteCB={addNoteCB(setState, studentDetails)}
userId
removeNoteCB={removeNoteCB(setState, studentDetails)}
diff --git a/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesStudents__Submission.res b/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesStudents__Submission.res
index 2430d3966f..3feca58dca 100644
--- a/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesStudents__Submission.res
+++ b/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesStudents__Submission.res
@@ -21,8 +21,8 @@ let levelId = t => t.levelId
let title = t => t.title
let sort = submissions =>
- submissions |> ArrayUtils.copyAndSort((x, y) =>
- DateFns.differenceInSeconds(y.createdAt, x.createdAt) |> int_of_float
+ submissions->ArrayUtils.copyAndSort((x, y) =>
+ DateFns.differenceInSeconds(y.createdAt, x.createdAt)->int_of_float
)
let failed = t =>
@@ -31,15 +31,15 @@ let failed = t =>
| None => true
}
-let createdAtPretty = t => t.createdAt |> DateFns.format("MMMM D, YYYY")
+let createdAtPretty = t => t.createdAt->DateFns.format("MMMM D, YYYY")
let makeFromJs = submissions =>
- submissions |> Js.Array.map(submission =>
+ submissions->Js.Array.map(submission =>
switch submission {
| Some(submission) =>
- let createdAt = submission["createdAt"] |> Json.Decode.string |> DateFns.parseString
+ let createdAt = submission["createdAt"]->Json.Decode.string->DateFns.parseString
let passedAt = switch submission["passedAt"] {
- | Some(passedAt) => Some(passedAt |> Json.Decode.string |> DateFns.parseString)
+ | Some(passedAt) => Some(passedAt->Json.Decode.string->DateFns.parseString)
| None => None
}
list{
diff --git a/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesStudents__SubmissionsList.res b/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesStudents__SubmissionsList.res
index 0cc571c7d3..f5dbfac861 100644
--- a/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesStudents__SubmissionsList.res
+++ b/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesStudents__SubmissionsList.res
@@ -38,8 +38,8 @@ let updateStudentSubmissions = (
let updatedSubmissions = Array.append(
switch nodes {
| None => []
- | Some(submissionsArray) => submissionsArray |> Submission.makeFromJs
- } |> ArrayUtils.flatten,
+ | Some(submissionsArray) => submissionsArray->Submission.makeFromJs
+ }->ArrayUtils.flatten,
submissions,
)
@@ -60,9 +60,9 @@ let getStudentSubmissions = (studentId, cursor, setState, submissions, updateSub
| Some(cursor) => StudentSubmissionsQuery.make(~studentId, ~after=cursor, ())
| None => StudentSubmissionsQuery.make(~studentId, ())
}
- |> GraphqlQuery.sendQuery
- |> Js.Promise.then_(response => {
- response["studentSubmissions"]["nodes"] |> updateStudentSubmissions(
+ ->GraphqlQuery.sendQuery
+ ->Js.Promise.then_(response => {
+ response["studentSubmissions"]["nodes"]->updateStudentSubmissions(
setState,
updateSubmissionsCB,
response["studentSubmissions"]["pageInfo"]["endCursor"],
@@ -71,70 +71,70 @@ let getStudentSubmissions = (studentId, cursor, setState, submissions, updateSub
)
Js.Promise.resolve()
})
- |> ignore
+ ->ignore
}
let showSubmissionStatus = failed =>
failed
?
- {"Failed" |> str}
+ {"Failed"->str}
:
- {"Passed" |> str}
+ {"Passed"->str}
let submissionCardClasses = submission =>
"flex flex-col md:flex-row items-start md:items-center justify-between bg-white border-l-3 p-3 md:py-6 md:px-5 mt-4 cursor-pointer rounded-r-lg shadow hover:border-primary-500 hover:text-primary-500 hover:shadow-md " ++ (
- submission |> Submission.failed ? "border-red-500" : "border-green-500"
+ submission->Submission.failed ? "border-red-500" : "border-green-500"
)
let showSubmission = (submissions, levels) =>
let showSubmissions = (submissions, levels) =>
- submissions |> ArrayUtils.isEmpty
+ submissions->ArrayUtils.isEmpty
?
- {"No Reviewed Submission" |> str}
+ {"No Reviewed Submission"->str}
@@ -170,7 +170,7 @@ let make = (~studentId, ~levels, ~submissions, ~updateSubmissionsCB) => {
submissions,
updateSubmissionsCB,
)}>
- {"Load More..." |> str}
+ {"Load More..."->str}
}
| FullyLoaded(submissions) => showSubmissions(submissions, levels)
diff --git a/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesStudents__TeamCoaches.res b/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesStudents__TeamCoaches.res
index 5c5b2843eb..9f217d4543 100644
--- a/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesStudents__TeamCoaches.res
+++ b/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesStudents__TeamCoaches.res
@@ -28,20 +28,20 @@ let make = (
~className,
~coaches,
) =>
- if coaches |> ArrayUtils.isNotEmpty {
+ if coaches->ArrayUtils.isNotEmpty {
let listedCoaches =
- coaches |> Array.length <= 4 ? coaches : coaches |> Js.Array.slice(~start=0, ~end_=3)
+ coaches->Array.length <= 4 ? coaches : coaches->Js.Array.slice(~start=0, ~end_=3)
- let otherCoaches = if coaches |> Array.length > 4 {
+ let otherCoaches = if coaches->Array.length > 4 {
let names =
coaches
- |> Js.Array.sliceFrom(3)
- |> Js.Array.map(coach =>
-
UserProxy.userId}> {coach |> UserProxy.name |> str}
+ ->Js.Array.sliceFrom(3)
+ ->Js.Array.map(coach =>
+
UserProxy.userId}> {coach->UserProxy.name->str}
)
- |> React.array
+ ->React.array
- let count = (coaches |> Array.length) - 3
+ let count = (coaches->Array.length) - 3
Some((names, count))
} else {
None
@@ -51,25 +51,25 @@ let make = (
title
{listedCoaches
- |> Array.map(coach =>
+ ->Array.map(coach =>
UserProxy.name |> str}
+ tip={coach->UserProxy.name->str}
className="-mr-1"
- key={coach |> UserProxy.userId}>
+ key={coach->UserProxy.userId}>
{avatar(
~size=(defaultAvatarSize, mdAvatarSize),
- coach |> UserProxy.avatarUrl,
- coach |> UserProxy.name,
+ coach->UserProxy.avatarUrl,
+ coach->UserProxy.name,
)}
)
- |> React.array}
- {otherCoaches |> OptionUtils.mapWithDefault(
+ ->React.array}
+ {otherCoaches->OptionUtils.mapWithDefault(
((names, count)) =>
string_of_int)}
+ name={"+ " ++ (count->string_of_int)}
className={avatarClasses((defaultAvatarSize, mdAvatarSize))}
colors=("#EEE", "#000")
/>
diff --git a/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesStudents__TeamInfo.res b/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesStudents__TeamInfo.res
index c936cb8d25..d80a0b04d0 100644
--- a/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesStudents__TeamInfo.res
+++ b/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesStudents__TeamInfo.res
@@ -39,7 +39,7 @@ let droppedOutAt = t => t.droppedOutAt
let accessEndsAt = t => t.accessEndsAt
let studentWithId = (studentId, t) =>
- t.students |> ArrayUtils.unsafeFind(
+ t.students->ArrayUtils.unsafeFind(
(student: student) => student.id == studentId,
"Could not find student with ID " ++ (studentId ++ (" in team with ID " ++ t.id)),
)
@@ -63,7 +63,7 @@ let make = (~id, ~name, ~levelId, ~students, ~coachUserIds, ~droppedOutAt, ~acce
let makeFromJS = teamDetails => {
let students =
- teamDetails["students"] |> Array.map(student =>
+ teamDetails["students"]->Array.map(student =>
makeStudent(
~id=student["id"],
~name=student["name"],
@@ -78,8 +78,8 @@ let makeFromJS = teamDetails => {
~levelId=teamDetails["levelId"],
~students,
~coachUserIds=teamDetails["coachUserIds"],
- ~droppedOutAt=teamDetails["droppedOutAt"] |> OptionUtils.map(DateTime.decode),
- ~accessEndsAt=teamDetails["accessEndsAt"] |> OptionUtils.map(DateTime.decode),
+ ~droppedOutAt=teamDetails["droppedOutAt"]->OptionUtils.map(DateTime.decode),
+ ~accessEndsAt=teamDetails["accessEndsAt"]->OptionUtils.map(DateTime.decode),
)
}
@@ -87,9 +87,9 @@ let makeArrayFromJs = detailsOfTeams =>
detailsOfTeams->Belt.Array.keepMap(OptionUtils.map(makeFromJS))
let otherStudents = (studentId, t) =>
- t.students |> Js.Array.filter((student: student) => student.id != studentId)
+ t.students->Js.Array.filter((student: student) => student.id != studentId)
let coaches = (allTeamCoaches, t) =>
- allTeamCoaches |> Js.Array.filter(teamCoach =>
- t |> coachUserIds |> Array.mem(teamCoach |> UserProxy.userId)
+ allTeamCoaches->Js.Array.filter(teamCoach =>
+ t->coachUserIds->Array.mem(teamCoach->UserProxy.userId)
)
diff --git a/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesStudents__TeamsList.res b/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesStudents__TeamsList.res
index 37428a3d75..cfb72da449 100644
--- a/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesStudents__TeamsList.res
+++ b/tests/syntax_tests/data/idempotency/pupilfirst/courses/CoursesStudents__TeamsList.res
@@ -7,102 +7,102 @@ let str = React.string
let levelInfo = (levelId, levels) =>
- {"Level" |> str}
+ {"Level"->str}
{levels
- |> ArrayUtils.unsafeFind(
+ ->ArrayUtils.unsafeFind(
(l: Level.t) => l.id == levelId,
"Unable to find level with id: " ++ (levelId ++ "in CoursesStudents__TeamsList"),
)
- |> Level.number
- |> string_of_int
- |> str}
+ ->Level.number
+ ->string_of_int
+ ->str}
let showStudent = (team, levels, teamCoaches) => {
let student = TeamInfo.students(team)[0]
TeamInfo.studentId) ++ "/report")}
- key={student |> TeamInfo.studentId}
- ariaLabel={"student-card-" ++ (student |> TeamInfo.studentId)}
+ href={"/students/" ++ ((student->TeamInfo.studentId) ++ "/report")}
+ key={student->TeamInfo.studentId}
+ ariaLabel={"student-card-" ++ (student->TeamInfo.studentId)}
className="flex md:flex-row justify-between bg-white mt-4 rounded-lg shadow cursor-pointer hover:border-primary-500 hover:text-primary-500 hover:shadow-md">
{CoursesStudents__TeamCoaches.avatar(
- student |> TeamInfo.studentAvatarUrl,
- student |> TeamInfo.studentName,
+ student->TeamInfo.studentAvatarUrl,
+ student->TeamInfo.studentName,
)}
- {student |> TeamInfo.studentName |> str}
+ {student->TeamInfo.studentName->str}
- {student |> TeamInfo.studentTitle |> str}
+ {student->TeamInfo.studentTitle->str}
TeamInfo.id)}
+ ariaLabel={"team-level-info-" ++ (team->TeamInfo.id)}
className="w-2/5 flex items-center justify-end md:justify-between p-3 md:p-4">
{"Personal Coaches" |> str}
}
+ title={ {"Personal Coaches"->str}
}
className="hidden md:inline-block"
coaches=teamCoaches
/>
- {levelInfo(team |> TeamInfo.levelId, levels)}
+ {levelInfo(team->TeamInfo.levelId, levels)}
}
let showTeam = (team, levels, teamCoaches) =>
TeamInfo.id}
- ariaLabel={"Info of team " ++ (team |> TeamInfo.id)}
+ key={team->TeamInfo.id}
+ ariaLabel={"Info of team " ++ (team->TeamInfo.id)}
className="flex shadow bg-white rounded-lg mt-4 overflow-hidden flex-col-reverse md:flex-row">
{team
- |> TeamInfo.students
- |> Array.map(student =>
+ ->TeamInfo.students
+ ->Array.map(student =>
TeamInfo.studentId) ++ "/report")}
- key={student |> TeamInfo.studentId}
- ariaLabel={"student-card-" ++ (student |> TeamInfo.studentId)}
+ href={"/students/" ++ ((student->TeamInfo.studentId) ++ "/report")}
+ key={student->TeamInfo.studentId}
+ ariaLabel={"student-card-" ++ (student->TeamInfo.studentId)}
className="flex items-center bg-white cursor-pointer hover:border-primary-500 hover:text-primary-500 hover:bg-gray-100">
{CoursesStudents__TeamCoaches.avatar(
- student |> TeamInfo.studentAvatarUrl,
- student |> TeamInfo.studentName,
+ student->TeamInfo.studentAvatarUrl,
+ student->TeamInfo.studentName,
)}
- {student |> TeamInfo.studentName |> str}
+ {student->TeamInfo.studentName->str}
- {student |> TeamInfo.studentTitle |> str}
+ {student->TeamInfo.studentTitle->str}
)
- |> React.array}
+ ->React.array}
-
{"Team" |> str}
-
{team |> TeamInfo.name |> str}
+
{"Team"->str}
+
{team->TeamInfo.name->str}
{"Team Coaches" |> str} }
+ title={
{"Team Coaches"->str}
}
className="hidden md:inline-block mt-3"
coaches=teamCoaches
/>
-
TeamInfo.id)} className="flex-shrink-0">
- {levelInfo(team |> TeamInfo.levelId, levels)}
+
TeamInfo.id)} className="flex-shrink-0">
+ {levelInfo(team->TeamInfo.levelId, levels)}
@@ -110,19 +110,19 @@ let showTeam = (team, levels, teamCoaches) =>
@react.component
let make = (~levels, ~teams, ~teamCoaches) =>
- {teams |> ArrayUtils.isEmpty
+ {teams->ArrayUtils.isEmpty
?
- {"No teams to show" |> str}
+ {"No teams to show"->str}
: teams
- |> Array.map(team => {
- let coaches = team |> TeamInfo.coaches(teamCoaches)
+ ->Array.map(team => {
+ let coaches = team->TeamInfo.coaches(teamCoaches)
- Array.length(team |> TeamInfo.students) == 1
+ Array.length(team->TeamInfo.students) == 1
? showStudent(team, levels, coaches)
: showTeam(team, levels, coaches)
})
- |> React.array}
+ ->React.array}
diff --git a/tests/syntax_tests/data/idempotency/pupilfirst/courses/SubmissionChecklistItem.res b/tests/syntax_tests/data/idempotency/pupilfirst/courses/SubmissionChecklistItem.res
index 2b261187f7..0c361b7812 100644
--- a/tests/syntax_tests/data/idempotency/pupilfirst/courses/SubmissionChecklistItem.res
+++ b/tests/syntax_tests/data/idempotency/pupilfirst/courses/SubmissionChecklistItem.res
@@ -33,7 +33,7 @@ let make = (~title, ~result, ~status) => {title: title, result: result, status:
let makeFile = (~name, ~url, ~id) => {name: name, url: url, id: id}
let makeFiles = data =>
- data |> Js.Array.map(a => makeFile(~url=a["url"], ~name=a["title"], ~id=a["id"]))
+ data->Js.Array.map(a => makeFile(~url=a["url"], ~name=a["title"], ~id=a["id"]))
let makeResult = (result, kind, files) =>
switch kind {
@@ -62,7 +62,7 @@ let makeStatus = data =>
}
let makeArrayFromJs = (files, checklist) =>
- checklist |> Js.Array.map(c =>
+ checklist->Js.Array.map(c =>
make(
~title=c["title"],
~result=makeResult(c["result"], c["kind"], makeFiles(files)),
@@ -73,23 +73,23 @@ let makeArrayFromJs = (files, checklist) =>
let decodeFile = json => {
open Json.Decode
{
- name: json |> field("name", string),
- url: json |> field("url", string),
- id: json |> field("id", string),
+ name: json->field("name", string),
+ url: json->field("url", string),
+ id: json->field("id", string),
}
}
let decode = (files, json) => {
open Json.Decode
{
- result: makeResult(json |> field("result", string), json |> field("kind", string), files),
- status: makeStatus(json |> field("status", string)),
- title: json |> field("title", string),
+ result: makeResult(json->field("result", string), json->field("kind", string), files),
+ status: makeStatus(json->field("status", string)),
+ title: json->field("title", string),
}
}
let updateStatus = (checklist, index, status) =>
- checklist |> Array.mapi((i, t) =>
+ checklist->Array.mapi((i, t) =>
i == index ? make(~title=t.title, ~result=t.result, ~status) : t
)
@@ -127,15 +127,15 @@ let encodeStatus = t =>
let encode = t => {
open Json.Encode
object_(list{
- ("title", t.title |> string),
- ("kind", encodeKind(t) |> string),
- ("status", encodeStatus(t) |> string),
- ("result", encodeResult(t) |> string),
+ ("title", t.title->string),
+ ("kind", encodeKind(t)->string),
+ ("status", encodeStatus(t)->string),
+ ("result", encodeResult(t)->string),
})
}
let encodeArray = checklist =>
- checklist |> {
+ checklist->{
open Json.Encode
array(encode)
}
diff --git a/tests/syntax_tests/data/idempotency/pupilfirst/courses/SubmissionChecklistItemShow.res b/tests/syntax_tests/data/idempotency/pupilfirst/courses/SubmissionChecklistItemShow.res
index 60fd0249ce..3f80f8fd12 100644
--- a/tests/syntax_tests/data/idempotency/pupilfirst/courses/SubmissionChecklistItemShow.res
+++ b/tests/syntax_tests/data/idempotency/pupilfirst/courses/SubmissionChecklistItemShow.res
@@ -16,22 +16,22 @@ let kindIconClasses = result =>
let showFiles = files =>
let showlink = link =>
@@ -41,7 +41,7 @@ let showlink = link =>
className="max-w-fc mt-1 mr-3 flex border overflow-hidden rounded hover:shadow-md border-indigo-400 bg-white text-indigo-700 hover:border-blue-600 hover:text-indigo-800">
- {link |> str}
+ {link->str}
@@ -61,11 +61,11 @@ let showStatus = status =>
switch (status: ChecklistItem.status) {
| Passed =>
- {"Correct" |> str}
+ {"Correct"->str}
| Failed =>
- {"Incorrect" |> str}
+ {"Incorrect"->str}
| NoAnswer => React.null
}
@@ -91,8 +91,8 @@ let statusButtonIcon = bool =>
let statusButtonOnClick = (bool, callback, checklist, index, _event) =>
bool
- ? callback(checklist |> ChecklistItem.makeNoAnswer(index))
- : callback(checklist |> ChecklistItem.makeFailed(index))
+ ? callback(checklist->ChecklistItem.makeNoAnswer(index))
+ : callback(checklist->ChecklistItem.makeFailed(index))
let statusButton = (index, status, callback, checklist) =>
@@ -103,12 +103,12 @@ let statusButton = (index, status, callback, checklist) =>
-
{"Mark as incorrect" |> str}
+
{"Mark as incorrect"->str}
ChecklistItem.title}
+ ariaLabel={checklistItem->ChecklistItem.title}
onClick={_ => setShowResult(_ => true)}>
{statusIcon(updateChecklistCB, status)}
-
ChecklistItem.result)} />
- {checklistItem |> ChecklistItem.title |> str}
+ ChecklistItem.result)} />
+ {checklistItem->ChecklistItem.title->str}
{showResult ? showStatus(status) :
}
@@ -152,11 +152,11 @@ let make = (~index, ~checklistItem, ~updateChecklistCB, ~checklist, ~pending) =>
{showResult
?
- {switch checklistItem |> ChecklistItem.result {
- | ShortText(text) =>
{text |> str}
+ {switch checklistItem->ChecklistItem.result {
+ | ShortText(text) =>
{text->str}
| LongText(markdown) =>
| Link(link) => showlink(link)
- | MultiChoice(text) =>
{text |> str}
+ | MultiChoice(text) =>
{text->str}
| Files(files) => showFiles(files)
}}
diff --git a/tests/syntax_tests/data/idempotency/pupilfirst/courses/SubmissionChecklistShow.res b/tests/syntax_tests/data/idempotency/pupilfirst/courses/SubmissionChecklistShow.res
index 405b2eadfc..4fb444b4b4 100644
--- a/tests/syntax_tests/data/idempotency/pupilfirst/courses/SubmissionChecklistShow.res
+++ b/tests/syntax_tests/data/idempotency/pupilfirst/courses/SubmissionChecklistShow.res
@@ -3,13 +3,13 @@ let str = React.string
@react.component
let make = (~checklist, ~updateChecklistCB, ~pending) =>
- {checklist |> ArrayUtils.isEmpty
- ?
{"Target was marked as complete." |> str}
+ {checklist->ArrayUtils.isEmpty
+ ?
{"Target was marked as complete."->str}
: checklist
- |> Array.mapi((index, checklistItem) =>
+ ->Array.mapi((index, checklistItem) =>
string_of_int} index checklistItem updateChecklistCB checklist pending
+ key={index->string_of_int} index checklistItem updateChecklistCB checklist pending
/>
)
- |> React.array}
+ ->React.array}
diff --git a/tests/syntax_tests/data/idempotency/pupilfirst/home/HomeStyleguide__MarkdownSyntaxHighlightingPreview.res b/tests/syntax_tests/data/idempotency/pupilfirst/home/HomeStyleguide__MarkdownSyntaxHighlightingPreview.res
index 394d611505..189625ddc8 100644
--- a/tests/syntax_tests/data/idempotency/pupilfirst/home/HomeStyleguide__MarkdownSyntaxHighlightingPreview.res
+++ b/tests/syntax_tests/data/idempotency/pupilfirst/home/HomeStyleguide__MarkdownSyntaxHighlightingPreview.res
@@ -133,7 +133,7 @@ let renderedMarkdown = language => {
}
-
{title |> str}
+
{title->str}
}
@@ -157,14 +157,14 @@ let make = () => {
let (language, setLanguage) = React.useState(() => ReasonML)
- {"Select a language to preview:" |> str}
+ {"Select a language to preview:"->str}
{renderedMarkdown(language)}
diff --git a/tests/syntax_tests/data/idempotency/pupilfirst/layouts/SchoolAdminNavbar__Course.res b/tests/syntax_tests/data/idempotency/pupilfirst/layouts/SchoolAdminNavbar__Course.res
index 45559f8e6d..4f11ad2f8b 100644
--- a/tests/syntax_tests/data/idempotency/pupilfirst/layouts/SchoolAdminNavbar__Course.res
+++ b/tests/syntax_tests/data/idempotency/pupilfirst/layouts/SchoolAdminNavbar__Course.res
@@ -10,10 +10,10 @@ let name = t => t.name
let decode = json => {
open Json.Decode
{
- id: json |> field("id", string),
- name: json |> field("name", string),
+ id: json->field("id", string),
+ name: json->field("name", string),
}
}
let sort = courses =>
- courses |> List.sort((c1, c2) => Js.String.localeCompare(c2 |> name, c1 |> name) |> int_of_float)
+ courses->List.sort((c1, c2) => Js.String.localeCompare(c2->name, c1->name)->int_of_float)
diff --git a/tests/syntax_tests/data/idempotency/pupilfirst/layouts/SchoolAdminNavbar__CourseDropdown.res b/tests/syntax_tests/data/idempotency/pupilfirst/layouts/SchoolAdminNavbar__CourseDropdown.res
index 6b6fc3944c..678e06881a 100644
--- a/tests/syntax_tests/data/idempotency/pupilfirst/layouts/SchoolAdminNavbar__CourseDropdown.res
+++ b/tests/syntax_tests/data/idempotency/pupilfirst/layouts/SchoolAdminNavbar__CourseDropdown.res
@@ -3,7 +3,7 @@ open SchoolAdminNavbar__Types
let str = React.string
let handleClick = (setShowDropdown, event) => {
- event |> ReactEvent.Mouse.preventDefault
+ event->ReactEvent.Mouse.preventDefault
setShowDropdown(showDropdown => !showDropdown)
}
@@ -11,8 +11,8 @@ let handleClick = (setShowDropdown, event) => {
let make = (~courses, ~currentCourseId) => {
let (showDropdown, setShowDropdown) = React.useState(() => false)
let currentCourse =
- courses |> ListUtils.unsafeFind(
- course => course |> Course.id == currentCourseId,
+ courses->ListUtils.unsafeFind(
+ course => course->Course.id == currentCourseId,
"Could not find currentCourse with ID " ++ currentCourseId,
)
@@ -20,11 +20,11 @@ let make = (~courses, ~currentCourseId) => {
@@ -32,18 +32,18 @@ let make = (~courses, ~currentCourseId) => {
?
: React.null}
diff --git a/tests/syntax_tests/data/idempotency/pupilfirst/layouts/SchoolAdminNavbar__Root.res b/tests/syntax_tests/data/idempotency/pupilfirst/layouts/SchoolAdminNavbar__Root.res
index 419c20e321..5c5b82b7ce 100644
--- a/tests/syntax_tests/data/idempotency/pupilfirst/layouts/SchoolAdminNavbar__Root.res
+++ b/tests/syntax_tests/data/idempotency/pupilfirst/layouts/SchoolAdminNavbar__Root.res
@@ -61,7 +61,7 @@ let bottomLink = (path, shrunk, iconClasses, text) => {
- {shrunk ? React.null : {text |> str} }
+ {shrunk ? React.null : {text->str} }
}
@@ -75,7 +75,7 @@ let topLink = (selectedOption, currentOption, path, shrunk, iconClasses, text) =
let title = shrunk ? Some(text) : None
- {shrunk ? React.null : {text |> str} }
+ {shrunk ? React.null : {text->str} }
}
@@ -83,7 +83,7 @@ let secondaryNavOption = (path, currentSelection, inspectedSelection, text) => {
let defaultClasses = "flex text-indigo-800 text-sm py-3 px-4 hover:bg-gray-400 focus:bg-gray-400 font-semibold rounded items-center my-1"
let classes = defaultClasses ++ (currentSelection == inspectedSelection ? " bg-gray-400" : "")
-
{text |> str}
+
{text->str}
}
let secondaryNav = (courses, userRole, selectedOption) =>
@@ -136,7 +136,7 @@ let secondaryNav = (courses, userRole, selectedOption) =>
Authors,
"Authors",
),
- ] |> React.array
+ ]->React.array
| CourseAuthor => React.null
}}
{secondaryNavOption(
@@ -200,7 +200,7 @@ let make = (~schoolName, ~schoolLogoPath, ~schoolIconPath, ~courses, ~isCourseAu
| _ =>
Rollbar.critical(
"Unknown path encountered by SA navbar: " ++
- (url.path |> Array.of_list |> Js.Array.joinWith("/")),
+ (url.path->Array.of_list->Js.Array.joinWith("/")),
)
raise(UnknownPathEncountered(url.path))
}
@@ -267,17 +267,17 @@ let make = (~schoolName, ~schoolLogoPath, ~schoolIconPath, ~courses, ~isCourseAu
? React.null
:
}
@@ -303,11 +303,11 @@ let make = (~schoolName, ~schoolLogoPath, ~schoolIconPath, ~courses, ~isCourseAu
rel="nofollow"
href="/users/sign_out">
- {shrunk ? React.null : {"Sign Out" |> str} }
+ {shrunk ? React.null : {"Sign Out"->str} }
,
- selectedOption |> secondaryNav(courses, userRole),
- ] |> React.array
+ selectedOption->secondaryNav(courses, userRole),
+ ]->React.array
}
diff --git a/tests/syntax_tests/data/idempotency/pupilfirst/layouts/StudentCourse__Course.res b/tests/syntax_tests/data/idempotency/pupilfirst/layouts/StudentCourse__Course.res
index ea97fd1da3..8c31efa083 100644
--- a/tests/syntax_tests/data/idempotency/pupilfirst/layouts/StudentCourse__Course.res
+++ b/tests/syntax_tests/data/idempotency/pupilfirst/layouts/StudentCourse__Course.res
@@ -6,8 +6,8 @@ type t = {
let decode = json => {
open Json.Decode
{
- id: json |> field("id", string),
- name: json |> field("name", string),
+ id: json->field("id", string),
+ name: json->field("name", string),
}
}
diff --git a/tests/syntax_tests/data/idempotency/pupilfirst/layouts/StudentCourse__Header.res b/tests/syntax_tests/data/idempotency/pupilfirst/layouts/StudentCourse__Header.res
index 2137304708..f554c39345 100644
--- a/tests/syntax_tests/data/idempotency/pupilfirst/layouts/StudentCourse__Header.res
+++ b/tests/syntax_tests/data/idempotency/pupilfirst/layouts/StudentCourse__Header.res
@@ -6,16 +6,16 @@ module Course = StudentCourse__Course
let courseOptions = courses =>
courses
- |> List.map(course => {
- let courseId = course |> Course.id
+ ->List.map(course => {
+ let courseId = course->Course.id
- {course |> Course.name |> str}
+ {course->Course.name->str}
})
- |> Array.of_list
+ ->Array.of_list
let courseDropdown = (currentCourse, otherCourses) =>
@@ -24,7 +24,7 @@ let courseDropdown = (currentCourse, otherCourses) =>
- {currentCourse |> Course.name |> str}
+ {currentCourse->Course.name->str}
| otherCourses =>
@@ -32,7 +32,7 @@ let courseDropdown = (currentCourse, otherCourses) =>
@@ -37,11 +37,11 @@ let signInLink = () =>
- {"Sign In" |> str}
+ {"Sign In"->str}
-let isMobile = () => Webapi.Dom.window |> Webapi.Dom.Window.innerWidth < 768
+let isMobile = () => Webapi.Dom.window->Webapi.Dom.Window.innerWidth < 768
let headerLinks = (links, isLoggedIn) => {
let (visibleLinks, dropdownLinks) = switch (links, isMobile()) {
@@ -52,11 +52,11 @@ let headerLinks = (links, isLoggedIn) => {
switch visibleLinks {
| visibleLinks =>
- (visibleLinks |> List.mapi((index, l) => headerLink(index |> string_of_int, l)))
+ (visibleLinks->List.mapi((index, l) => headerLink(index->string_of_int, l)))
->List.append(list{
})
->List.append(list{isLoggedIn ? signOutLink() : signInLink()})
- |> Array.of_list
- |> ReasonReact.array
+ ->Array.of_list
+ ->ReasonReact.array
}
}
@@ -66,7 +66,7 @@ let make = (~schoolName, ~logoUrl, ~links, ~isLoggedIn) => {
React.useEffect(() => {
let resizeCB = _ => toggleMenuHidden(_ => isMobile())
- Webapi.Dom.Window.asEventTarget(Webapi.Dom.window) |> Webapi.Dom.EventTarget.addEventListener(
+ Webapi.Dom.Window.asEventTarget(Webapi.Dom.window)->Webapi.Dom.EventTarget.addEventListener(
"resize",
resizeCB,
)
@@ -84,7 +84,7 @@ let make = (~schoolName, ~logoUrl, ~links, ~isLoggedIn) => {
| None =>
- {schoolName |> str}
+ {schoolName->str}
}}
diff --git a/tests/syntax_tests/data/idempotency/pupilfirst/layouts/StudentTopNav__DropDown.res b/tests/syntax_tests/data/idempotency/pupilfirst/layouts/StudentTopNav__DropDown.res
index 4625ed0d5f..5e9fac5921 100644
--- a/tests/syntax_tests/data/idempotency/pupilfirst/layouts/StudentTopNav__DropDown.res
+++ b/tests/syntax_tests/data/idempotency/pupilfirst/layouts/StudentTopNav__DropDown.res
@@ -9,17 +9,17 @@ let additionalLinks = (linksVisible, links) =>
?
{links
- |> List.mapi((index, link) =>
-
string_of_int} className="">
+ ->List.mapi((index, link) =>
+
)
- |> Array.of_list
- |> ReasonReact.array}
+ ->Array.of_list
+ ->ReasonReact.array}
: ReasonReact.null
@@ -34,7 +34,7 @@ let make = (~links) => {
className="ml-6 font-semibold text-sm cursor-pointer relative text-black"
onClick={handleToggle(setLinksVisible)}
key="more-links">
-
{"More" |> str}
+
{"More"->str}
{additionalLinks(linksVisible, moreLinks)}
diff --git a/tests/syntax_tests/data/idempotency/pupilfirst/layouts/StudentTopNav__NavLink.res b/tests/syntax_tests/data/idempotency/pupilfirst/layouts/StudentTopNav__NavLink.res
index 021273da61..401b156b60 100644
--- a/tests/syntax_tests/data/idempotency/pupilfirst/layouts/StudentTopNav__NavLink.res
+++ b/tests/syntax_tests/data/idempotency/pupilfirst/layouts/StudentTopNav__NavLink.res
@@ -10,7 +10,7 @@ let url = t => t.url
let decode = json => {
open Json.Decode
{
- title: json |> field("title", string),
- url: json |> field("url", string),
+ title: json->field("title", string),
+ url: json->field("url", string),
}
}
diff --git a/tests/syntax_tests/data/idempotency/pupilfirst/packages/MultiselectDropdown.res b/tests/syntax_tests/data/idempotency/pupilfirst/packages/MultiselectDropdown.res
index f00df12635..4a38b8021b 100644
--- a/tests/syntax_tests/data/idempotency/pupilfirst/packages/MultiselectDropdown.res
+++ b/tests/syntax_tests/data/idempotency/pupilfirst/packages/MultiselectDropdown.res
@@ -8,10 +8,10 @@ module DomUtils = {
open Webapi.Dom
let focus = id =>
- (switch document |> Document.getElementById(id) {
+ (switch document->Document.getElementById(id) {
| Some(el) => el
| None => raise(RootElementMissing(id))
- } |> Element.asHtmlElement)->Belt.Option.map(HtmlElement.focus) |> ignore
+ }->Element.asHtmlElement)->Belt.Option.map(HtmlElement.focus)->ignore
}
module type Selectable = {
@@ -24,19 +24,19 @@ module type Selectable = {
module Make = (Selectable: Selectable) => {
let search = (searchString, selections) =>
- (selections |> Js.Array.filter(selection =>
+ (selections->Js.Array.filter(selection =>
selection
- |> Selectable.searchString
- |> String.lowercase_ascii
- |> Js.String.includes(searchString |> String.lowercase_ascii)
+ ->Selectable.searchString
+ ->String.lowercase_ascii
+ ->Js.String.includes(searchString->String.lowercase_ascii)
))
->Belt.SortArray.stableSortBy((x, y) =>
- String.compare(x |> Selectable.value, y |> Selectable.value)
+ String.compare(x->Selectable.value, y->Selectable.value)
)
let selectionTitle = selection => {
- let value = selection |> Selectable.value
- switch selection |> Selectable.label {
+ let value = selection->Selectable.value
+ switch selection->Selectable.label {
| Some(label) => "Pick " ++ (label ++ (": " ++ value))
| None => "Pick " ++ value
}
@@ -56,7 +56,7 @@ module Make = (Selectable: Selectable) => {
}
let applyFilter = (selection, onSelect, id, event) => {
- event |> ReactEvent.Mouse.preventDefault
+ event->ReactEvent.Mouse.preventDefault
onSelect(selection)
DomUtils.focus(id)
@@ -66,27 +66,27 @@ module Make = (Selectable: Selectable) => {
// Remove all excess space characters from the user input.
let normalizedString =
searchInput
- |> Js.String.trim
- |> Js.String.replaceByRe(Js.Re.fromStringWithFlags("\\s+", ~flags="g"), " ")
+ ->Js.String.trim
+ ->Js.String.replaceByRe(Js.Re.fromStringWithFlags("\\s+", ~flags="g"), " ")
switch normalizedString {
| "" => []
| searchString =>
- let matchingSelections = unselected |> search(searchString)
+ let matchingSelections = unselected->search(searchString)
- matchingSelections |> Array.mapi((index, selection) =>
+ matchingSelections->Array.mapi((index, selection) =>
)
@@ -94,21 +94,21 @@ module Make = (Selectable: Selectable) => {
}
let removeSelection = (onDeselect, selection, event) => {
- event |> ReactEvent.Mouse.preventDefault
+ event->ReactEvent.Mouse.preventDefault
onDeselect(selection)
}
let showSelected = (onDeselect, labelSuffix, selected) =>
- selected |> Array.mapi((index, selection) => {
- let value = selection |> Selectable.value
-
string_of_int} className="inline-flex py-1 mr-2">
-
Selectable.color, false)}>
+ selected->Array.mapi((index, selection) => {
+ let value = selection->Selectable.value
+
string_of_int} className="inline-flex py-1 mr-2">
+
Selectable.color, false)}>
- {switch selection |> Selectable.label {
+ {switch selection->Selectable.label {
| Some(label) => label ++ (labelSuffix ++ value)
| None => value
- } |> str}
+ }->str}