@mattpolzin/harmony 4.3.0 → 4.4.0

package/harmony

@@ -366,17 +366,22 @@ const { Octokit } = require('octokit')
 const okit_octokit = authToken =>
   new Octokit({ auth: authToken })
 
+// Note that every Octokit FFI function uses idris__okit_stringify_error
+// which results in onFailure being called with a JSON string of the following structure:
+// { "status": <http status code>, "error": <error string> }
 const idris__okit_unpromisify = (promise, onSuccess, onFailure) =>
-  promise.then(r => onSuccess(r)(), e => onFailure(e)())
+  promise.then(r => onSuccess(r)(), e => idris__okit_stringify_error(onFailure)(e)())
 
 const idris__okit_stringify_error = (fn) => (err) => {
+  const status = err.response.status;
   const url = err.response.url
   const msg = err.response.data.message
   const details =
     Array.isArray(err.response.data.errors)
     ? '\n - ' + err.response.data.errors.map(e => e.message).join('\n - ')
     : ''
-  return fn('GitHub Error: ' + msg + ' (' + url + ')' + details)
+  const json = { status: status, error: 'GitHub Error: ' + msg + ' (' + url + ')' + details }
+  return fn(JSON.stringify(json))
 }
 
 const newline_delimited = array =>
@@ -391,22 +396,22 @@ const from_comma_delimited = str => {
 const digDefaultBranch = repoJson =>
   repoJson.default_branch
 
-const okit_get_repo_default_branch = (octokit, org, repo, onSuccess, onFailure) =>
+const okit_get_repo_default_branch = (octokit, owner, repo, onSuccess, onFailure) =>
   idris__okit_unpromisify(
-    octokit.rest.repos.get({ owner: org, repo }),
+    octokit.rest.repos.get({ owner, repo }),
     r => onSuccess(digDefaultBranch(r.data)),
-    idris__okit_stringify_error(onFailure)
+    onFailure
   )
 
 // get repo labels
 const digLabelNames = labelsJson =>
   labelsJson.map(l => l.name)
 
-const okit_list_repo_labels = (octokit, org, repo, onSuccess, onFailure) =>
+const okit_list_repo_labels = (octokit, owner, repo, onSuccess, onFailure) =>
   idris__okit_unpromisify(
-    octokit.rest.issues.listLabelsForRepo({ owner: org, repo, per_page: 100 }),
+    octokit.rest.issues.listLabelsForRepo({ owner, repo, per_page: 100 }),
     r => onSuccess(newline_delimited(digLabelNames(r.data))),
-    idris__okit_stringify_error(onFailure)
+    onFailure
 )
 
 // list teams
@@ -418,7 +423,7 @@ const okit_list_teams = (octokit, org, onSuccess, onFailure) =>
   idris__okit_unpromisify(
     octokit.rest.teams.list({ org, per_page: 100 }),
     r => onSuccess(newline_delimited(digTeams(r.data))),
-    idris__okit_stringify_error(onFailure)
+    onFailure
   )
 
 // Executes callback with [String] (string array)
@@ -426,7 +431,7 @@ const okit_list_my_teams = (octokit, onSuccess, onFailure) =>
   idris__okit_unpromisify(
     octokit.rest.teams.listForAuthenticatedUser({per_page: 100}),
     r => onSuccess(newline_delimited(digTeams(r.data))),
-    idris__okit_stringify_error(onFailure)
+    onFailure
   )
 
 // list PRs for branch
@@ -451,7 +456,7 @@ const okit_list_pull_requests_for_branch = (octokit, owner, repo, branch, onSucc
   idris__okit_unpromisify(
     octokit.rest.pulls.list({ owner, repo, head: `${owner}:${branch}`, state: 'open', per_page: 10 }),
     r => onSuccess(JSON.stringify(digPrs(r.data))),
-    idris__okit_stringify_error(onFailure)
+    onFailure
   )
 
 // Create PR
@@ -460,7 +465,7 @@ const okit_create_pr = (octokit, owner, repo, head, base, title, body, isDraft,
   idris__okit_unpromisify(
     octokit.rest.pulls.create({ owner, repo, head, base, title, body, draft: Boolean(isDraft) }),
     r => onSuccess(JSON.stringify(digPr(r.data))),
-    idris__okit_stringify_error(onFailure)
+    onFailure
   )
 
 
@@ -470,7 +475,7 @@ const okit_create_comment = (octokit, owner, repo, issue_number, body, onSuccess
   idris__okit_unpromisify(
     octokit.rest.issues.createComment({ owner, repo, issue_number: Number(issue_number), body }),
     r => onSuccess(""),
-    idris__okit_stringify_error(onFailure)
+    onFailure
   )
 
 // list PR reviewers
@@ -482,7 +487,7 @@ const okit_list_reviewers = (octokit, owner, repo, state, per_page, onSuccess, o
   idris__okit_unpromisify(
     octokit.rest.pulls.list({ owner, repo, state, per_page }),
     r => onSuccess(newline_delimited(digReviewers(r.data))),
-    idris__okit_stringify_error(onFailure)
+    onFailure
   )
 
 // list PRs
@@ -491,7 +496,7 @@ const okit_list_pull_requests = (octokit, owner, repo, state, per_page, page, on
   idris__okit_unpromisify(
     octokit.rest.pulls.list({ owner, repo, state, per_page, page }),
     r => onSuccess(JSON.stringify(digPrs(r.data))),
-    idris__okit_stringify_error(onFailure)
+    onFailure
   )
 
 // add PR reviewers
@@ -502,7 +507,7 @@ const okit_add_reviewers = (octokit, owner, repo, pull_number, reviewers, team_r
   idris__okit_unpromisify(
     octokit.rest.pulls.requestReviewers({ owner, repo, pull_number: Number(pull_number), reviewers: from_comma_delimited(reviewers), team_reviewers: from_comma_delimited(team_reviewers) }),
     r => onSuccess(newline_delimited(digReviewers([r.data]))),
-    idris__okit_stringify_error(onFailure)
+    onFailure
   )
 
 // list PR reviews
@@ -521,7 +526,7 @@ const okit_add_labels = (octokit, owner, repo, pull_number, labels, onSuccess, o
   idris__okit_unpromisify(
     octokit.rest.issues.addLabels({ owner, repo, issue_number: Number(pull_number), labels: from_comma_delimited(labels) }),
     r => onSuccess(newline_delimited(digLabelNames(r.data))),
-    idris__okit_stringify_error(onFailure)
+    onFailure
   )
 
 // Executes callback with [{author: String, state: String, submitted_at: String}]
@@ -529,7 +534,7 @@ const okit_list_pr_reviews = (octokit, owner, repo, pull_number, onSuccess, onFa
   idris__okit_unpromisify(
     octokit.rest.pulls.listReviews({ owner, repo, pull_number: Number(pull_number) }),
     r => onSuccess(JSON.stringify(digReviews(r.data))),
-    idris__okit_stringify_error(onFailure)
+    onFailure
   )
 
 // list team members
@@ -541,7 +546,7 @@ const okit_list_team_members = (octokit, org, team_slug, onSuccess, onFailure) =
   idris__okit_unpromisify(
     octokit.rest.teams.listMembersInOrg({ org, team_slug }),
     r => onSuccess(newline_delimited(digUserLogins(r.data))),
-    idris__okit_stringify_error(onFailure)
+    onFailure
   )
 
 // list org members
@@ -550,7 +555,7 @@ const okit_list_org_members = (octokit, org, onSuccess, onFailure) =>
   idris__okit_unpromisify(
     octokit.rest.orgs.listMembers({ org, per_page: 100 }),
     r => onSuccess(newline_delimited(digUserLogins(r.data))),
-    idris__okit_stringify_error(onFailure)
+    onFailure
   )
 
 // get user details
@@ -563,7 +568,7 @@ const okit_get_user = (octokit, username, onSuccess, onFailure) =>
   idris__okit_unpromisify(
     octokit.rest.users.getByUsername({ username }),
     r => onSuccess(JSON.stringify(digUser(r.data))),
-    idris__okit_stringify_error(onFailure)
+    onFailure
   )
 
 // get authed user details (self)
@@ -572,7 +577,7 @@ const okit_get_self = (octokit, onSuccess, onFailure) =>
   idris__okit_unpromisify(
     octokit.rest.users.getAuthenticated(),
     r => onSuccess(JSON.stringify(digUser(r.data))),
-    idris__okit_stringify_error(onFailure)
+    onFailure
   )
 
 
@@ -872,7 +877,7 @@ function x24tcOpt_1($0) {
           case 0: return {h: 0 /* {TcDone:1} */, a1: $0.a5};
           default: {
            const $17 = {a1: $0.a5.a1.a1, a2: $0.a5.a1.a2, a3: $0.a5.a1.a3};
-           const $1b = Data_List_DeleteBy_deleteByx27($1e => $1f => Prelude_Basics_on($22 => $23 => $0.a1.a1.a1($22)($23), csegen_606(), $1e, $1f), $17, $0.a6);
+           const $1b = Data_List_DeleteBy_deleteByx27($1e => $1f => Prelude_Basics_on($22 => $23 => $0.a1.a1.a1($22)($23), csegen_612(), $1e, $1f), $17, $0.a6);
            switch($1b.a1.h) {
             case 0: /* nothing */ {
              switch($0.a8) {
@@ -887,7 +892,7 @@ function x24tcOpt_1($0) {
         }
         default: {
          const $6a = {a1: $0.a5.a1.a1, a2: $0.a5.a1.a2, a3: $0.a5.a1.a3};
-         const $6e = Data_List_DeleteBy_deleteByx27($71 => $72 => Prelude_Basics_on($75 => $76 => $0.a1.a1.a1($75)($76), csegen_606(), $71, $72), $6a, $0.a6);
+         const $6e = Data_List_DeleteBy_deleteByx27($71 => $72 => Prelude_Basics_on($75 => $76 => $0.a1.a1.a1($75)($76), csegen_612(), $71, $72), $6a, $0.a6);
          switch($6e.a1.h) {
           case 0: /* nothing */ {
            switch($0.a8) {
@@ -912,7 +917,7 @@ function x24tcOpt_1($0) {
       case 0: return {h: 0 /* {TcDone:1} */, a1: $0.a5};
       default: {
        const $c1 = {a1: $0.a5.a1.a1, a2: $0.a5.a1.a2, a3: $0.a5.a1.a3};
-       const $c5 = Data_List_DeleteBy_deleteByx27($c8 => $c9 => Prelude_Basics_on($cc => $cd => $0.a1.a1.a1($cc)($cd), csegen_606(), $c8, $c9), $c1, $0.a6);
+       const $c5 = Data_List_DeleteBy_deleteByx27($c8 => $c9 => Prelude_Basics_on($cc => $cd => $0.a1.a1.a1($cc)($cd), csegen_612(), $c8, $c9), $c1, $0.a6);
        switch($c5.a1.h) {
         case 0: /* nothing */ {
          switch($0.a8) {
@@ -927,7 +932,7 @@ function x24tcOpt_1($0) {
     }
     default: {
      const $114 = {a1: $0.a5.a1.a1, a2: $0.a5.a1.a2, a3: $0.a5.a1.a3};
-     const $118 = Data_List_DeleteBy_deleteByx27($11b => $11c => Prelude_Basics_on($11f => $120 => $0.a1.a1.a1($11f)($120), csegen_606(), $11b, $11c), $114, $0.a6);
+     const $118 = Data_List_DeleteBy_deleteByx27($11b => $11c => Prelude_Basics_on($11f => $120 => $0.a1.a1.a1($11f)($120), csegen_612(), $11b, $11c), $114, $0.a6);
      switch($118.a1.h) {
       case 0: /* nothing */ {
        switch($0.a8) {
@@ -2462,17 +2467,17 @@ const csegen_52 = __lazy(function () {
 
 /* {csegen:65} */
 const csegen_65 = __lazy(function () {
- return () => ({a1: b => a => func => $1 => $2 => $3 => Data_Promise_map_Functor_Promise(func, $1, $2, $3), a2: a => $a => $b => $c => Data_Promise_pure_Applicative_Promise($a, $b, $c), a3: b => a => $12 => $13 => $14 => $15 => Data_Promise_x3cx2ax3e_Applicative_Promise($12, $13, $14, $15)});
+ return () => ({a1: b => a => func => $1 => $2 => $3 => Data_Promise_map_Functor_x28Promisex20x24ex29(func, $1, $2, $3), a2: a => $a => $b => $c => Data_Promise_pure_Applicative_x28Promisex20x24ex29($a, $b, $c), a3: b => a => $12 => $13 => $14 => $15 => Data_Promise_x3cx2ax3e_Applicative_x28Promisex20x24ex29($12, $13, $14, $15)});
 });
 
 /* {csegen:70} */
 const csegen_70 = __lazy(function () {
- return () => ({a1: csegen_65()(), a2: b => a => $4 => $5 => $6 => $7 => Data_Promise_x3ex3ex3d_Monad_Promise($4, $5, $6, $7), a3: a => $e => Data_Promise_join_Monad_Promise($e)});
+ return () => ({a1: csegen_65()(), a2: b => a => $4 => $5 => $6 => $7 => Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($4, $5, $6, $7), a3: a => $e => Data_Promise_join_Monad_x28Promisex20x24ex29($e)});
 });
 
 /* {csegen:73} */
 const csegen_73 = __lazy(function () {
- return () => ({a1: csegen_70()(), a2: a => $4 => $5 => $6 => $7 => Data_Promise_liftIO_HasIO_Promise($4, $5, $6, $7)});
+ return () => ({a1: csegen_70()(), a2: a => $4 => $5 => $6 => $7 => Data_Promise_liftIO_HasIO_x28Promisex20x24ex29($4, $5, $6, $7)});
 });
 
 /* {csegen:74} */
@@ -2623,163 +2628,163 @@ const csegen_317 = __lazy(function () {
  return {a1: Text_PrettyPrint_Prettyprinter_Util_reflow('Optionally apply any number of labels by prefixing them with \'#\'.'), a2: {h: 0}};
 });
 
-/* {csegen:351} */
-const csegen_351 = __lazy(function () {
- return {a1: Help_argument(1, '<team-slug>'), a2: {h: 0}};
-});
-
-/* {csegen:407} */
-const csegen_407 = __lazy(function () {
- return $0 => $1 => $2 => $3 => Data_Promise_x3ex3ex3d_Monad_Promise($0, $1, $2, $3);
+/* {csegen:409} */
+const csegen_409 = __lazy(function () {
+ return () => $0 => $0.a2;
 });
 
-/* {csegen:408} */
-const csegen_408 = __lazy(function () {
- return $0 => $1 => Data_Promise_either(csegen_52(), Data_PullRequest_parsePullRequestsString($0), $1);
+/* {csegen:411} */
+const csegen_411 = __lazy(function () {
+ return $0 => $1 => $2 => $3 => Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($0, $1, $2, $3);
 });
 
-/* {csegen:409} */
-const csegen_409 = __lazy(function () {
- return $0 => $1 => Data_Promise_either(csegen_52(), Data_User_parseUserString($0), $1);
+/* {csegen:412} */
+const csegen_412 = __lazy(function () {
+ return $0 => $1 => Data_Promise_either(Data_PullRequest_parsePullRequestsString($0), $1);
 });
 
 /* {csegen:414} */
 const csegen_414 = __lazy(function () {
+ return $0 => $1 => Data_Promise_either(Data_User_parseUserString($0), $1);
+});
+
+/* {csegen:419} */
+const csegen_419 = __lazy(function () {
  return $0 => $1 => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29($0, $1);
 });
 
-/* {csegen:427} */
-const csegen_427 = __lazy(function () {
+/* {csegen:432} */
+const csegen_432 = __lazy(function () {
  return $0 => Language_JSON_Accessors_array($3 => Data_PullRequest_parsePR($3), $0);
 });
 
-/* {csegen:435} */
-const csegen_435 = __lazy(function () {
- return () => $0 => $1 => $2 => Data_Promise_pure_Applicative_Promise($0, $1, $2);
+/* {csegen:440} */
+const csegen_440 = __lazy(function () {
+ return () => $0 => $1 => $2 => Data_Promise_pure_Applicative_x28Promisex20x24ex29($0, $1, $2);
 });
 
-/* {csegen:436} */
-const csegen_436 = __lazy(function () {
+/* {csegen:441} */
+const csegen_441 = __lazy(function () {
  return $0 => Prelude_EqOrd_x3dx3d_Eq_Char($0, '/');
 });
 
-/* {csegen:437} */
-const csegen_437 = __lazy(function () {
+/* {csegen:442} */
+const csegen_442 = __lazy(function () {
  return () => $0 => $0.a2;
 });
 
-/* {csegen:441} */
-const csegen_441 = __lazy(function () {
+/* {csegen:446} */
+const csegen_446 = __lazy(function () {
  return () => $0 => $0.a1;
 });
 
-/* {csegen:452} */
-const csegen_452 = __lazy(function () {
- return () => $0 => $1 => Data_Promise_map_Functor_Promise($4 => Number(_truncUBigInt32($4)), System_time(csegen_73()()), $0, $1);
-});
-
 /* {csegen:457} */
 const csegen_457 = __lazy(function () {
+ return () => $0 => $1 => Data_Promise_map_Functor_x28Promisex20x24ex29($4 => Number(_truncUBigInt32($4)), System_time(csegen_73()()), $0, $1);
+});
+
+/* {csegen:462} */
+const csegen_462 = __lazy(function () {
  return $0 => $1 => $2 => $3 => Prelude_Types_map_Functor_Maybe($2, $3);
 });
 
-/* {csegen:470} */
-const csegen_470 = __lazy(function () {
- return () => $0 => $1 => $2 => Data_Promise_liftIO_HasIO_Promise($5 => Prelude_IO_prim__getStr($5), $0, $1, $2);
+/* {csegen:475} */
+const csegen_475 = __lazy(function () {
+ return () => $0 => $1 => $2 => Data_Promise_liftIO_HasIO_x28Promisex20x24ex29($5 => Prelude_IO_prim__getStr($5), $0, $1, $2);
 });
 
-/* {csegen:472} */
-const csegen_472 = __lazy(function () {
- return () => $0 => $1 => Data_Promise_pure_Applicative_Promise({h: 0}, $0, $1);
+/* {csegen:477} */
+const csegen_477 = __lazy(function () {
+ return () => $0 => $1 => Data_Promise_pure_Applicative_x28Promisex20x24ex29({h: 0}, $0, $1);
 });
 
-/* {csegen:500} */
-const csegen_500 = __lazy(function () {
+/* {csegen:505} */
+const csegen_505 = __lazy(function () {
  return {a1: csegen_9(), a2: a => ({h: 0}), a3: a => $4 => $5 => Prelude_Types_x3cx7cx3e_Alternative_Maybe($4, $5)};
 });
 
-/* {csegen:501} */
-const csegen_501 = __lazy(function () {
+/* {csegen:506} */
+const csegen_506 = __lazy(function () {
  return $0 => Data_List_sort(csegen_224(), $0);
 });
 
-/* {csegen:502} */
-const csegen_502 = __lazy(function () {
+/* {csegen:508} */
+const csegen_508 = __lazy(function () {
  return $0 => $1 => $2 => FFI_Concurrency_promiseAll(csegen_146(), $0, $1, $2);
 });
 
-/* {csegen:510} */
-const csegen_510 = __lazy(function () {
+/* {csegen:516} */
+const csegen_516 = __lazy(function () {
  return $0 => $0.a1;
 });
 
-/* {csegen:512} */
-const csegen_512 = __lazy(function () {
+/* {csegen:518} */
+const csegen_518 = __lazy(function () {
  return $0 => $1 => Data_Date_compare_Ord_Date($0, $1);
 });
 
-/* {csegen:513} */
-const csegen_513 = __lazy(function () {
+/* {csegen:519} */
+const csegen_519 = __lazy(function () {
  return $0 => $0.a2;
 });
 
-/* {csegen:514} */
-const csegen_514 = __lazy(function () {
- return $0 => $1 => Prelude_Basics_on(csegen_512(), csegen_513(), $0, $1);
+/* {csegen:520} */
+const csegen_520 = __lazy(function () {
+ return $0 => $1 => Prelude_Basics_on(csegen_518(), csegen_519(), $0, $1);
 });
 
-/* {csegen:527} */
-const csegen_527 = __lazy(function () {
+/* {csegen:533} */
+const csegen_533 = __lazy(function () {
  return $0 => $0.a2;
 });
 
-/* {csegen:529} */
-const csegen_529 = __lazy(function () {
+/* {csegen:535} */
+const csegen_535 = __lazy(function () {
  return Theme_cs({a1: 2, a2: {h: 0}});
 });
 
-/* {csegen:532} */
-const csegen_532 = __lazy(function () {
+/* {csegen:538} */
+const csegen_538 = __lazy(function () {
  return $0 => $0.a1;
 });
 
-/* {csegen:538} */
-const csegen_538 = __lazy(function () {
+/* {csegen:544} */
+const csegen_544 = __lazy(function () {
  return date => Text_PrettyPrint_Prettyprinter_Doc_indent(2, Text_PrettyPrint_Prettyprinter_Doc_hsep({a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('earliest:'), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(Data_Date_show_Show_Date(date)), a2: {h: 0}}}));
 });
 
-/* {csegen:548} */
-const csegen_548 = __lazy(function () {
+/* {csegen:554} */
+const csegen_554 = __lazy(function () {
  return Theme_cs({a1: 0, a2: {h: 0}});
 });
 
-/* {csegen:549} */
-const csegen_549 = __lazy(function () {
+/* {csegen:555} */
+const csegen_555 = __lazy(function () {
  return Theme_cs({a1: 1, a2: {h: 0}});
 });
 
-/* {csegen:550} */
-const csegen_550 = __lazy(function () {
+/* {csegen:556} */
+const csegen_556 = __lazy(function () {
  return Theme_cs({a1: 3, a2: {h: 0}});
 });
 
-/* {csegen:571} */
-const csegen_571 = __lazy(function () {
+/* {csegen:577} */
+const csegen_577 = __lazy(function () {
  return $0 => Util_yesNoPrompt(csegen_73()(), 'Would you like to continue creating a Pull Request anyway?');
 });
 
-/* {csegen:606} */
-const csegen_606 = __lazy(function () {
+/* {csegen:612} */
+const csegen_612 = __lazy(function () {
  return $0 => $0.a1;
 });
 
-/* {csegen:616} */
-const csegen_616 = __lazy(function () {
+/* {csegen:622} */
+const csegen_622 = __lazy(function () {
  return {a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc()}, a2: {h: 0}};
 });
 
-/* {csegen:634} */
-const csegen_634 = __lazy(function () {
+/* {csegen:640} */
+const csegen_640 = __lazy(function () {
  return {a1: ann => $1 => Graph_pretty_Pretty_Date($1), a2: ann => $5 => $6 => Graph_prettyPrec_Pretty_Date($5, $6)};
 });
 
@@ -2788,18 +2793,18 @@ function prim__sub_Integer($0, $1) {
  return ($0-$1);
 }
 
-/* Main.8543:1484:parsePg */
-function Main_n__8543_1484_parsePg($0, $1, $2, $3, $4, $5, $6) {
+/* Main.8686:1488:parsePg */
+function Main_n__8686_1488_parsePg($0, $1, $2, $3, $4, $5, $6) {
  return Data_String_parsePositive(csegen_2(), $6);
 }
 
-/* Main.8543:1483:parseLim */
-function Main_n__8543_1483_parseLim($0, $1, $2, $3, $4, $5) {
+/* Main.8686:1487:parseLim */
+function Main_n__8686_1487_parseLim($0, $1, $2, $3, $4, $5) {
  return Prelude_Interfaces_x3cx3dx3c(csegen_14(), x => Data_Fin_natToFin(x, 101n), $e => Data_String_parsePositive(csegen_2(), $e));
 }
 
-/* Main.8404:1285:configuredOpts */
-function Main_n__8404_1285_configuredOpts($0, $1, $2, $3) {
+/* Main.8546:1285:configuredOpts */
+function Main_n__8546_1285_configuredOpts($0, $1, $2, $3) {
  const $13 = $14 => {
   switch($14.h) {
    case 1: /* Right */ return $0.a1.a1.a2(undefined)(BashCompletion_opts($14.a1, $3, $2, $1));
@@ -2831,7 +2836,7 @@ function Main_shouldUseColors($0) {
  return $0.a1.a2(undefined)(undefined)(System_File_Meta_isTTY($0, System_File_Virtual_stdout()))($e);
 }
 
-/* Main.resolve'' : Promise () -> IO () */
+/* Main.resolve'' : Promise' () -> IO () */
 function Main_resolvex27x27($0) {
  return Data_Promise_resolvex27($3 => $4 => $3, $6 => Main_exitError(csegen_31()(), $6), $0);
 }
@@ -2903,7 +2908,7 @@ function Main_main($0) {
  return Main_handleArgs($ac, $a4, $1, $8, $17, $1f)($0);
 }
 
-/* Main.handleConfiguredArgs : Config => Git => Maybe String -> List String -> Promise () */
+/* Main.handleConfiguredArgs : Config => Git => Maybe String -> List String -> Promise' () */
 function Main_handleConfiguredArgs($0, $1, $2, $3) {
  switch($3.h) {
   case undefined: /* cons */ {
@@ -2914,19 +2919,19 @@ function Main_handleConfiguredArgs($0, $1, $2, $3) {
       case undefined: /* cons */ {
        return $15 => {
         switch($3.a2.a2.h) {
-         case 0: /* nil */ return $17 => Data_Promise_x3ex3ex3d_Monad_Promise(Config_getConfig($0, $3.a2.a1), value => $1e => $1f => $20 => Data_Promise_liftIO_HasIO_Promise($23 => Prelude_IO_prim__putStr((value+'\n'), $23), $1e, $1f, $20), $15, $17);
+         case 0: /* nil */ return $17 => Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(Config_getConfig($0, $3.a2.a1), value => $1e => $1f => $20 => Data_Promise_liftIO_HasIO_x28Promisex20x24ex29($23 => Prelude_IO_prim__putStr((value+'\n'), $23), $1e, $1f, $20), $15, $17);
          case undefined: /* cons */ {
           return $2e => {
            switch($3.a2.a2.a2.h) {
-            case 0: /* nil */ return Data_Promise_map_Functor_Promise($32 => (undefined), Config_setConfig($0, $3.a2.a1, $3.a2.a2.a1), $15, $2e);
+            case 0: /* nil */ return Data_Promise_map_Functor_x28Promisex20x24ex29($32 => (undefined), Config_setConfig($0, $3.a2.a1, $3.a2.a2.a1), $15, $2e);
             default: {
              const $4a = $4b => $4c => $4d => {
               switch($4b.h) {
-               case undefined: /* just */ return Data_Promise_x3ex3ex3d_Monad_Promise($51 => $52 => $53 => Data_Promise_liftIO_HasIO_Promise($56 => FFI_GitHub_octokit($4b.a1, $56), $51, $52, $53), _ => $5e => $5f => Data_Promise_x3ex3ex3d_Monad_Promise($62 => $63 => Config_syncIfOld(_, $0, $62, $63), configx27 => Main_handleAuthenticatedArgs(configx27, $1, _, $3), $5e, $5f), $4c, $4d);
+               case undefined: /* just */ return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($51 => $52 => $53 => Data_Promise_liftIO_HasIO_x28Promisex20x24ex29($56 => FFI_GitHub_octokit($4b.a1, $56), $51, $52, $53), _ => $5e => $5f => Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($62 => $63 => Config_syncIfOld(_, $0, $62, $63), configx27 => Main_handleAuthenticatedArgs(configx27, $1, _, $3), $5e, $5f), $4c, $4d);
                case 0: /* nothing */ return Data_Promise_reject('Either the GITHUB_PAT environment variable or githubPAT config property must be set to a personal access token.', $4c, $4d);
               }
              };
-             return Data_Promise_x3ex3ex3d_Monad_Promise($3c => $3d => Data_Promise_pure_Applicative_Promise(Prelude_Types_x3cx7cx3e_Alternative_Maybe($2, () => Prelude_Types_map_Functor_Maybe($45 => $45, $0.a13)), $3c, $3d), $4a, $15, $2e);
+             return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($3c => $3d => Data_Promise_pure_Applicative_x28Promisex20x24ex29(Prelude_Types_x3cx7cx3e_Alternative_Maybe($2, () => Prelude_Types_map_Functor_Maybe($45 => $45, $0.a13)), $3c, $3d), $4a, $15, $2e);
             }
            }
           };
@@ -2935,11 +2940,11 @@ function Main_handleConfiguredArgs($0, $1, $2, $3) {
           return $79 => {
            const $8a = $8b => $8c => $8d => {
             switch($8b.h) {
-             case undefined: /* just */ return Data_Promise_x3ex3ex3d_Monad_Promise($91 => $92 => $93 => Data_Promise_liftIO_HasIO_Promise($96 => FFI_GitHub_octokit($8b.a1, $96), $91, $92, $93), _ => $9e => $9f => Data_Promise_x3ex3ex3d_Monad_Promise($a2 => $a3 => Config_syncIfOld(_, $0, $a2, $a3), configx27 => Main_handleAuthenticatedArgs(configx27, $1, _, $3), $9e, $9f), $8c, $8d);
+             case undefined: /* just */ return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($91 => $92 => $93 => Data_Promise_liftIO_HasIO_x28Promisex20x24ex29($96 => FFI_GitHub_octokit($8b.a1, $96), $91, $92, $93), _ => $9e => $9f => Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($a2 => $a3 => Config_syncIfOld(_, $0, $a2, $a3), configx27 => Main_handleAuthenticatedArgs(configx27, $1, _, $3), $9e, $9f), $8c, $8d);
              case 0: /* nothing */ return Data_Promise_reject('Either the GITHUB_PAT environment variable or githubPAT config property must be set to a personal access token.', $8c, $8d);
             }
            };
-           return Data_Promise_x3ex3ex3d_Monad_Promise($7c => $7d => Data_Promise_pure_Applicative_Promise(Prelude_Types_x3cx7cx3e_Alternative_Maybe($2, () => Prelude_Types_map_Functor_Maybe($85 => $85, $0.a13)), $7c, $7d), $8a, $15, $79);
+           return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($7c => $7d => Data_Promise_pure_Applicative_x28Promisex20x24ex29(Prelude_Types_x3cx7cx3e_Alternative_Maybe($2, () => Prelude_Types_map_Functor_Maybe($85 => $85, $0.a13)), $7c, $7d), $8a, $15, $79);
           };
          }
         }
@@ -2949,11 +2954,11 @@ function Main_handleConfiguredArgs($0, $1, $2, $3) {
        return $b9 => $ba => {
         const $cb = $cc => $cd => $ce => {
          switch($cc.h) {
-          case undefined: /* just */ return Data_Promise_x3ex3ex3d_Monad_Promise($d2 => $d3 => $d4 => Data_Promise_liftIO_HasIO_Promise($d7 => FFI_GitHub_octokit($cc.a1, $d7), $d2, $d3, $d4), _ => $df => $e0 => Data_Promise_x3ex3ex3d_Monad_Promise($e3 => $e4 => Config_syncIfOld(_, $0, $e3, $e4), configx27 => Main_handleAuthenticatedArgs(configx27, $1, _, $3), $df, $e0), $cd, $ce);
+          case undefined: /* just */ return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($d2 => $d3 => $d4 => Data_Promise_liftIO_HasIO_x28Promisex20x24ex29($d7 => FFI_GitHub_octokit($cc.a1, $d7), $d2, $d3, $d4), _ => $df => $e0 => Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($e3 => $e4 => Config_syncIfOld(_, $0, $e3, $e4), configx27 => Main_handleAuthenticatedArgs(configx27, $1, _, $3), $df, $e0), $cd, $ce);
           case 0: /* nothing */ return Data_Promise_reject('Either the GITHUB_PAT environment variable or githubPAT config property must be set to a personal access token.', $cd, $ce);
          }
         };
-        return Data_Promise_x3ex3ex3d_Monad_Promise($bd => $be => Data_Promise_pure_Applicative_Promise(Prelude_Types_x3cx7cx3e_Alternative_Maybe($2, () => Prelude_Types_map_Functor_Maybe($c6 => $c6, $0.a13)), $bd, $be), $cb, $b9, $ba);
+        return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($bd => $be => Data_Promise_pure_Applicative_x28Promisex20x24ex29(Prelude_Types_x3cx7cx3e_Alternative_Maybe($2, () => Prelude_Types_map_Functor_Maybe($c6 => $c6, $0.a13)), $bd, $be), $cb, $b9, $ba);
        };
       }
      }
@@ -2962,11 +2967,11 @@ function Main_handleConfiguredArgs($0, $1, $2, $3) {
      return $fa => $fb => {
       const $10c = $10d => $10e => $10f => {
        switch($10d.h) {
-        case undefined: /* just */ return Data_Promise_x3ex3ex3d_Monad_Promise($113 => $114 => $115 => Data_Promise_liftIO_HasIO_Promise($118 => FFI_GitHub_octokit($10d.a1, $118), $113, $114, $115), _ => $120 => $121 => Data_Promise_x3ex3ex3d_Monad_Promise($124 => $125 => Config_syncIfOld(_, $0, $124, $125), configx27 => Main_handleAuthenticatedArgs(configx27, $1, _, $3), $120, $121), $10e, $10f);
+        case undefined: /* just */ return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($113 => $114 => $115 => Data_Promise_liftIO_HasIO_x28Promisex20x24ex29($118 => FFI_GitHub_octokit($10d.a1, $118), $113, $114, $115), _ => $120 => $121 => Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($124 => $125 => Config_syncIfOld(_, $0, $124, $125), configx27 => Main_handleAuthenticatedArgs(configx27, $1, _, $3), $120, $121), $10e, $10f);
         case 0: /* nothing */ return Data_Promise_reject('Either the GITHUB_PAT environment variable or githubPAT config property must be set to a personal access token.', $10e, $10f);
        }
       };
-      return Data_Promise_x3ex3ex3d_Monad_Promise($fe => $ff => Data_Promise_pure_Applicative_Promise(Prelude_Types_x3cx7cx3e_Alternative_Maybe($2, () => Prelude_Types_map_Functor_Maybe($107 => $107, $0.a13)), $fe, $ff), $10c, $fa, $fb);
+      return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($fe => $ff => Data_Promise_pure_Applicative_x28Promisex20x24ex29(Prelude_Types_x3cx7cx3e_Alternative_Maybe($2, () => Prelude_Types_map_Functor_Maybe($107 => $107, $0.a13)), $fe, $ff), $10c, $fa, $fb);
      };
     }
    }
@@ -2975,17 +2980,17 @@ function Main_handleConfiguredArgs($0, $1, $2, $3) {
    return $13b => $13c => {
     const $14d = $14e => $14f => $150 => {
      switch($14e.h) {
-      case undefined: /* just */ return Data_Promise_x3ex3ex3d_Monad_Promise($154 => $155 => $156 => Data_Promise_liftIO_HasIO_Promise($159 => FFI_GitHub_octokit($14e.a1, $159), $154, $155, $156), _ => $161 => $162 => Data_Promise_x3ex3ex3d_Monad_Promise($165 => $166 => Config_syncIfOld(_, $0, $165, $166), configx27 => Main_handleAuthenticatedArgs(configx27, $1, _, $3), $161, $162), $14f, $150);
+      case undefined: /* just */ return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($154 => $155 => $156 => Data_Promise_liftIO_HasIO_x28Promisex20x24ex29($159 => FFI_GitHub_octokit($14e.a1, $159), $154, $155, $156), _ => $161 => $162 => Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($165 => $166 => Config_syncIfOld(_, $0, $165, $166), configx27 => Main_handleAuthenticatedArgs(configx27, $1, _, $3), $161, $162), $14f, $150);
       case 0: /* nothing */ return Data_Promise_reject('Either the GITHUB_PAT environment variable or githubPAT config property must be set to a personal access token.', $14f, $150);
      }
     };
-    return Data_Promise_x3ex3ex3d_Monad_Promise($13f => $140 => Data_Promise_pure_Applicative_Promise(Prelude_Types_x3cx7cx3e_Alternative_Maybe($2, () => Prelude_Types_map_Functor_Maybe($148 => $148, $0.a13)), $13f, $140), $14d, $13b, $13c);
+    return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($13f => $140 => Data_Promise_pure_Applicative_x28Promisex20x24ex29(Prelude_Types_x3cx7cx3e_Alternative_Maybe($2, () => Prelude_Types_map_Functor_Maybe($148 => $148, $0.a13)), $13f, $140), $14d, $13b, $13c);
    };
   }
  }
 }
 
-/* Main.handleAuthenticatedArgs : Config => Git => Octokit => List String -> Promise () */
+/* Main.handleAuthenticatedArgs : Config => Git => Octokit => List String -> Promise' () */
 function Main_handleAuthenticatedArgs($0, $1, $2, $3) {
  switch($3.h) {
   case undefined: /* cons */ {
@@ -3003,8 +3008,8 @@ function Main_handleAuthenticatedArgs($0, $1, $2, $3) {
               return $b => {
                const $c = Data_String_parsePositive(csegen_47(), $3.a2.a2.a1);
                switch($c.h) {
-                case undefined: /* just */ return Data_Promise_x3ex3ex3d_Monad_Promise($13 => $14 => FFI_GitHub_listPullReviewsJsonStr($2, $0.a2, $0.a3, $c.a1, $13, $14), reviewsJsonStr => $1f => $20 => $21 => Data_Promise_liftIO_HasIO_Promise($24 => Prelude_IO_prim__putStr(reviewsJsonStr, $24), $1f, $20, $21), $9, $b);
-                case 0: /* nothing */ return Data_Promise_pure_Applicative_Promise(undefined, $9, $b);
+                case undefined: /* just */ return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($13 => $14 => FFI_GitHub_listPullReviewsJsonStr($2, $0.a2, $0.a3, $c.a1, $13, $14), reviewsJsonStr => $1f => $20 => $21 => Data_Promise_liftIO_HasIO_x28Promisex20x24ex29($24 => Prelude_IO_prim__putStr(reviewsJsonStr, $24), $1f, $20, $21), $9, $b);
+                case 0: /* nothing */ return Data_Promise_pure_Applicative_x28Promisex20x24ex29(undefined, $9, $b);
                }
               };
              }
@@ -3053,11 +3058,11 @@ function Main_handleAuthenticatedArgs($0, $1, $2, $3) {
                   }
                   return Prelude_Types_x3ex3ex3d_Monad_Maybe($b5, filter => ({a1: {a1: filter, a2: {a1: $b2.a1, a2: $b2.a2}}}));
                  };
-                 const $92 = Prelude_Types_x3ex3ex3d_Monad_Maybe(Prelude_Types_x3cx2ax3e_Applicative_Maybe(Prelude_Types_x3cx2ax3e_Applicative_Maybe({a1: $9a => $9b => ({a1: $9a, a2: $9b})}, Main_n__8543_1483_parseLim($1, $2, $3.a2.a2.a1, $3.a2.a2.a2.a1, $3.a2.a2.a2.a2.a1, $0)($3.a2.a2.a2.a1)), Main_n__8543_1484_parsePg($1, $2, $3.a2.a2.a1, $3.a2.a2.a2.a1, $3.a2.a2.a2.a2.a1, $0, $3.a2.a2.a2.a2.a1)), $b1);
+                 const $92 = Prelude_Types_x3ex3ex3d_Monad_Maybe(Prelude_Types_x3cx2ax3e_Applicative_Maybe(Prelude_Types_x3cx2ax3e_Applicative_Maybe({a1: $9a => $9b => ({a1: $9a, a2: $9b})}, Main_n__8686_1487_parseLim($1, $2, $3.a2.a2.a1, $3.a2.a2.a2.a1, $3.a2.a2.a2.a2.a1, $0)($3.a2.a2.a2.a1)), Main_n__8686_1488_parsePg($1, $2, $3.a2.a2.a1, $3.a2.a2.a2.a1, $3.a2.a2.a2.a2.a1, $0, $3.a2.a2.a2.a2.a1)), $b1);
                  return $c2 => {
                   switch($92.h) {
-                   case undefined: /* just */ return $c4 => Data_Promise_x3ex3ex3d_Monad_Promise(FFI_GitHub_listPullRequestsJsonStr($2, $0.a2, $0.a3, $92.a1.a1, $92.a1.a2.a1, $92.a1.a2.a2), pullsJsonStr => $d3 => $d4 => $d5 => Data_Promise_liftIO_HasIO_Promise($d8 => Prelude_IO_prim__putStr(pullsJsonStr, $d8), $d3, $d4, $d5), $c2, $c4);
-                   case 0: /* nothing */ return $e1 => Data_Promise_pure_Applicative_Promise(undefined, $c2, $e1);
+                   case undefined: /* just */ return $c4 => Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(FFI_GitHub_listPullRequestsJsonStr($2, $0.a2, $0.a3, $92.a1.a1, $92.a1.a2.a1, $92.a1.a2.a2), pullsJsonStr => $d3 => $d4 => $d5 => Data_Promise_liftIO_HasIO_x28Promisex20x24ex29($d8 => Prelude_IO_prim__putStr(pullsJsonStr, $d8), $d3, $d4, $d5), $c2, $c4);
+                   case 0: /* nothing */ return $e1 => Data_Promise_pure_Applicative_x28Promisex20x24ex29(undefined, $c2, $e1);
                   }
                  };
                 }
@@ -3089,7 +3094,7 @@ function Main_handleAuthenticatedArgs($0, $1, $2, $3) {
            case undefined: /* cons */ {
             return $174 => {
              switch($3.a2.a2.a2.h) {
-              case 0: /* nil */ return Data_Promise_x3ex3ex3d_Monad_Promise(FFI_GitHub_getUser($2)($3.a2.a2.a1), $17d => $17e => $17f => $180 => Data_Promise_liftIO_HasIO_Promise($183 => Prelude_IO_prim__putStr(JSON_Parser_showImpl(Data_User_json($17d)), $183), $17e, $17f, $180), $172, $174);
+              case 0: /* nil */ return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(FFI_GitHub_getUser($2)($3.a2.a2.a1), $17d => $17e => $17f => $180 => Data_Promise_liftIO_HasIO_x28Promisex20x24ex29($183 => Prelude_IO_prim__putStr(JSON_Parser_showImpl(Data_User_json($17d)), $183), $17e, $17f, $180), $172, $174);
               default: return Data_Promise_reject(Prelude_Types_foldMap_Foldable_List(csegen_50()(), $197 => $197, {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_52(), $3), a2: {a1: '.', a2: {h: 0}}}}), $172, $174);
              }
             };
@@ -3168,36 +3173,36 @@ function Main_handleAuthenticatedArgs($0, $1, $2, $3) {
     case 'list': {
      return $2a8 => {
       switch($3.a2.h) {
-       case 0: /* nil */ return $2aa => Data_Promise_reject('The list command expects the name of a GitHub Team as an argument.', $2a8, $2aa);
+       case 0: /* nil */ return $2aa => Commands_listOrgTeams($0, $2, $2a8, $2aa);
        case undefined: /* cons */ {
-        return $2af => {
+        return $2b0 => {
          switch($3.a2.a2.h) {
-          case 0: /* nil */ return Commands_list($0, $2, $3.a2.a1, $2a8, $2af);
-          default: return Data_Promise_reject(Prelude_Types_foldMap_Foldable_List(csegen_50()(), $2be => $2be, {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_52(), $3), a2: {a1: '.', a2: {h: 0}}}}), $2a8, $2af);
+          case 0: /* nil */ return Commands_list($0, $2, $3.a2.a1, $2a8, $2b0);
+          default: return Data_Promise_reject(Prelude_Types_foldMap_Foldable_List(csegen_50()(), $2bf => $2bf, {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_52(), $3), a2: {a1: '.', a2: {h: 0}}}}), $2a8, $2b0);
          }
         };
        }
-       default: return $2cc => Data_Promise_reject(Prelude_Types_foldMap_Foldable_List(csegen_50()(), $2d4 => $2d4, {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_52(), $3), a2: {a1: '.', a2: {h: 0}}}}), $2a8, $2cc);
+       default: return $2cd => Data_Promise_reject(Prelude_Types_foldMap_Foldable_List(csegen_50()(), $2d5 => $2d5, {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_52(), $3), a2: {a1: '.', a2: {h: 0}}}}), $2a8, $2cd);
       }
      };
     }
     case 'graph': {
-     const $2e2 = Commands_parseGraphArgs($3.a2);
-     switch($2e2.h) {
-      case 1: /* Right */ return Commands_graph($0, $2, $2e2.a1);
-      case 0: /* Left */ return Main_exitError(csegen_73()(), $2e2.a1);
+     const $2e3 = Commands_parseGraphArgs($3.a2);
+     switch($2e3.h) {
+      case 1: /* Right */ return Commands_graph($0, $2, $2e3.a1);
+      case 0: /* Left */ return Main_exitError(csegen_73()(), $2e3.a1);
      }
     }
     case 'assign': {
-     return $2ee => $2ef => {
+     return $2ef => $2f0 => {
       switch($3.a2.h) {
        case undefined: /* cons */ {
         switch($3.a2.a1) {
-         case '--dry': return Data_Promise_x3ex3ex3d_Monad_Promise(csegen_74(), $2f6 => Commands_request($0, $1, $2, $3.a2.a2, 1), $2ee, $2ef);
-         default: return Data_Promise_x3ex3ex3d_Monad_Promise(csegen_74(), $303 => Commands_request($0, $1, $2, $3.a2, 0), $2ee, $2ef);
+         case '--dry': return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(csegen_74(), $2f7 => Commands_request($0, $1, $2, $3.a2.a2, 1), $2ef, $2f0);
+         default: return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(csegen_74(), $304 => Commands_request($0, $1, $2, $3.a2, 0), $2ef, $2f0);
         }
        }
-       default: return Data_Promise_x3ex3ex3d_Monad_Promise(csegen_74(), $310 => Commands_request($0, $1, $2, $3.a2, 0), $2ee, $2ef);
+       default: return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(csegen_74(), $311 => Commands_request($0, $1, $2, $3.a2, 0), $2ef, $2f0);
       }
      };
     }
@@ -3224,18 +3229,18 @@ function Main_handleAuthenticatedArgs($0, $1, $2, $3) {
      }
     }
     case 'label': {
-     return $341 => $342 => {
+     return $342 => $343 => {
       switch($3.a2.h) {
-       case 0: /* nil */ return Data_Promise_reject('The label command expects one or more labels as arguments.', $341, $342);
-       case undefined: /* cons */ return Commands_label($0, $1, $2, {a1: $3.a2.a1, a2: $3.a2.a2}, $341, $342);
-       default: return Data_Promise_reject(Prelude_Types_foldMap_Foldable_List(csegen_50()(), $358 => $358, {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_52(), $3), a2: {a1: '.', a2: {h: 0}}}}), $341, $342);
+       case 0: /* nil */ return Data_Promise_reject('The label command expects one or more labels as arguments.', $342, $343);
+       case undefined: /* cons */ return Commands_label($0, $1, $2, {a1: $3.a2.a1, a2: $3.a2.a2}, $342, $343);
+       default: return Data_Promise_reject(Prelude_Types_foldMap_Foldable_List(csegen_50()(), $359 => $359, {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_52(), $3), a2: {a1: '.', a2: {h: 0}}}}), $342, $343);
       }
      };
     }
-    default: return $366 => $367 => Data_Promise_reject(Prelude_Types_foldMap_Foldable_List(csegen_50()(), $36f => $36f, {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_52(), $3), a2: {a1: '.', a2: {h: 0}}}}), $366, $367);
+    default: return $367 => $368 => Data_Promise_reject(Prelude_Types_foldMap_Foldable_List(csegen_50()(), $370 => $370, {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_52(), $3), a2: {a1: '.', a2: {h: 0}}}}), $367, $368);
    }
   }
-  default: return $37d => $37e => Data_Promise_reject(Prelude_Types_foldMap_Foldable_List(csegen_50()(), $386 => $386, {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_52(), $3), a2: {a1: '.', a2: {h: 0}}}}), $37d, $37e);
+  default: return $37e => $37f => Data_Promise_reject(Prelude_Types_foldMap_Foldable_List(csegen_50()(), $387 => $387, {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_52(), $3), a2: {a1: '.', a2: {h: 0}}}}), $37e, $37f);
  }
 }
 
@@ -3253,34 +3258,34 @@ function Main_handleArgs($0, $1, $2, $3, $4, $5) {
           case undefined: /* cons */ {
            switch($5.a2.a2.a2.a2.h) {
             case 0: /* nil */ return Main_bashCompletion(csegen_31()(), $5.a2.a1, $5.a2.a2.a1, $5.a2.a2.a2.a1);
-            default: return Main_resolvex27x27($15 => $16 => Data_Promise_x3ex3ex3d_Monad_Promise($19 => $1a => Config_loadOrCreateConfig($0, $1, $2, $3, $4, $19, $1a), config => Main_handleConfiguredArgs(config, $0, $1, $5), $15, $16));
+            default: return Main_resolvex27x27($15 => $16 => Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($19 => $1a => Config_loadOrCreateConfig($0, $1, $2, $3, $4, $19, $1a), config => Main_handleConfiguredArgs(config, $0, $1, $5), $15, $16));
            }
           }
-          default: return Main_resolvex27x27($2d => $2e => Data_Promise_x3ex3ex3d_Monad_Promise($31 => $32 => Config_loadOrCreateConfig($0, $1, $2, $3, $4, $31, $32), config => Main_handleConfiguredArgs(config, $0, $1, $5), $2d, $2e));
+          default: return Main_resolvex27x27($2d => $2e => Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($31 => $32 => Config_loadOrCreateConfig($0, $1, $2, $3, $4, $31, $32), config => Main_handleConfiguredArgs(config, $0, $1, $5), $2d, $2e));
          }
         }
-        default: return Main_resolvex27x27($45 => $46 => Data_Promise_x3ex3ex3d_Monad_Promise($49 => $4a => Config_loadOrCreateConfig($0, $1, $2, $3, $4, $49, $4a), config => Main_handleConfiguredArgs(config, $0, $1, $5), $45, $46));
+        default: return Main_resolvex27x27($45 => $46 => Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($49 => $4a => Config_loadOrCreateConfig($0, $1, $2, $3, $4, $49, $4a), config => Main_handleConfiguredArgs(config, $0, $1, $5), $45, $46));
        }
       }
-      default: return Main_resolvex27x27($5d => $5e => Data_Promise_x3ex3ex3d_Monad_Promise($61 => $62 => Config_loadOrCreateConfig($0, $1, $2, $3, $4, $61, $62), config => Main_handleConfiguredArgs(config, $0, $1, $5), $5d, $5e));
+      default: return Main_resolvex27x27($5d => $5e => Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($61 => $62 => Config_loadOrCreateConfig($0, $1, $2, $3, $4, $61, $62), config => Main_handleConfiguredArgs(config, $0, $1, $5), $5d, $5e));
      }
     }
     case '--bash-completion-script': {
      switch($5.a2.h) {
       case 0: /* nil */ return $74 => Prelude_IO_prim__putStr((BashCompletion_script()+'\n'), $74);
-      default: return Main_resolvex27x27($7d => $7e => Data_Promise_x3ex3ex3d_Monad_Promise($81 => $82 => Config_loadOrCreateConfig($0, $1, $2, $3, $4, $81, $82), config => Main_handleConfiguredArgs(config, $0, $1, $5), $7d, $7e));
+      default: return Main_resolvex27x27($7d => $7e => Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($81 => $82 => Config_loadOrCreateConfig($0, $1, $2, $3, $4, $81, $82), config => Main_handleConfiguredArgs(config, $0, $1, $5), $7d, $7e));
      }
     }
     case '--zsh-completion-script': {
      switch($5.a2.h) {
       case 0: /* nil */ return $94 => Prelude_IO_prim__putStr((ZshCompletion_script()+'\n'), $94);
-      default: return Main_resolvex27x27($9d => $9e => Data_Promise_x3ex3ex3d_Monad_Promise($a1 => $a2 => Config_loadOrCreateConfig($0, $1, $2, $3, $4, $a1, $a2), config => Main_handleConfiguredArgs(config, $0, $1, $5), $9d, $9e));
+      default: return Main_resolvex27x27($9d => $9e => Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($a1 => $a2 => Config_loadOrCreateConfig($0, $1, $2, $3, $4, $a1, $a2), config => Main_handleConfiguredArgs(config, $0, $1, $5), $9d, $9e));
      }
     }
-    default: return Main_resolvex27x27($b5 => $b6 => Data_Promise_x3ex3ex3d_Monad_Promise($b9 => $ba => Config_loadOrCreateConfig($0, $1, $2, $3, $4, $b9, $ba), config => Main_handleConfiguredArgs(config, $0, $1, $5), $b5, $b6));
+    default: return Main_resolvex27x27($b5 => $b6 => Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($b9 => $ba => Config_loadOrCreateConfig($0, $1, $2, $3, $4, $b9, $ba), config => Main_handleConfiguredArgs(config, $0, $1, $5), $b5, $b6));
    }
   }
-  default: return Main_resolvex27x27($cd => $ce => Data_Promise_x3ex3ex3d_Monad_Promise($d1 => $d2 => Config_loadOrCreateConfig($0, $1, $2, $3, $4, $d1, $d2), config => Main_handleConfiguredArgs(config, $0, $1, $5), $cd, $ce));
+  default: return Main_resolvex27x27($cd => $ce => Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($d1 => $d2 => Config_loadOrCreateConfig($0, $1, $2, $3, $4, $d1, $d2), config => Main_handleConfiguredArgs(config, $0, $1, $5), $cd, $ce));
  }
 }
 
@@ -3306,7 +3311,7 @@ function Main_exitError($0, $1) {
 
 /* Main.bashCompletion : HasIO io => String -> String -> String -> io () */
 function Main_bashCompletion($0, $1, $2, $3) {
- const $4 = Prelude_Types_maybe(() => Main_n__8404_1285_configuredOpts($0, $3, $2, $1), () => $d => $0.a1.a1.a2(undefined)($d), BashCompletion_cmdOpts($1, $2, $3));
+ const $4 = Prelude_Types_maybe(() => Main_n__8546_1285_configuredOpts($0, $3, $2, $1), () => $d => $0.a1.a1.a2(undefined)($d), BashCompletion_cmdOpts($1, $2, $3));
  return $0.a1.a2(undefined)(undefined)($4)($24 => $0.a2(undefined)($2a => Prelude_IO_prim__putStr(Data_String_fastUnlines($24), $2a)));
 }
 
@@ -6387,7 +6392,7 @@ function Data_Config_n__9815_4806_exactlyOneOf($0, $1, $2, $3) {
 
 /* Data.Config.show */
 function Data_Config_show_Show_Config($0) {
- return Data_String_fastUnlines({a1: Prelude_Types_foldMap_Foldable_List(csegen_50()(), $9 => $9, {a1: '       updatedAt: ', a2: {a1: Prelude_Show_show_Show_Bits32($0.a1), a2: {h: 0}}}), a2: {a1: Prelude_Types_foldMap_Foldable_List(csegen_50()(), $19 => $19, {a1: '           theme: ', a2: {a1: Data_Theme_show_Show_Theme($0.a14), a2: {h: 0}}}), a2: {a1: Prelude_Types_foldMap_Foldable_List(csegen_50()(), $29 => $29, {a1: '             org: ', a2: {a1: Prelude_Show_show_Show_String($0.a2), a2: {h: 0}}}), a2: {a1: Prelude_Types_foldMap_Foldable_List(csegen_50()(), $39 => $39, {a1: '            repo: ', a2: {a1: Prelude_Show_show_Show_String($0.a3), a2: {h: 0}}}), a2: {a1: Prelude_Types_foldMap_Foldable_List(csegen_50()(), $49 => $49, {a1: '   defaultRemote: ', a2: {a1: Prelude_Show_show_Show_String($0.a4), a2: {h: 0}}}), a2: {a1: Prelude_Types_foldMap_Foldable_List(csegen_50()(), $59 => $59, {a1: '      mainBranch: ', a2: {a1: Prelude_Show_show_Show_String($0.a5), a2: {h: 0}}}), a2: {a1: Prelude_Types_foldMap_Foldable_List(csegen_50()(), $69 => $69, {a1: '    requestTeams: ', a2: {a1: Prelude_Show_show_Show_Bool($0.a6), a2: {h: 0}}}), a2: {a1: Prelude_Types_foldMap_Foldable_List(csegen_50()(), $79 => $79, {a1: '    requestUsers: ', a2: {a1: Prelude_Show_show_Show_Bool($0.a7), a2: {h: 0}}}), a2: {a1: Prelude_Types_foldMap_Foldable_List(csegen_50()(), $89 => $89, {a1: 'commentOnRequest: ', a2: {a1: Prelude_Show_show_Show_Bool($0.a8), a2: {h: 0}}}), a2: {a1: Prelude_Types_foldMap_Foldable_List(csegen_50()(), $99 => $99, {a1: '       teamSlugs: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_52(), $0.a9), a2: {h: 0}}}), a2: {a1: Prelude_Types_foldMap_Foldable_List(csegen_50()(), $ab => $ab, {a1: '      repoLabels: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_52(), $0.a10), a2: {h: 0}}}), a2: {a1: Prelude_Types_foldMap_Foldable_List(csegen_50()(), $bd => $bd, {a1: '      orgMembers: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_52(), $0.a11), a2: {h: 0}}}), a2: {a1: Prelude_Types_foldMap_Foldable_List(csegen_50()(), $cf => $cf, {a1: '      ignoredPRs: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29({a1: x => Prelude_Show_show_Show_Integer(x), a2: d => x => Prelude_Show_showPrec_Show_Integer(d, x)}, $0.a12), a2: {h: 0}}}), a2: {a1: Prelude_Types_foldMap_Foldable_List(csegen_50()(), $e7 => $e7, {a1: '       githubPAT: ', a2: {a1: Data_Config_n__9286_4289_personalAccessToken($0), a2: {h: 0}}}), a2: {h: 0}}}}}}}}}}}}}}});
+ return Data_String_fastUnlines({a1: Prelude_Types_foldMap_Foldable_List(csegen_50()(), $9 => $9, {a1: '       updatedAt: ', a2: {a1: Prelude_Show_show_Show_Bits32($0.a1), a2: {h: 0}}}), a2: {a1: Prelude_Types_foldMap_Foldable_List(csegen_50()(), $19 => $19, {a1: '           theme: ', a2: {a1: Data_Theme_show_Show_Theme($0.a14), a2: {h: 0}}}), a2: {a1: Prelude_Types_foldMap_Foldable_List(csegen_50()(), $29 => $29, {a1: '     org or user: ', a2: {a1: Prelude_Show_show_Show_String($0.a2), a2: {h: 0}}}), a2: {a1: Prelude_Types_foldMap_Foldable_List(csegen_50()(), $39 => $39, {a1: '            repo: ', a2: {a1: Prelude_Show_show_Show_String($0.a3), a2: {h: 0}}}), a2: {a1: Prelude_Types_foldMap_Foldable_List(csegen_50()(), $49 => $49, {a1: '   defaultRemote: ', a2: {a1: Prelude_Show_show_Show_String($0.a4), a2: {h: 0}}}), a2: {a1: Prelude_Types_foldMap_Foldable_List(csegen_50()(), $59 => $59, {a1: '      mainBranch: ', a2: {a1: Prelude_Show_show_Show_String($0.a5), a2: {h: 0}}}), a2: {a1: Prelude_Types_foldMap_Foldable_List(csegen_50()(), $69 => $69, {a1: '    requestTeams: ', a2: {a1: Prelude_Show_show_Show_Bool($0.a6), a2: {h: 0}}}), a2: {a1: Prelude_Types_foldMap_Foldable_List(csegen_50()(), $79 => $79, {a1: '    requestUsers: ', a2: {a1: Prelude_Show_show_Show_Bool($0.a7), a2: {h: 0}}}), a2: {a1: Prelude_Types_foldMap_Foldable_List(csegen_50()(), $89 => $89, {a1: 'commentOnRequest: ', a2: {a1: Prelude_Show_show_Show_Bool($0.a8), a2: {h: 0}}}), a2: {a1: Prelude_Types_foldMap_Foldable_List(csegen_50()(), $99 => $99, {a1: '       teamSlugs: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_52(), $0.a9), a2: {h: 0}}}), a2: {a1: Prelude_Types_foldMap_Foldable_List(csegen_50()(), $ab => $ab, {a1: '      repoLabels: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_52(), $0.a10), a2: {h: 0}}}), a2: {a1: Prelude_Types_foldMap_Foldable_List(csegen_50()(), $bd => $bd, {a1: '      orgMembers: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_52(), $0.a11), a2: {h: 0}}}), a2: {a1: Prelude_Types_foldMap_Foldable_List(csegen_50()(), $cf => $cf, {a1: '      ignoredPRs: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29({a1: x => Prelude_Show_show_Show_Integer(x), a2: d => x => Prelude_Show_showPrec_Show_Integer(d, x)}, $0.a12), a2: {h: 0}}}), a2: {a1: Prelude_Types_foldMap_Foldable_List(csegen_50()(), $e7 => $e7, {a1: '       githubPAT: ', a2: {a1: Data_Config_n__9286_4289_personalAccessToken($0), a2: {h: 0}}}), a2: {h: 0}}}}}}}}}}}}}}});
 }
 
 /* Data.Config.show */
@@ -7434,18 +7439,18 @@ function Util_with__yesNoPromptx2cyesUnlessNo_1314($0, $1, $2, $3, $4) {
  }
 }
 
-/* Util.5282:1306:yesUnlessNo */
-function Util_n__5282_1306_yesUnlessNo($0, $1, $2) {
+/* Util.5304:1306:yesUnlessNo */
+function Util_n__5304_1306_yesUnlessNo($0, $1, $2) {
  return Util_with__yesNoPromptx2cyesUnlessNo_1314(undefined, $0, $1, $2, Data_String_toLower($2));
 }
 
-/* Util.5385:1413:startOver */
-const Util_n__5385_1413_startOver = __lazy(function () {
+/* Util.5408:1414:startOver */
+const Util_n__5408_1414_startOver = __lazy(function () {
  return {a1: 0, a2: {h: 0}};
 });
 
-/* Util.5385:1412:guardSuccess */
-function Util_n__5385_1412_guardSuccess($0) {
+/* Util.5408:1413:guardSuccess */
+function Util_n__5408_1413_guardSuccess($0) {
  switch($0.h) {
   case undefined: /* cons */ {
    switch($0.a1) {
@@ -7458,13 +7463,13 @@ function Util_n__5385_1412_guardSuccess($0) {
  }
 }
 
-/* Util.5385:1411:go */
-function Util_n__5385_1411_go($0, $1) {
+/* Util.5408:1412:go */
+function Util_n__5408_1412_go($0, $1) {
  switch($0.a1) {
   case 0: {
    switch(Prelude_Types_isAlpha($1)) {
     case 1: return {a1: 1, a2: {a1: $1, a2: $0.a2}};
-    case 0: return Util_n__5385_1413_startOver();
+    case 0: return Util_n__5408_1414_startOver();
    }
   }
   case 1: {
@@ -7473,7 +7478,7 @@ function Util_n__5385_1411_go($0, $1) {
     default: {
      switch(Prelude_Types_isAlpha($1)) {
       case 1: return {a1: 1, a2: {a1: $1, a2: $0.a2}};
-      case 0: return Util_n__5385_1413_startOver();
+      case 0: return Util_n__5408_1414_startOver();
      }
     }
    }
@@ -7481,7 +7486,7 @@ function Util_n__5385_1411_go($0, $1) {
   case 2: {
    switch(Prelude_Types_isDigit($1)) {
     case 1: return {a1: 3, a2: {a1: $1, a2: $0.a2}};
-    case 0: return Util_n__5385_1413_startOver();
+    case 0: return Util_n__5408_1414_startOver();
    }
   }
   case 3: {
@@ -7494,8 +7499,8 @@ function Util_n__5385_1411_go($0, $1) {
  }
 }
 
-/* Util.5169:1194:getMoreLines */
-function Util_n__5169_1194_getMoreLines($0, $1, $2) {
+/* Util.5191:1194:getMoreLines */
+function Util_n__5191_1194_getMoreLines($0, $1, $2) {
  switch($2.h) {
   case 0: /* nothing */ return $0.a1.a1.a2(undefined)(Prelude_Types_List_reverse($1));
   case undefined: /* just */ {
@@ -7506,13 +7511,13 @@ function Util_n__5169_1194_getMoreLines($0, $1, $2) {
        case '': {
         switch(line) {
          case '': return $0.a1.a1.a2(undefined)(Prelude_Types_List_reverse($1.a2));
-         default: return Util_n__5169_1194_getMoreLines($0, {a1: line, a2: $1}, $2.a1());
+         default: return Util_n__5191_1194_getMoreLines($0, {a1: line, a2: $1}, $2.a1());
         }
        }
-       default: return Util_n__5169_1194_getMoreLines($0, {a1: line, a2: $1}, $2.a1());
+       default: return Util_n__5191_1194_getMoreLines($0, {a1: line, a2: $1}, $2.a1());
       }
      }
-     default: return Util_n__5169_1194_getMoreLines($0, {a1: line, a2: $1}, $2.a1());
+     default: return Util_n__5191_1194_getMoreLines($0, {a1: line, a2: $1}, $2.a1());
     }
    };
    return $0.a1.a2(undefined)(undefined)($0.a1.a1.a1(undefined)(undefined)($20 => Data_String_trim($20))($0.a2(undefined)($29 => Prelude_IO_prim__getStr($29))))($2c);
@@ -7522,7 +7527,7 @@ function Util_n__5169_1194_getMoreLines($0, $1, $2) {
 
 /* Util.yesNoPrompt : HasIO io => String -> io Bool */
 function Util_yesNoPrompt($0, $1) {
- return $0.a1.a2(undefined)(undefined)($0.a2(undefined)($10 => Prelude_IO_prim__putStr(Prelude_Types_foldMap_Foldable_List(csegen_50()(), $18 => $18, {a1: $1, a2: {a1: ' [Y/n] ', a2: {h: 0}}}), $10)))($20 => $0.a1.a1.a1(undefined)(undefined)($2b => Util_n__5282_1306_yesUnlessNo($0, $1, Data_String_trim($2b)))($0.a2(undefined)($38 => Prelude_IO_prim__getStr($38))));
+ return $0.a1.a2(undefined)(undefined)($0.a2(undefined)($10 => Prelude_IO_prim__putStr(Prelude_Types_foldMap_Foldable_List(csegen_50()(), $18 => $18, {a1: $1, a2: {a1: ' [Y/n] ', a2: {h: 0}}}), $10)))($20 => $0.a1.a1.a1(undefined)(undefined)($2b => Util_n__5304_1306_yesUnlessNo($0, $1, Data_String_trim($2b)))($0.a2(undefined)($38 => Prelude_IO_prim__getStr($38))));
 }
 
 /* Util.whenNothing : Applicative f => Maybe a -> f () -> f () */
@@ -7543,14 +7548,14 @@ function Util_renderIO($0, $1, $2) {
  return $1.a2(undefined)($8 => Text_PrettyPrint_Prettyprinter_Render_Terminal_renderIO(Text_PrettyPrint_Prettyprinter_Doc_layoutPretty(Util_layoutOptions($0), Util_colorize($0, $2)), $8));
 }
 
-/* Util.relativeToRoot : Git => String -> Promise String */
+/* Util.relativeToRoot : Git => String -> Promise' String */
 function Util_relativeToRoot($0, $1, $2, $3) {
- return Data_Promise_map_Functor_Promise($6 => ($6+Prelude_Types_foldMap_Foldable_List(csegen_50()(), $e => $e, {a1: '/', a2: {a1: $1, a2: {h: 0}}})), $15 => $16 => FFI_Git_rootDir($0, $15, $16), $2, $3);
+ return Data_Promise_map_Functor_x28Promisex20x24ex29($6 => ($6+Prelude_Types_foldMap_Foldable_List(csegen_50()(), $e => $e, {a1: '/', a2: {a1: $1, a2: {h: 0}}})), $15 => $16 => FFI_Git_rootDir($0, $15, $16), $2, $3);
 }
 
 /* Util.parseJiraPrefix : String -> Maybe String */
 function Util_parseJiraPrefix($0) {
- return Prelude_Types_map_Functor_Maybe($3 => Prelude_Types_fastPack(Prelude_Types_List_reverse($3)), Util_n__5385_1412_guardSuccess(Prelude_Types_foldl_Foldable_List($d => $e => Util_n__5385_1411_go($d, $e), Util_n__5385_1413_startOver(), Prelude_Types_fastUnpack($0))));
+ return Prelude_Types_map_Functor_Maybe($3 => Prelude_Types_fastPack(Prelude_Types_List_reverse($3)), Util_n__5408_1413_guardSuccess(Prelude_Types_foldl_Foldable_List($d => $e => Util_n__5408_1412_go($d, $e), Util_n__5408_1414_startOver(), Prelude_Types_fastUnpack($0))));
 }
 
 /* Util.optionsWithBestWidth : Nat -> LayoutOptions */
@@ -7577,7 +7582,7 @@ function Util_layoutOptions($0) {
 
 /* Util.getManyLines : HasIO io => Fuel -> io (List String) */
 function Util_getManyLines($0, $1) {
- return Util_n__5169_1194_getMoreLines($0, {h: 0}, $1);
+ return Util_n__5191_1194_getMoreLines($0, {h: 0}, $1);
 }
 
 /* Util.colorize : Config => Doc AnsiStyle -> Doc AnsiStyle */
@@ -7589,7 +7594,7 @@ function Util_colorize($0, $1) {
 }
 
 /* FFI.Git.case block in unpushedCommits */
-function FFI_Git_case__unpushedCommits_2011($0, $1, $2) {
+function FFI_Git_case__unpushedCommits_2494($0, $1, $2) {
  switch($1) {
   case '': {
    switch($2.h) {
@@ -7602,7 +7607,7 @@ function FFI_Git_case__unpushedCommits_2011($0, $1, $2) {
 }
 
 /* FFI.Git.case block in stagedChanges */
-function FFI_Git_case__stagedChanges_1948($0, $1, $2) {
+function FFI_Git_case__stagedChanges_2429($0, $1, $2) {
  switch($1) {
   case '': {
    switch($2.h) {
@@ -7615,7 +7620,7 @@ function FFI_Git_case__stagedChanges_1948($0, $1, $2) {
 }
 
 /* FFI.Git.case block in uncommittedChanges */
-function FFI_Git_case__uncommittedChanges_1885($0, $1, $2) {
+function FFI_Git_case__uncommittedChanges_2364($0, $1, $2) {
  switch($1) {
   case '': {
    switch($2.h) {
@@ -7628,7 +7633,7 @@ function FFI_Git_case__uncommittedChanges_1885($0, $1, $2) {
 }
 
 /* FFI.Git.case block in remoteTrackingBranch */
-function FFI_Git_case__remoteTrackingBranch_1822($0, $1, $2) {
+function FFI_Git_case__remoteTrackingBranch_2299($0, $1, $2) {
  switch($1) {
   case '': {
    switch($2.h) {
@@ -7640,54 +7645,54 @@ function FFI_Git_case__remoteTrackingBranch_1822($0, $1, $2) {
  }
 }
 
-/* FFI.Git.userEmail : Git => Promise String */
+/* FFI.Git.userEmail : Git => Promise' String */
 function FFI_Git_userEmail($0, $1, $2) {
  return FFI_promiseIO($5 => $6 => $7 => FFI_Git_prim__userEmail($0, $5, $6, $7), $1, $2);
 }
 
-/* FFI.Git.unpushedCommits : Git => Promise (Maybe String) */
+/* FFI.Git.unpushedCommits : Git => Promise' (Maybe String) */
 function FFI_Git_unpushedCommits($0, $1, $2) {
- return Data_Promise_x3ex3ex3d_Monad_Promise($5 => $6 => FFI_promiseIO($9 => $a => $b => FFI_Git_prim__unpushedCommits($0, $9, $a, $b), $5, $6), str => $14 => $15 => Data_Promise_pure_Applicative_Promise(FFI_Git_case__unpushedCommits_2011($0, str, Data_String_strM(str)), $14, $15), $1, $2);
+ return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($5 => $6 => FFI_promiseIO($9 => $a => $b => FFI_Git_prim__unpushedCommits($0, $9, $a, $b), $5, $6), str => $14 => $15 => Data_Promise_pure_Applicative_x28Promisex20x24ex29(FFI_Git_case__unpushedCommits_2494($0, str, Data_String_strM(str)), $14, $15), $1, $2);
 }
 
-/* FFI.Git.uncommittedChanges : Git => Promise (Maybe String) */
+/* FFI.Git.uncommittedChanges : Git => Promise' (Maybe String) */
 function FFI_Git_uncommittedChanges($0, $1, $2) {
- return Data_Promise_x3ex3ex3d_Monad_Promise($5 => $6 => FFI_promiseIO($9 => $a => $b => FFI_Git_prim__uncommittedChanges($0, $9, $a, $b), $5, $6), str => $14 => $15 => Data_Promise_pure_Applicative_Promise(FFI_Git_case__uncommittedChanges_1885($0, str, Data_String_strM(str)), $14, $15), $1, $2);
+ return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($5 => $6 => FFI_promiseIO($9 => $a => $b => FFI_Git_prim__uncommittedChanges($0, $9, $a, $b), $5, $6), str => $14 => $15 => Data_Promise_pure_Applicative_x28Promisex20x24ex29(FFI_Git_case__uncommittedChanges_2364($0, str, Data_String_strM(str)), $14, $15), $1, $2);
 }
 
-/* FFI.Git.stagedChanges : Git => Promise (Maybe String) */
+/* FFI.Git.stagedChanges : Git => Promise' (Maybe String) */
 function FFI_Git_stagedChanges($0, $1, $2) {
- return Data_Promise_x3ex3ex3d_Monad_Promise($5 => $6 => FFI_promiseIO($9 => $a => $b => FFI_Git_prim__stagedChanges($0, $9, $a, $b), $5, $6), str => $14 => $15 => Data_Promise_pure_Applicative_Promise(FFI_Git_case__stagedChanges_1948($0, str, Data_String_strM(str)), $14, $15), $1, $2);
+ return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($5 => $6 => FFI_promiseIO($9 => $a => $b => FFI_Git_prim__stagedChanges($0, $9, $a, $b), $5, $6), str => $14 => $15 => Data_Promise_pure_Applicative_x28Promisex20x24ex29(FFI_Git_case__stagedChanges_2429($0, str, Data_String_strM(str)), $14, $15), $1, $2);
 }
 
-/* FFI.Git.rootDir : Git => Promise String */
+/* FFI.Git.rootDir : Git => Promise' String */
 function FFI_Git_rootDir($0, $1, $2) {
  return FFI_promiseIO($5 => $6 => $7 => FFI_Git_prim__rootDir($0, $5, $6, $7), $1, $2);
 }
 
-/* FFI.Git.remoteURI : Git => String -> Promise String */
+/* FFI.Git.remoteURI : Git => String -> Promise' String */
 function FFI_Git_remoteURI($0, $1, $2, $3) {
  return FFI_promiseIO($6 => $7 => $8 => FFI_Git_prim__remoteURI($0, $1, $6, $7, $8), $2, $3);
 }
 
-/* FFI.Git.remoteTrackingBranch : Git => Promise (Maybe String) */
+/* FFI.Git.remoteTrackingBranch : Git => Promise' (Maybe String) */
 function FFI_Git_remoteTrackingBranch($0, $1, $2) {
- return Data_Promise_x3ex3ex3d_Monad_Promise($5 => $6 => FFI_promiseIO($9 => $a => $b => FFI_Git_prim__remoteTrackingBranch($0, $9, $a, $b), $5, $6), str => $14 => $15 => Data_Promise_pure_Applicative_Promise(FFI_Git_case__remoteTrackingBranch_1822($0, str, Data_String_strM(str)), $14, $15), $1, $2);
+ return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($5 => $6 => FFI_promiseIO($9 => $a => $b => FFI_Git_prim__remoteTrackingBranch($0, $9, $a, $b), $5, $6), str => $14 => $15 => Data_Promise_pure_Applicative_x28Promisex20x24ex29(FFI_Git_case__remoteTrackingBranch_2299($0, str, Data_String_strM(str)), $14, $15), $1, $2);
 }
 
-/* FFI.Git.pushNewBranch : Git => String -> String -> Promise () */
+/* FFI.Git.pushNewBranch : Git => String -> String -> Promise' () */
 function FFI_Git_pushNewBranch($0, $1, $2, $3, $4) {
- return Data_Promise_map_Functor_Promise($7 => (undefined), $9 => $a => FFI_promiseIO($d => $e => $f => FFI_Git_prim__pushNewBranch($0, $1, $2, $d, $e, $f), $9, $a), $3, $4);
+ return Data_Promise_map_Functor_x28Promisex20x24ex29($7 => (undefined), $9 => $a => FFI_promiseIO($d => $e => $f => FFI_Git_prim__pushNewBranch($0, $1, $2, $d, $e, $f), $9, $a), $3, $4);
 }
 
-/* FFI.Git.push : Git => Promise () */
+/* FFI.Git.push : Git => Promise' () */
 function FFI_Git_push($0, $1, $2) {
- return Data_Promise_map_Functor_Promise($5 => (undefined), $7 => $8 => FFI_promiseIO($b => $c => $d => FFI_Git_prim__push($0, $b, $c, $d), $7, $8), $1, $2);
+ return Data_Promise_map_Functor_x28Promisex20x24ex29($5 => (undefined), $7 => $8 => FFI_promiseIO($b => $c => $d => FFI_Git_prim__push($0, $b, $c, $d), $7, $8), $1, $2);
 }
 
-/* FFI.Git.listRemotes : Git => Promise (List String) */
+/* FFI.Git.listRemotes : Git => Promise' (List String) */
 function FFI_Git_listRemotes($0, $1, $2) {
- return Data_Promise_map_Functor_Promise($5 => Data_String_lines($5), $9 => $a => FFI_promiseIO($d => $e => $f => FFI_Git_prim__listRemotes($0, $d, $e, $f), $9, $a), $1, $2);
+ return Data_Promise_map_Functor_x28Promisex20x24ex29($5 => Data_String_lines($5), $9 => $a => FFI_promiseIO($d => $e => $f => FFI_Git_prim__listRemotes($0, $d, $e, $f), $9, $a), $1, $2);
 }
 
 /* FFI.Git.git : HasIO io => io Git */
@@ -7695,49 +7700,49 @@ function FFI_Git_git($0) {
  return $0.a1.a1.a1(undefined)(undefined)($b => $b)($0.a2(undefined)($12 => FFI_Git_prim__git($12)));
 }
 
-/* FFI.Git.currentBranch : Git => Promise String */
+/* FFI.Git.currentBranch : Git => Promise' String */
 function FFI_Git_currentBranch($0, $1, $2) {
  return FFI_promiseIO($5 => $6 => $7 => FFI_Git_prim__currentBranch($0, $5, $6, $7), $1, $2);
 }
 
-/* FFI.Git.checkoutBranch : Git => String -> Promise () */
+/* FFI.Git.checkoutBranch : Git => String -> Promise' () */
 function FFI_Git_checkoutBranch($0, $1, $2, $3) {
- return Data_Promise_map_Functor_Promise($6 => (undefined), $8 => $9 => FFI_promiseIO($c => $d => $e => FFI_Git_prim__checkoutBranch($0, $1, $c, $d, $e), $8, $9), $2, $3);
+ return Data_Promise_map_Functor_x28Promisex20x24ex29($6 => (undefined), $8 => $9 => FFI_promiseIO($c => $d => $e => FFI_Git_prim__checkoutBranch($0, $1, $c, $d, $e), $8, $9), $2, $3);
 }
 
-/* FFI.promiseIO : ((String -> PrimIO ()) -> (String -> PrimIO ()) -> PrimIO ()) -> Promise String */
+/* FFI.promiseIO : ((String -> PrimIO ()) -> (String -> PrimIO ()) -> PrimIO ()) -> Promise String String */
 function FFI_promiseIO($0, $1, $2) {
  return Data_Promise_promisify(ok => notOk => $0(res => ok(res))(err => notOk(err)), $1, $2);
 }
 
 /* Data.Promise.pure */
-function Data_Promise_pure_Applicative_Promise($0, $1, $2) {
+function Data_Promise_pure_Applicative_x28Promisex20x24ex29($0, $1, $2) {
  return $1($0);
 }
 
 /* Data.Promise.map */
-function Data_Promise_map_Functor_Promise($0, $1, $2, $3) {
- return $1(x => $2($0(x)))($3);
+function Data_Promise_map_Functor_x28Promisex20x24ex29($0, $1, $2, $3) {
+ return $1($7 => $2($0($7)))($3);
 }
 
 /* Data.Promise.liftIO */
-function Data_Promise_liftIO_HasIO_Promise($0, $1, $2, $3) {
+function Data_Promise_liftIO_HasIO_x28Promisex20x24ex29($0, $1, $2, $3) {
  const $4 = $0($3);
  return $1($4)($3);
 }
 
 /* Data.Promise.join */
-function Data_Promise_join_Monad_Promise($0) {
- return $1 => $2 => Data_Promise_x3ex3ex3d_Monad_Promise($0, $6 => $6, $1, $2);
+function Data_Promise_join_Monad_x28Promisex20x24ex29($0) {
+ return $1 => $2 => Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($0, $6 => $6, $1, $2);
 }
 
 /* Data.Promise.>>= */
-function Data_Promise_x3ex3ex3d_Monad_Promise($0, $1, $2, $3) {
+function Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($0, $1, $2, $3) {
  return Data_Promise_bind($0, $1, $2, $3);
 }
 
 /* Data.Promise.<|> */
-function Data_Promise_x3cx7cx3e_Alternative_Promise($0, $1, $2, $3) {
+function Data_Promise_x3cx7cx3e_Alternative_x28Promisex20Stringx29($0, $1, $2, $3) {
  const $7 = $8 => {
   const $b = $1();
   const $a = $b;
@@ -7748,36 +7753,50 @@ function Data_Promise_x3cx7cx3e_Alternative_Promise($0, $1, $2, $3) {
 }
 
 /* Data.Promise.<*> */
-function Data_Promise_x3cx2ax3e_Applicative_Promise($0, $1, $2, $3) {
- return Data_Promise_bind($0, f => $7 => $8 => Data_Promise_map_Functor_Promise(f, $1, $7, $8), $2, $3);
+function Data_Promise_x3cx2ax3e_Applicative_x28Promisex20x24ex29($0, $1, $2, $3) {
+ return Data_Promise_bind($0, f => $7 => $8 => Data_Promise_map_Functor_x28Promisex20x24ex29(f, $1, $7, $8), $2, $3);
 }
 
-/* Data.Promise.resolve' : (a -> IO ()) -> (String -> IO ()) -> Promise a -> IO () */
+/* Data.Promise.resolve' : (a -> IO ()) -> (e -> IO ()) -> Promise e a -> IO () */
 function Data_Promise_resolvex27($0, $1, $2) {
  return $2($0)($1);
 }
 
-/* Data.Promise.reject : String -> Promise a */
+/* Data.Promise.reject : e -> Promise e a */
 function Data_Promise_reject($0, $1, $2) {
  return $2($0);
 }
 
-/* Data.Promise.promisify : PromiseShape a -> Promise a */
+/* Data.Promise.promisify : PromiseShape e a -> Promise e a */
 function Data_Promise_promisify($0, $1, $2) {
  return $0($1)($2);
 }
 
-/* Data.Promise.either : Show e => Either e a -> Promise a */
-function Data_Promise_either($0, $1, $2) {
- return $3 => {
-  switch($1.h) {
-   case 0: /* Left */ return Data_Promise_reject($0.a1($1.a1), $2, $3);
-   case 1: /* Right */ return Data_Promise_pure_Applicative_Promise($1.a1, $2, $3);
+/* Data.Promise.mapError : (e -> e') -> Promise e a -> Promise e' a */
+function Data_Promise_mapError($0, $1, $2, $3) {
+ return $1($2)($8 => $3($0($8)));
+}
+
+/* Data.Promise.either : Either e a -> Promise e a */
+function Data_Promise_either($0, $1) {
+ return $2 => {
+  switch($0.h) {
+   case 0: /* Left */ return Data_Promise_reject($0.a1, $1, $2);
+   case 1: /* Right */ return Data_Promise_pure_Applicative_x28Promisex20x24ex29($0.a1, $1, $2);
   }
  };
 }
 
-/* Data.Promise.bind : Promise a -> (a -> Promise b) -> Promise b */
+/* Data.Promise.bindError : Promise e a -> (e -> Promise e' a) -> Promise e' a */
+function Data_Promise_bindError($0, $1, $2, $3) {
+ const $7 = x => {
+  const $8 = $1(x);
+  return $8($2)($3);
+ };
+ return $0($2)($7);
+}
+
+/* Data.Promise.bind : Promise e a -> (a -> Promise e b) -> Promise e b */
 function Data_Promise_bind($0, $1, $2, $3) {
  const $6 = x => {
   const $7 = $1(x);
@@ -8357,18 +8376,18 @@ function Help_subcommandHelpx27($0) {
   case 'config': return Help_subcommand($0, {a1: Help_argument(1, '<property>'), a2: {a1: Help_argument(0, '<value>'), a2: {h: 0}}}, {a1: Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29(Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29(Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29(Text_PrettyPrint_Prettyprinter_Util_reflow(Prelude_Types_foldMap_Foldable_List(csegen_50()(), $5c => $5c, {a1: 'Get or set the value of a configuration property. Not all properties\ncan be set and read via this subcommand.', a2: {h: 0}})), Text_PrettyPrint_Prettyprinter_Doc_line()), Help_argumentx27('properties')), Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Text_PrettyPrint_Prettyprinter_Doc_unsafeTextWithoutNewLines(':'), a2: {h: 0}})), Text_PrettyPrint_Prettyprinter_Doc_align(Text_PrettyPrint_Prettyprinter_Doc_concatWith(a => b => Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29(Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29(Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29(a, Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Text_PrettyPrint_Prettyprinter_Doc_unsafeTextWithoutNewLines(','), a2: {h: 0}})), Text_PrettyPrint_Prettyprinter_Doc_softline()), b), Prelude_Types_List_mapAppend({h: 0}, $85 => Help_option($85), Data_Config_settablePropNames())))), a2: {h: 0}});
   case 'pr': return Help_subcommand($0, {a1: Help_argument(0, '--draft'), a2: csegen_311()}, {a1: Text_PrettyPrint_Prettyprinter_Util_reflow('Identify an existing PR or create a new one for the current branch.'), a2: csegen_317()});
   case 'contribute': return Help_subcommand($0, {a1: Help_argument(0, '-c/--checkout'), a2: {a1: Help_argument(0, '-<num>'), a2: {a1: Help_argument(0, '-i/--ignore {<uri>/<pr-number>}'), a2: {h: 0}}}}, {a1: Text_PrettyPrint_Prettyprinter_Util_reflow(Prelude_Types_foldMap_Foldable_List(csegen_50()(), $b5 => $b5, {a1: 'Contribute to an open PR. Prints a URL. Prioritizes PRs you are\nrequested to review but will also return other PRs.', a2: {h: 0}})), a2: {a1: Text_PrettyPrint_Prettyprinter_Util_reflow(Prelude_Types_foldMap_Foldable_List(csegen_50()(), $c2 => $c2, {a1: 'Use dash followed by a number (e.g. \'-3\') to skip that number of\npotential PRs and return the next.', a2: {h: 0}})), a2: {a1: Text_PrettyPrint_Prettyprinter_Util_reflow(Prelude_Types_foldMap_Foldable_List(csegen_50()(), $cf => $cf, {a1: 'Specify a PR to ignore (only affects the local Harmony config on\nthis machine) if you would like to more permanently skip a potential\nPR. Do this with the \'--ignore\' option followed by a GitHub URI or\nPull Request number.', a2: {h: 0}})), a2: {h: 0}}}});
-  case 'graph': return Help_subcommand($0, {a1: Help_argument(0, '-c/--completed'), a2: csegen_351()}, {a1: Text_PrettyPrint_Prettyprinter_Util_reflow('Graph the relative review workload of the members of the given GitHub Team.'), a2: {h: 0}});
+  case 'graph': return Help_subcommand($0, {a1: Help_argument(0, '-c/--completed'), a2: {a1: Help_argument(1, '<team-slug>'), a2: {h: 0}}}, {a1: Text_PrettyPrint_Prettyprinter_Util_reflow('Graph the relative review workload of the members of the given GitHub Team.'), a2: {h: 0}});
   case 'help': return Help_subcommand($0, {a1: Help_argument(0, '<subcommand>'), a2: {h: 0}}, {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('Print help'), a2: {h: 0}});
   case 'version': return Help_subcommand($0, {h: 0}, {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('Print version'), a2: {h: 0}});
   case 'sync': return Help_subcommand($0, {h: 0}, {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('Synchronize local config with information from GitHub.'), a2: {h: 0}});
   case 'branch': return Help_subcommand($0, {h: 0}, {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('Print the GitHub URI for the currently checked out branch.'), a2: {h: 0}});
   case 'whoami': return Help_subcommand($0, {h: 0}, {a1: Text_PrettyPrint_Prettyprinter_Util_reflow('Print information about the configured and authenticated user.'), a2: {h: 0}});
   case 'reflect': return Help_subcommand($0, {h: 0}, {a1: Text_PrettyPrint_Prettyprinter_Util_reflow('Reflect on the current state of ones own PRs and review requests.'), a2: {h: 0}});
-  case 'list': return Help_subcommand($0, csegen_351(), {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('List the members of the given GitHub Team.'), a2: {h: 0}});
+  case 'list': return Help_subcommand($0, {a1: Help_argument(0, '<team-slug>'), a2: {h: 0}}, {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('List all teams or the members of the given GitHub Team.'), a2: {h: 0}});
   case 'health': return Help_subcommand($0, {h: 0}, {a1: Text_PrettyPrint_Prettyprinter_Util_reflow('Graph all open PRs grouped by the month they were created.'), a2: {h: 0}});
   case 'rq': return Help_subcommand($0, {h: 0}, {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('Alias for \'request\' command.'), a2: {h: 0}});
   case 'assign': return Help_subcommand($0, {h: 0}, {a1: Help_warning('Deprecated alias for \'request\' command.'), a2: {h: 0}});
-  default: return Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(Prelude_Types_foldMap_Foldable_List(csegen_50()(), $13f => $13f, {a1: 'Unreconized command: ', a2: {a1: $0, a2: {h: 0}}}));
+  default: return Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(Prelude_Types_foldMap_Foldable_List(csegen_50()(), $147 => $147, {a1: 'Unreconized command: ', a2: {a1: $0, a2: {h: 0}}}));
  }
 }
 
@@ -8477,6 +8496,40 @@ function FFI_Term_termCols($0) {
  }
 }
 
+/* FFI.GitHub.6688:5597:unexpectedPayload */
+function FFI_GitHub_n__6688_5597_unexpectedPayload($0, $1) {
+ return FFI_GitHub_internalError(Prelude_Types_foldMap_Foldable_List(csegen_50()(), $9 => $9, {a1: 'Unexpected error JSON: ', a2: {a1: $0, a2: {h: 0}}}));
+}
+
+/* FFI.GitHub.6688:5596:parse */
+function FFI_GitHub_n__6688_5596_parse($0, $1) {
+ switch($1.h) {
+  case 6: /* JObject */ return Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_lookupAll({a1: 'status', a2: {a1: 'error', a2: {h: 0}}}, $1.a1), $d => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_integer($d.a1), s => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_string($d.a2.a1), e => ({h: 1 /* Right */, a1: {a1: FFI_GitHub_statusCode(s), a2: e}}))));
+  default: return {h: 0 /* Left */, a1: 'Expected an Object containing error and status keys'};
+ }
+}
+
+/* FFI.GitHub.7920:6871:errString */
+function FFI_GitHub_n__7920_6871_errString($0, $1) {
+ switch($1.h) {
+  case 0: /* nothing */ return 'You can only use teams with repositories belonging to GitHub organizations';
+  case undefined: /* just */ return $1.a1;
+ }
+}
+
+/* FFI.GitHub.7037:5969:errString */
+function FFI_GitHub_n__7037_5969_errString($0, $1) {
+ switch($1.h) {
+  case 0: /* nothing */ return 'You can only list teams for repositories belonging to GitHub organizations';
+  case undefined: /* just */ return $1.a1;
+ }
+}
+
+/* FFI.GitHub.6821:5730:errMsg */
+function FFI_GitHub_n__6821_5730_errMsg($0) {
+ return Prelude_Types_either(() => csegen_409()(), () => csegen_409()(), $0);
+}
+
 /* FFI.GitHub.show */
 function FFI_GitHub_show_Show_GitHubPRState($0) {
  switch($0) {
@@ -8485,6 +8538,14 @@ function FFI_GitHub_show_Show_GitHubPRState($0) {
  }
 }
 
+/* FFI.GitHub.statusCode : Integer -> ErrorCode */
+function FFI_GitHub_statusCode($0) {
+ switch(Prelude_EqOrd_x3dx3d_Eq_Integer($0, 404n)) {
+  case 1: return {h: 0 /* NotFound */};
+  case 0: return {h: 2 /* OtherStatus */, a1: $0};
+ }
+}
+
 /* FFI.GitHub.pullRequestStateFilter : Maybe GitHubPRState -> String */
 function FFI_GitHub_pullRequestStateFilter($0) {
  switch($0.h) {
@@ -8493,98 +8554,162 @@ function FFI_GitHub_pullRequestStateFilter($0) {
  }
 }
 
+/* FFI.GitHub.parseOctokitError : String -> OctokitError */
+function FFI_GitHub_parseOctokitError($0) {
+ return Prelude_Types_either(() => $3 => $3, () => $5 => $5, FFI_GitHub_parseError($0));
+}
+
+/* FFI.GitHub.parseError : String -> Either OctokitError OctokitError */
+function FFI_GitHub_parseError($0) {
+ const $3 = JSON_Parser_parseJSON({h: 0}, $0);
+ let $2;
+ switch($3.h) {
+  case 0: /* Left */ {
+   $2 = {h: 0 /* Left */, a1: FFI_GitHub_n__6688_5597_unexpectedPayload($0, $3.a1)};
+   break;
+  }
+  case 1: /* Right */ {
+   $2 = {h: 1 /* Right */, a1: $3.a1};
+   break;
+  }
+ }
+ const $c = json => {
+  const $d = FFI_GitHub_n__6688_5596_parse($0, json);
+  switch($d.h) {
+   case 0: /* Left */ return {h: 0 /* Left */, a1: FFI_GitHub_internalError($d.a1)};
+   case 1: /* Right */ return {h: 1 /* Right */, a1: $d.a1};
+  }
+ };
+ return Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29($2, $c);
+}
+
+/* FFI.GitHub.orgError : OctokitError -> OrgError */
+function FFI_GitHub_orgError($0) {
+ switch($0.a1.h) {
+  case 0: /* NotFound */ return {h: 0};
+  case 1: /* InternalError */ return {a1: $0.a2};
+  case 2: /* OtherStatus */ return {a1: $0.a2};
+ }
+}
+
 /* FFI.GitHub.octokit : String -> IO Octokit */
 function FFI_GitHub_octokit($0, $1) {
  return Prelude_IO_map_Functor_IO($4 => $4, $6 => FFI_GitHub_prim__octokit($0, $6), $1);
 }
 
-/* FFI.GitHub.listTeams : Octokit => String -> Promise (List String) */
+/* FFI.GitHub.mapOrgError : Promise String a -> Promise OrgError a */
+function FFI_GitHub_mapOrgError($0, $1, $2) {
+ return Data_Promise_mapError($5 => FFI_GitHub_orgError(FFI_GitHub_parseOctokitError($5)), $0, $1, $2);
+}
+
+/* FFI.GitHub.listTeams : Octokit => String -> Promise OrgError (List String) */
 function FFI_GitHub_listTeams($0, $1, $2, $3) {
- return Data_Promise_map_Functor_Promise($6 => Data_String_lines($6), $a => $b => FFI_promiseIO($e => $f => $10 => FFI_GitHub_prim__listTeams($0, $1, $e, $f, $10), $a, $b), $2, $3);
+ return Data_Promise_map_Functor_x28Promisex20x24ex29($6 => Data_String_lines($6), $a => $b => FFI_GitHub_mapOrgError($e => $f => FFI_promiseIO($12 => $13 => $14 => FFI_GitHub_prim__listTeams($0, $1, $12, $13, $14), $e, $f), $a, $b), $2, $3);
 }
 
-/* FFI.GitHub.listTeamMembers : Octokit => String -> String -> Promise (List String) */
+/* FFI.GitHub.listTeamMembers : Octokit => String -> String -> Promise OrgError (List String) */
 function FFI_GitHub_listTeamMembers($0, $1, $2, $3, $4) {
- return Data_Promise_map_Functor_Promise($7 => Data_String_lines($7), $b => $c => FFI_promiseIO($f => $10 => $11 => FFI_GitHub_prim__listTeamMembers($0, $1, $2, $f, $10, $11), $b, $c), $3, $4);
+ return Data_Promise_map_Functor_x28Promisex20x24ex29($7 => Data_String_lines($7), $b => $c => FFI_GitHub_mapOrgError($f => $10 => FFI_promiseIO($13 => $14 => $15 => FFI_GitHub_prim__listTeamMembers($0, $1, $2, $13, $14, $15), $f, $10), $b, $c), $3, $4);
 }
 
-/* FFI.GitHub.listRepoLabels : Octokit => String -> String -> Promise (List String) */
+/* FFI.GitHub.listRepoLabels : Octokit => String -> String -> Promise String (List String) */
 function FFI_GitHub_listRepoLabels($0, $1, $2, $3, $4) {
- return Data_Promise_map_Functor_Promise($7 => Data_String_lines($7), $b => $c => FFI_promiseIO($f => $10 => $11 => FFI_GitHub_prim__listRepoLabels($0, $1, $2, $f, $10, $11), $b, $c), $3, $4);
+ return Data_Promise_map_Functor_x28Promisex20x24ex29($7 => Data_String_lines($7), $b => $c => FFI_GitHub_ignoreStatus($f => $10 => FFI_promiseIO($13 => $14 => $15 => FFI_GitHub_prim__listRepoLabels($0, $1, $2, $13, $14, $15), $f, $10), $b, $c), $3, $4);
 }
 
-/* FFI.GitHub.listPullReviewsJsonStr : Octokit => String -> String -> Integer -> Promise String */
+/* FFI.GitHub.listPullReviewsJsonStr : Octokit => String -> String -> Integer -> Promise String String */
 function FFI_GitHub_listPullReviewsJsonStr($0, $1, $2, $3, $4, $5) {
- return FFI_promiseIO($8 => $9 => $a => FFI_GitHub_prim__listPullReviews($0, $1, $2, $3, $8, $9, $a), $4, $5);
+ return FFI_GitHub_ignoreStatus($8 => $9 => FFI_promiseIO($c => $d => $e => FFI_GitHub_prim__listPullReviews($0, $1, $2, $3, $c, $d, $e), $8, $9), $4, $5);
 }
 
 /* FFI.GitHub.listPullRequestsJsonStr : Octokit =>
 String -> String -> Maybe GitHubPRState -> Fin 101 -> {default 0 _ : Nat} ->
-Promise String */
+Promise String String */
 function FFI_GitHub_listPullRequestsJsonStr($0, $1, $2, $3, $4, $5) {
  const $6 = FFI_GitHub_pullRequestStateFilter($3);
  const $9 = Number(_truncBigInt16($4));
  const $b = Number(_truncBigInt16(($5+1n)));
- return $f => $10 => FFI_promiseIO($13 => $14 => $15 => FFI_GitHub_prim__listPullRequests($0, $1, $2, $6, $9, $b, $13, $14, $15), $f, $10);
+ return $f => $10 => FFI_GitHub_ignoreStatus($13 => $14 => FFI_promiseIO($17 => $18 => $19 => FFI_GitHub_prim__listPullRequests($0, $1, $2, $6, $9, $b, $17, $18, $19), $13, $14), $f, $10);
 }
 
 /* FFI.GitHub.listPullRequests : Octokit =>
 String -> String -> Maybe GitHubPRState -> Fin 101 -> {default 0 _ : Nat} ->
-Promise (List PullRequest) */
+Promise String (List PullRequest) */
 function FFI_GitHub_listPullRequests($0, $1, $2, $3, $4, $5) {
- return Prelude_Basics_flip(csegen_407(), csegen_408(), FFI_GitHub_listPullRequestsJsonStr($0, $1, $2, $3, $4, $5));
+ return Prelude_Basics_flip(csegen_411(), csegen_412(), FFI_GitHub_listPullRequestsJsonStr($0, $1, $2, $3, $4, $5));
 }
 
-/* FFI.GitHub.listPRsForBranch : Octokit => String -> String -> String -> Promise (List PullRequest) */
+/* FFI.GitHub.listPRsForBranch : Octokit => String -> String -> String -> Promise String (List PullRequest) */
 function FFI_GitHub_listPRsForBranch($0, $1, $2, $3) {
- return Prelude_Basics_flip(csegen_407(), csegen_408(), $a => $b => FFI_promiseIO($e => $f => $10 => FFI_GitHub_prim__listPRsForBranch($0, $1, $2, $3, $e, $f, $10), $a, $b));
+ return Prelude_Basics_flip(csegen_411(), csegen_412(), $a => $b => FFI_GitHub_ignoreStatus($e => $f => FFI_promiseIO($12 => $13 => $14 => FFI_GitHub_prim__listPRsForBranch($0, $1, $2, $3, $12, $13, $14), $e, $f), $a, $b));
 }
 
-/* FFI.GitHub.listOrgMembers : Octokit => String -> Promise (List String) */
+/* FFI.GitHub.listOrgMembers : Octokit => String -> Promise OrgError (List String) */
 function FFI_GitHub_listOrgMembers($0, $1, $2, $3) {
- return Data_Promise_map_Functor_Promise($6 => Data_String_lines($6), $a => $b => FFI_promiseIO($e => $f => $10 => FFI_GitHub_prim__listOrgMembers($0, $1, $e, $f, $10), $a, $b), $2, $3);
+ return Data_Promise_map_Functor_x28Promisex20x24ex29($6 => Data_String_lines($6), $a => $b => FFI_GitHub_mapOrgError($e => $f => FFI_promiseIO($12 => $13 => $14 => FFI_GitHub_prim__listOrgMembers($0, $1, $12, $13, $14), $e, $f), $a, $b), $2, $3);
 }
 
-/* FFI.GitHub.listMyTeams : Octokit => Promise (List String) */
+/* FFI.GitHub.listMyTeams : Octokit => Promise String (List String) */
 function FFI_GitHub_listMyTeams($0, $1, $2) {
- return Data_Promise_map_Functor_Promise($5 => Data_String_lines($5), $9 => $a => FFI_promiseIO($d => $e => $f => FFI_GitHub_prim__listMyTeams($0, $d, $e, $f), $9, $a), $1, $2);
+ return Data_Promise_map_Functor_x28Promisex20x24ex29($5 => Data_String_lines($5), $9 => $a => FFI_GitHub_ignoreStatus($d => $e => FFI_promiseIO($11 => $12 => $13 => FFI_GitHub_prim__listMyTeams($0, $11, $12, $13), $d, $e), $9, $a), $1, $2);
 }
 
-/* FFI.GitHub.getUser : Octokit => String -> Promise User */
+/* FFI.GitHub.internalError : String -> OctokitError */
+function FFI_GitHub_internalError($0) {
+ return {a1: {h: 1 /* InternalError */}, a2: $0};
+}
+
+/* FFI.GitHub.ignoreStatus : Promise String a -> Promise String a */
+function FFI_GitHub_ignoreStatus($0, $1, $2) {
+ return Data_Promise_mapError($5 => FFI_GitHub_n__6821_5730_errMsg(FFI_GitHub_parseError($5)), $0, $1, $2);
+}
+
+/* FFI.GitHub.getUser : Octokit => String -> Promise String User */
 function FFI_GitHub_getUser($0) {
- return Prelude_Interfaces_x3cx3dx3c(csegen_70()(), csegen_409(), $8 => $9 => $a => FFI_promiseIO($d => $e => $f => FFI_GitHub_prim__getUser($0, $8, $d, $e, $f), $9, $a));
+ return Prelude_Interfaces_x3cx3dx3c(csegen_70()(), csegen_414(), $8 => $9 => $a => FFI_GitHub_ignoreStatus($d => $e => FFI_promiseIO($11 => $12 => $13 => FFI_GitHub_prim__getUser($0, $8, $11, $12, $13), $d, $e), $9, $a));
 }
 
-/* FFI.GitHub.getSelf : Octokit => Promise User */
+/* FFI.GitHub.getSelf : Octokit => Promise String User */
 function FFI_GitHub_getSelf($0) {
- return Prelude_Basics_flip(csegen_407(), csegen_409(), $7 => $8 => FFI_promiseIO($b => $c => $d => FFI_GitHub_prim__getSelf($0, $b, $c, $d), $7, $8));
+ return Prelude_Basics_flip(csegen_411(), csegen_414(), $7 => $8 => FFI_GitHub_ignoreStatus($b => $c => FFI_promiseIO($f => $10 => $11 => FFI_GitHub_prim__getSelf($0, $f, $10, $11), $b, $c), $7, $8));
 }
 
-/* FFI.GitHub.getRepoDefaultBranch : Octokit => String -> String -> Promise String */
+/* FFI.GitHub.getRepoDefaultBranch : Octokit => String -> String -> Promise String String */
 function FFI_GitHub_getRepoDefaultBranch($0, $1, $2, $3, $4) {
- return FFI_promiseIO($7 => $8 => $9 => FFI_GitHub_prim__getRepoDefaultBranch($0, $1, $2, $7, $8, $9), $3, $4);
+ return FFI_GitHub_ignoreStatus($7 => $8 => FFI_promiseIO($b => $c => $d => FFI_GitHub_prim__getRepoDefaultBranch($0, $1, $2, $b, $c, $d), $7, $8), $3, $4);
+}
+
+/* FFI.GitHub.forceListTeams : Octokit => String -> Promise' (List String) */
+function FFI_GitHub_forceListTeams($0, $1, $2, $3) {
+ return Data_Promise_mapError($6 => FFI_GitHub_n__7037_5969_errString($0, $6), $b => $c => FFI_GitHub_listTeams($0, $1, $b, $c), $2, $3);
+}
+
+/* FFI.GitHub.forceListTeamMembers : Octokit => String -> String -> Promise' (List String) */
+function FFI_GitHub_forceListTeamMembers($0, $1, $2, $3, $4) {
+ return Data_Promise_mapError($7 => FFI_GitHub_n__7920_6871_errString($0, $7), $c => $d => FFI_GitHub_listTeamMembers($0, $1, $2, $c, $d), $3, $4);
 }
 
 /* FFI.GitHub.createPR : Octokit => {default False _ : Bool} ->
-String -> String -> String -> String -> String -> String -> Promise PullRequest */
+String -> String -> String -> String -> String -> String -> Promise String PullRequest */
 function FFI_GitHub_createPR($0, $1, $2, $3, $4, $5, $6, $7) {
- return Prelude_Basics_flip(csegen_407(), $c => $d => Data_Promise_either(csegen_52(), Data_PullRequest_parsePullRequestString($c), $d), $16 => $17 => FFI_promiseIO($1a => $1b => $1c => FFI_GitHub_prim__createPR($0, $2, $3, $4, $5, $6, $7, $1, $1a, $1b, $1c), $16, $17));
+ return Prelude_Basics_flip(csegen_411(), $c => $d => Data_Promise_either(Data_PullRequest_parsePullRequestString($c), $d), $14 => $15 => FFI_GitHub_ignoreStatus($18 => $19 => FFI_promiseIO($1c => $1d => $1e => FFI_GitHub_prim__createPR($0, $2, $3, $4, $5, $6, $7, $1, $1c, $1d, $1e), $18, $19), $14, $15));
 }
 
-/* FFI.GitHub.createComment : Octokit => String -> String -> Integer -> String -> Promise () */
+/* FFI.GitHub.createComment : Octokit => String -> String -> Integer -> String -> Promise String () */
 function FFI_GitHub_createComment($0, $1, $2, $3, $4, $5, $6) {
- return Data_Promise_map_Functor_Promise($9 => (undefined), $b => $c => FFI_promiseIO($f => $10 => $11 => FFI_GitHub_prim__createComment($0, $1, $2, $3, $4, $f, $10, $11), $b, $c), $5, $6);
+ return Data_Promise_map_Functor_x28Promisex20x24ex29($9 => (undefined), $b => $c => FFI_GitHub_ignoreStatus($f => $10 => FFI_promiseIO($13 => $14 => $15 => FFI_GitHub_prim__createComment($0, $1, $2, $3, $4, $13, $14, $15), $f, $10), $b, $c), $5, $6);
 }
 
 /* FFI.GitHub.addPullReviewers : Octokit =>
-String -> String -> Integer -> List String -> List String -> Promise (List String) */
+String -> String -> Integer -> List String -> List String -> Promise String (List String) */
 function FFI_GitHub_addPullReviewers($0, $1, $2, $3, $4, $5, $6, $7) {
- return Data_Promise_x3ex3ex3d_Monad_Promise($a => $b => Data_Promise_map_Functor_Promise($e => Data_String_lines($e), $12 => $13 => FFI_promiseIO($16 => $17 => $18 => FFI_GitHub_prim__addPullReviewers($0, $1, $2, $3, '', Data_String_Extra_join(',', csegen_146(), $5), $16, $17, $18), $12, $13), $a, $b), teamReviewers => $2d => $2e => Data_Promise_x3ex3ex3d_Monad_Promise($31 => $32 => Data_Promise_map_Functor_Promise($35 => Data_String_lines($35), $39 => $3a => FFI_promiseIO($3d => $3e => $3f => FFI_GitHub_prim__addPullReviewers($0, $1, $2, $3, Data_String_Extra_join(',', csegen_146(), $4), '', $3d, $3e, $3f), $39, $3a), $31, $32), individualReviewers => $54 => $55 => Data_Promise_pure_Applicative_Promise(Prelude_Types_List_tailRecAppend(teamReviewers, individualReviewers), $54, $55), $2d, $2e), $6, $7);
+ return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($a => $b => Data_Promise_map_Functor_x28Promisex20x24ex29($e => Data_String_lines($e), $12 => $13 => FFI_GitHub_ignoreStatus($16 => $17 => FFI_promiseIO($1a => $1b => $1c => FFI_GitHub_prim__addPullReviewers($0, $1, $2, $3, '', Data_String_Extra_join(',', csegen_146(), $5), $1a, $1b, $1c), $16, $17), $12, $13), $a, $b), teamReviewers => $33 => $34 => Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($37 => $38 => Data_Promise_map_Functor_x28Promisex20x24ex29($3b => Data_String_lines($3b), $3f => $40 => FFI_GitHub_ignoreStatus($43 => $44 => FFI_promiseIO($47 => $48 => $49 => FFI_GitHub_prim__addPullReviewers($0, $1, $2, $3, Data_String_Extra_join(',', csegen_146(), $4), '', $47, $48, $49), $43, $44), $3f, $40), $37, $38), individualReviewers => $60 => $61 => Data_Promise_pure_Applicative_x28Promisex20x24ex29(Prelude_Types_List_tailRecAppend(teamReviewers, individualReviewers), $60, $61), $33, $34), $6, $7);
 }
 
-/* FFI.GitHub.addPullLabels : Octokit => String -> String -> Integer -> List String -> Promise (List String) */
+/* FFI.GitHub.addPullLabels : Octokit =>
+String -> String -> Integer -> List String -> Promise String (List String) */
 function FFI_GitHub_addPullLabels($0, $1, $2, $3, $4, $5, $6) {
- return Data_Promise_map_Functor_Promise($9 => Data_String_lines($9), $d => $e => FFI_promiseIO($11 => $12 => $13 => FFI_GitHub_prim__addLabels($0, $1, $2, $3, Data_String_Extra_join(',', csegen_146(), $4), $11, $12, $13), $d, $e), $5, $6);
+ return Data_Promise_map_Functor_x28Promisex20x24ex29($9 => Data_String_lines($9), $d => $e => FFI_GitHub_ignoreStatus($11 => $12 => FFI_promiseIO($15 => $16 => $17 => FFI_GitHub_prim__addLabels($0, $1, $2, $3, Data_String_Extra_join(',', csegen_146(), $4), $15, $16, $17), $11, $12), $d, $e), $5, $6);
 }
 
 /* Data.User.parseUserString : String -> Either String User */
@@ -8638,7 +8763,7 @@ function Data_Review_parseState($0) {
 
 /* Data.Review.parseReview : JSON -> Either String Review */
 function Data_Review_parseReview($0) {
- return Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_object($0), review => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_lookupAll({a1: 'author', a2: {a1: 'state', a2: {a1: 'submitted_at', a2: {h: 0}}}}, review), $12 => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_string($12.a1), author => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Prelude_Basics_flip(csegen_414(), $22 => Data_Review_parseState($22), Language_JSON_Accessors_string($12.a2.a1)), state => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Prelude_Basics_flip(csegen_414(), $2f => Data_Review_parseDateTime($2f), Language_JSON_Accessors_string($12.a2.a2.a1)), submittedAt => ({h: 1 /* Right */, a1: {a1: submittedAt, a2: author, a3: state}}))))));
+ return Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_object($0), review => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_lookupAll({a1: 'author', a2: {a1: 'state', a2: {a1: 'submitted_at', a2: {h: 0}}}}, review), $12 => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_string($12.a1), author => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Prelude_Basics_flip(csegen_419(), $22 => Data_Review_parseState($22), Language_JSON_Accessors_string($12.a2.a1)), state => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Prelude_Basics_flip(csegen_419(), $2f => Data_Review_parseDateTime($2f), Language_JSON_Accessors_string($12.a2.a2.a1)), submittedAt => ({h: 1 /* Right */, a1: {a1: submittedAt, a2: author, a3: state}}))))));
 }
 
 /* Data.Review.parseDateTime : String -> Either String Date */
@@ -8929,7 +9054,7 @@ function Data_PullRequest_parsePullRequestsString($0) {
  };
  const $3 = {a1: $4, a2: a => $c => ({h: 1 /* Right */, a1: $c}), a3: $e};
  const $2 = {a1: $3, a2: csegen_210(), a3: csegen_211()};
- return Prelude_Interfaces_x3ex3dx3e($2, csegen_212(), csegen_427(), $0);
+ return Prelude_Interfaces_x3ex3dx3e($2, csegen_212(), csegen_432(), $0);
 }
 
 /* Data.PullRequest.parsePullRequestString : String -> Either String PullRequest */
@@ -8958,7 +9083,7 @@ function Data_PullRequest_parsePullRequestString($0) {
 
 /* Data.PullRequest.parsePR : JSON -> Either String PullRequest */
 function Data_PullRequest_parsePR($0) {
- return Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_object($0), pr => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_lookupAll({a1: 'pull_number', a2: {a1: 'author', a2: {a1: 'state', a2: {a1: 'created_at', a2: {a1: 'merged', a2: {a1: 'draft', a2: {a1: 'reviewers', a2: {a1: 'head_ref', a2: {h: 0}}}}}}}}}, pr), $1c => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_integer($1c.a1), number => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_string($1c.a2.a1), author => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_bool($1c.a2.a2.a2.a2.a1), merged => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_bool($1c.a2.a2.a2.a2.a2.a1), isDraft => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Prelude_Basics_flip(csegen_414(), $40 => Data_PullRequest_parseState(merged, $40), Language_JSON_Accessors_string($1c.a2.a2.a1)), state => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Prelude_Basics_flip(csegen_414(), $4e => Data_PullRequest_parseDateTime($4e), Language_JSON_Accessors_string($1c.a2.a2.a2.a1)), createdAt => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_array($59 => Language_JSON_Accessors_string($59), $1c.a2.a2.a2.a2.a2.a2.a1), reviewers => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_string($1c.a2.a2.a2.a2.a2.a2.a2.a1), headRef => ({h: 1 /* Right */, a1: {a1: number, a2: createdAt, a3: isDraft, a4: author, a5: state, a6: reviewers, a7: headRef}})))))))))));
+ return Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_object($0), pr => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_lookupAll({a1: 'pull_number', a2: {a1: 'author', a2: {a1: 'state', a2: {a1: 'created_at', a2: {a1: 'merged', a2: {a1: 'draft', a2: {a1: 'reviewers', a2: {a1: 'head_ref', a2: {h: 0}}}}}}}}}, pr), $1c => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_integer($1c.a1), number => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_string($1c.a2.a1), author => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_bool($1c.a2.a2.a2.a2.a1), merged => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_bool($1c.a2.a2.a2.a2.a2.a1), isDraft => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Prelude_Basics_flip(csegen_419(), $40 => Data_PullRequest_parseState(merged, $40), Language_JSON_Accessors_string($1c.a2.a2.a1)), state => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Prelude_Basics_flip(csegen_419(), $4e => Data_PullRequest_parseDateTime($4e), Language_JSON_Accessors_string($1c.a2.a2.a2.a1)), createdAt => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_array($59 => Language_JSON_Accessors_string($59), $1c.a2.a2.a2.a2.a2.a2.a1), reviewers => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_string($1c.a2.a2.a2.a2.a2.a2.a2.a1), headRef => ({h: 1 /* Right */, a1: {a1: number, a2: createdAt, a3: isDraft, a4: author, a5: state, a6: reviewers, a7: headRef}})))))))))));
 }
 
 /* Data.PullRequest.parseDateTime : String -> Either String Date */
@@ -8977,35 +9102,35 @@ function Data_PullRequest_isAuthor($0, $1) {
 }
 
 /* Config.with block in getConfig */
-function Config_with__getConfig_2386($0, $1, $2, $3) {
+function Config_with__getConfig_2467($0, $1, $2, $3) {
  return $4 => {
   switch($1.h) {
    case 0: /* nothing */ return Data_Promise_reject(Prelude_Types_foldMap_Foldable_List(csegen_50()(), $d => $d, {a1: $0, a2: {a1: ' cannot get read via `config` command.', a2: {h: 0}}}), $3, $4);
-   case undefined: /* just */ return Data_Promise_pure_Applicative_Promise(Config_propGetter($1.a1, $2), $3, $4);
+   case undefined: /* just */ return Data_Promise_pure_Applicative_x28Promisex20x24ex29(Config_propGetter($1.a1, $2), $3, $4);
   }
  };
 }
 
 /* Config.with block in with block in setConfig */
-function Config_with__withx20blockx20inx20setConfig_2201($0, $1, $2, $3, $4, $5, $6) {
+function Config_with__withx20blockx20inx20setConfig_2277($0, $1, $2, $3, $4, $5, $6) {
  return $7 => {
   switch($5.h) {
    case 0: /* nothing */ return Data_Promise_reject(Prelude_Types_foldMap_Foldable_List(csegen_50()(), $10 => $10, {a1: $4, a2: {a1: ' is not a valid value for ', a2: {a1: $1, a2: {a1: '.', a2: {h: 0}}}}}), $6, $7);
-   case undefined: /* just */ return Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Types_either(() => $20 => Util_renderIO($5.a1, csegen_73()(), $20), () => csegen_435()(), Config_checkConfigConsistency($5.a1)), $2e => $2f => $30 => Config_writeConfig($5.a1, $2f, $30), $6, $7);
+   case undefined: /* just */ return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(Prelude_Types_either(() => $20 => Util_renderIO($5.a1, csegen_73()(), $20), () => csegen_440()(), Config_checkConfigConsistency($5.a1)), $2e => $2f => $30 => Config_writeConfig($5.a1, $2f, $30), $6, $7);
   }
  };
 }
 
 /* Config.with block in setConfig */
-function Config_with__setConfig_2171($0, $1, $2, $3) {
+function Config_with__setConfig_2245($0, $1, $2, $3) {
  switch($1.h) {
   case 0: /* nothing */ return $5 => $6 => Data_Promise_reject(Prelude_Types_foldMap_Foldable_List(csegen_50()(), $e => $e, {a1: $0, a2: {a1: ' cannot be set via `config` command.', a2: {h: 0}}}), $5, $6);
-  case undefined: /* just */ return $16 => Config_with__withx20blockx20inx20setConfig_2201(undefined, $0, $1.a1, $3, $2, Config_propSetter($1.a1, $3)($2), $16);
+  case undefined: /* just */ return $16 => Config_with__withx20blockx20inx20setConfig_2277(undefined, $0, $1.a1, $3, $2, Config_propSetter($1.a1, $3)($2), $16);
  }
 }
 
 /* Config.with block in parseBool */
-function Config_with__parseBool_1625($0, $1) {
+function Config_with__parseBool_1699($0, $1) {
  switch($1) {
   case 'yes': return {a1: 1};
   case 'true': return {a1: 1};
@@ -9016,7 +9141,7 @@ function Config_with__parseBool_1625($0, $1) {
 }
 
 /* Config.with block in dropPrefix',drop' */
-function Config_with__dropPrefixx27x2cdropx27_1450($0, $1, $2) {
+function Config_with__dropPrefixx27x2cdropx27_1524($0, $1, $2) {
  switch($2.h) {
   case 0: /* Yes */ return {a1: $2.a1.a1};
   case 1: /* No */ return {h: 0};
@@ -9024,7 +9149,7 @@ function Config_with__dropPrefixx27x2cdropx27_1450($0, $1, $2) {
 }
 
 /* Config.case block in parseGitHubURI,parseSuffix */
-function Config_case__parseGitHubURIx2cparseSuffix_1511($0, $1, $2) {
+function Config_case__parseGitHubURIx2cparseSuffix_1585($0, $1, $2) {
  const $b = $c => {
   switch($c.h) {
    case undefined: /* cons */ {
@@ -9041,36 +9166,36 @@ function Config_case__parseGitHubURIx2cparseSuffix_1511($0, $1, $2) {
    default: return {h: 0};
   }
  };
- return Prelude_Types_x3ex3ex3d_Monad_Maybe({a1: Data_String_split(csegen_436(), $2.a1)}, $b);
+ return Prelude_Types_x3ex3ex3d_Monad_Maybe({a1: Data_String_split(csegen_441(), $2.a1)}, $b);
 }
 
-/* Config.9448:2541:repo */
-function Config_n__9448_2541_repo($0, $1, $2, $3, $4, $5) {
- return Prelude_Types_map_Functor_Maybe(csegen_437()(), $5);
+/* Config.9665:2625:repo */
+function Config_n__9665_2625_repo($0, $1, $2, $3, $4, $5) {
+ return Prelude_Types_map_Functor_Maybe(csegen_442()(), $5);
 }
 
-/* Config.8441:1491:parseSuffix */
-function Config_n__8441_1491_parseSuffix($0, $1) {
- return Config_case__parseGitHubURIx2cparseSuffix_1511($0, $1, Data_String_break$($8 => Prelude_EqOrd_x3dx3d_Eq_Char($8, '.'), $1));
+/* Config.8648:1565:parseSuffix */
+function Config_n__8648_1565_parseSuffix($0, $1) {
+ return Config_case__parseGitHubURIx2cparseSuffix_1585($0, $1, Data_String_break$($8 => Prelude_EqOrd_x3dx3d_Eq_Char($8, '.'), $1));
 }
 
-/* Config.8441:1490:parseSSH */
-function Config_n__8441_1490_parseSSH($0, $1) {
- return Prelude_Interfaces_x3ex3dx3e(csegen_14(), $6 => Config_dropPrefixx27('git@github.com:', $6), $b => Config_n__8441_1491_parseSuffix($0, $b), $1);
+/* Config.8648:1564:parseSSH */
+function Config_n__8648_1564_parseSSH($0, $1) {
+ return Prelude_Interfaces_x3ex3dx3e(csegen_14(), $6 => Config_dropPrefixx27('git@github.com:', $6), $b => Config_n__8648_1565_parseSuffix($0, $b), $1);
 }
 
-/* Config.8441:1489:parseHTTPS */
-function Config_n__8441_1489_parseHTTPS($0, $1) {
- return Prelude_Interfaces_x3ex3dx3e(csegen_14(), $6 => Config_dropPrefixx27('https://github/com/', $6), $b => Config_n__8441_1491_parseSuffix($0, $b), $1);
+/* Config.8648:1563:parseHTTPS */
+function Config_n__8648_1563_parseHTTPS($0, $1) {
+ return Prelude_Interfaces_x3ex3dx3e(csegen_14(), $6 => Config_dropPrefixx27('https://github/com/', $6), $b => Config_n__8648_1565_parseSuffix($0, $b), $1);
 }
 
-/* Config.9448:2540:org */
-function Config_n__9448_2540_org($0, $1, $2, $3, $4, $5) {
- return Prelude_Types_map_Functor_Maybe(csegen_441()(), $5);
+/* Config.9665:2624:org */
+function Config_n__9665_2624_org($0, $1, $2, $3, $4, $5) {
+ return Prelude_Types_map_Functor_Maybe(csegen_446()(), $5);
 }
 
-/* Config.9448:2539:orIfEmpty */
-function Config_n__9448_2539_orIfEmpty($0, $1, $2, $3, $4, $5, $6) {
+/* Config.9665:2623:orIfEmpty */
+function Config_n__9665_2623_orIfEmpty($0, $1, $2, $3, $4, $5, $6) {
  switch($5.h) {
   case 0: /* nothing */ return $6;
   case undefined: /* just */ {
@@ -9082,13 +9207,13 @@ function Config_n__9448_2539_orIfEmpty($0, $1, $2, $3, $4, $5, $6) {
  }
 }
 
-/* Config.8156:1214:oneDayAgo */
-function Config_n__8156_1214_oneDayAgo($0, $1, $2) {
+/* Config.8360:1285:oneDayAgo */
+function Config_n__8360_1285_oneDayAgo($0, $1, $2) {
  return $2.a1.a2(undefined)(undefined)(System_time($2))(now => $2.a1.a1.a2(undefined)(Number(_truncUBigInt32((now-86400n)))));
 }
 
-/* Config.9448:2538:offerRetry */
-function Config_n__9448_2538_offerRetry($0, $1, $2, $3, $4, $5, $6, $7, $8, $9) {
+/* Config.9665:2622:offerRetry */
+function Config_n__9665_2622_offerRetry($0, $1, $2, $3, $4, $5, $6, $7, $8, $9) {
  const $13 = $14 => {
   switch($14.h) {
    case 0: /* nothing */ {
@@ -9109,28 +9234,28 @@ function Config_n__9448_2538_offerRetry($0, $1, $2, $3, $4, $5, $6, $7, $8, $9)
  return $5.a1.a2(undefined)(undefined)($9)($13);
 }
 
-/* Config.9351:2426:help */
-function Config_n__9351_2426_help($0, $1) {
+/* Config.9568:2510:help */
+function Config_n__9568_2510_help($0, $1) {
  return Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29(Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_color(2), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String($1.a1)), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(Prelude_Types_foldMap_Foldable_List(csegen_50()(), $14 => $14, {a1: ': ', a2: {a1: (Data_String_replicate(Prelude_Types_prim__integerToNat((Data_Config_longestSettablePropName()-Prelude_Types_String_length($1.a1))), ' ')+$1.a2), a2: {h: 0}}})));
 }
 
-/* Config.9448:2537:enterForDefaultStr */
-function Config_n__9448_2537_enterForDefaultStr($0, $1, $2, $3, $4, $5) {
+/* Config.9665:2621:enterForDefaultStr */
+function Config_n__9665_2621_enterForDefaultStr($0, $1, $2, $3, $4, $5) {
  return Prelude_Types_foldMap_Foldable_List(csegen_50()(), $b => $b, {a1: ' (ENTER for default: ', a2: {a1: $5, a2: {a1: ')', a2: {h: 0}}}});
 }
 
-/* Config.8394:1442:drop' */
-function Config_n__8394_1442_dropx27($0, $1) {
- return Config_with__dropPrefixx27x2cdropx27_1450($0, $1, Data_List_PrefixSuffix_dropPrefix($8 => $9 => Decidable_Equality_decEq_DecEq_Char($8, $9), Prelude_Types_fastUnpack($0), $1));
+/* Config.8601:1516:drop' */
+function Config_n__8601_1516_dropx27($0, $1) {
+ return Config_with__dropPrefixx27x2cdropx27_1524($0, $1, Data_List_PrefixSuffix_dropPrefix($8 => $9 => Decidable_Equality_decEq_DecEq_Char($8, $9), Prelude_Types_fastUnpack($0), $1));
 }
 
-/* Config.9448:2536:defaultStr */
-function Config_n__9448_2536_defaultStr($0, $1, $2, $3, $4, $5, $6) {
- return Data_Maybe_fromMaybe(() => '', Prelude_Types_map_Functor_Maybe($c => Config_n__9448_2537_enterForDefaultStr($0, $1, $2, $3, $4, $5($c)), $6));
+/* Config.9665:2620:defaultStr */
+function Config_n__9665_2620_defaultStr($0, $1, $2, $3, $4, $5, $6) {
+ return Data_Maybe_fromMaybe(() => '', Prelude_Types_map_Functor_Maybe($c => Config_n__9665_2621_enterForDefaultStr($0, $1, $2, $3, $4, $5($c)), $6));
 }
 
-/* Config.8283:1335:checkRequestSettings */
-function Config_n__8283_1335_checkRequestSettings($0, $1) {
+/* Config.8490:1409:checkRequestSettings */
+function Config_n__8490_1409_checkRequestSettings($0, $1) {
  let $2;
  switch($1.a6) {
   case 1: {
@@ -9156,15 +9281,15 @@ function Config_show_Show_ConfigError($0) {
  }
 }
 
-/* Config.writeConfig : Config -> Promise Config */
+/* Config.writeConfig : Config -> Promise' Config */
 function Config_writeConfig($0, $1, $2) {
  const $11 = res => $12 => $13 => {
   switch(res.h) {
-   case 1: /* Right */ return Data_Promise_pure_Applicative_Promise($0, $12, $13);
+   case 1: /* Right */ return Data_Promise_pure_Applicative_x28Promisex20x24ex29($0, $12, $13);
    case 0: /* Left */ return Data_Promise_reject(Prelude_Types_foldMap_Foldable_List(csegen_50()(), $20 => $20, {a1: 'Failed to write updated config file to ', a2: {a1: Data_Config_rf__filepath($0), a2: {a1: ': ', a2: {a1: System_File_Error_show_Show_FileError(res.a1), a2: {a1: '.', a2: {h: 0}}}}}}), $12, $13);
   }
  };
- return Data_Promise_x3ex3ex3d_Monad_Promise(System_File_ReadWrite_writeFile(csegen_73()(), Data_Config_rf__filepath($0), JSON_Parser_showImpl(Data_Config_json($0))), $11, $1, $2);
+ return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(System_File_ReadWrite_writeFile(csegen_73()(), Data_Config_rf__filepath($0), JSON_Parser_showImpl(Data_Config_json($0))), $11, $1, $2);
 }
 
 /* Config.update : Functor f => (String -> f a) -> (a -> b -> b) -> b -> String -> f b */
@@ -9172,59 +9297,59 @@ function Config_update($0, $1, $2, $3, $4) {
  return $0(undefined)(undefined)($c => Prelude_Basics_flip($2, $3, $c))($1($4));
 }
 
-/* Config.syncIfOld : Octokit => Config -> Promise Config */
+/* Config.syncIfOld : Octokit => Config -> Promise' Config */
 function Config_syncIfOld($0, $1, $2, $3) {
  const $c = $d => $e => {
   switch(Prelude_EqOrd_x3c_Ord_Bits32($1.a1, $d)) {
    case 1: return $14 => Config_syncConfig($1, $0, 0, $e, $14);
-   case 0: return $1b => Data_Promise_pure_Applicative_Promise($1, $e, $1b);
+   case 0: return $1b => Data_Promise_pure_Applicative_x28Promisex20x24ex29($1, $e, $1b);
   }
  };
- return Data_Promise_x3ex3ex3d_Monad_Promise(Config_n__8156_1214_oneDayAgo($0, $1, csegen_73()()), $c, $2, $3);
+ return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(Config_n__8360_1285_oneDayAgo($0, $1, csegen_73()()), $c, $2, $3);
 }
 
-/* Config.syncConfig : Config => Octokit => Bool -> Promise Config */
+/* Config.syncConfig : Config => Octokit => Bool -> Promise' Config */
 function Config_syncConfig($0, $1, $2, $3, $4) {
- const $f = teamSlugs => $10 => $11 => {
-  const $1e = labelNames => $1f => $20 => {
-   const $2b = orgMembers => $2c => $2d => {
-    const $32 = updatedAt => {
-     const $33 = {a1: updatedAt, a2: $0.a2, a3: $0.a3, a4: $0.a4, a5: $0.a5, a6: $0.a6, a7: $0.a7, a8: $0.a8, a9: teamSlugs, a10: labelNames, a11: orgMembers, a12: $0.a12, a13: $0.a13, a14: $0.a14, a15: $0.a15};
-     return $44 => $45 => Data_Promise_x3ex3ex3d_Monad_Promise($48 => $49 => Data_Promise_map_Functor_Promise($4c => (undefined), $4e => $4f => Config_writeConfig($33, $4e, $4f), $48, $49), $57 => $58 => $59 => Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Interfaces_when(csegen_65()(), $2, () => $62 => $63 => Data_Promise_x3ex3ex3d_Monad_Promise($66 => $67 => $68 => Data_Promise_liftIO_HasIO_Promise($6b => Prelude_IO_prim__putStr('Your updated configuration is:\n', $6b), $66, $67, $68), $73 => $74 => $75 => $76 => Data_Promise_liftIO_HasIO_Promise($79 => Prelude_IO_prim__putStr((Data_Config_show_Show_Config($33)+'\n'), $79), $74, $75, $76), $62, $63)), $87 => $88 => $89 => Data_Promise_pure_Applicative_Promise($33, $88, $89), $58, $59), $44, $45);
+ const $16 = teamSlugs => $17 => $18 => {
+  const $2a = orgMembers => $2b => $2c => {
+   const $39 = labelNames => $3a => $3b => {
+    const $40 = updatedAt => {
+     const $41 = {a1: updatedAt, a2: $0.a2, a3: $0.a3, a4: $0.a4, a5: $0.a5, a6: $0.a6, a7: $0.a7, a8: $0.a8, a9: teamSlugs, a10: labelNames, a11: orgMembers, a12: $0.a12, a13: $0.a13, a14: $0.a14, a15: $0.a15};
+     return $52 => $53 => Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($56 => $57 => Data_Promise_map_Functor_x28Promisex20x24ex29($5a => (undefined), $5c => $5d => Config_writeConfig($41, $5c, $5d), $56, $57), $65 => $66 => $67 => Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(Prelude_Interfaces_when(csegen_65()(), $2, () => $70 => $71 => Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($74 => $75 => $76 => Data_Promise_liftIO_HasIO_x28Promisex20x24ex29($79 => Prelude_IO_prim__putStr('Your updated configuration is:\n', $79), $74, $75, $76), $81 => $82 => $83 => $84 => Data_Promise_liftIO_HasIO_x28Promisex20x24ex29($87 => Prelude_IO_prim__putStr((Data_Config_show_Show_Config($41)+'\n'), $87), $82, $83, $84), $70, $71)), $95 => $96 => $97 => Data_Promise_pure_Applicative_x28Promisex20x24ex29($41, $96, $97), $66, $67), $52, $53);
     };
-    return Data_Promise_x3ex3ex3d_Monad_Promise(csegen_452()(), $32, $2c, $2d);
+    return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(csegen_457()(), $40, $3a, $3b);
    };
-   return Data_Promise_x3ex3ex3d_Monad_Promise($23 => $24 => FFI_GitHub_listOrgMembers($1, $0.a2, $23, $24), $2b, $1f, $20);
+   return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($2f => $30 => FFI_GitHub_listRepoLabels($1, $0.a2, $0.a3, $2f, $30), $39, $2b, $2c);
   };
-  return Data_Promise_x3ex3ex3d_Monad_Promise($14 => $15 => FFI_GitHub_listRepoLabels($1, $0.a2, $0.a3, $14, $15), $1e, $10, $11);
+  return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($1b => $1c => Config_nonOrgFallback(() => ({h: 0}), $20 => $21 => FFI_GitHub_listOrgMembers($1, $0.a2, $20, $21), $1b, $1c), $2a, $17, $18);
  };
- return Data_Promise_x3ex3ex3d_Monad_Promise($7 => $8 => FFI_GitHub_listTeams($1, $0.a2, $7, $8), $f, $3, $4);
+ return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($7 => $8 => Config_nonOrgFallback(() => ({h: 0}), $c => $d => FFI_GitHub_listTeams($1, $0.a2, $c, $d), $7, $8), $16, $3, $4);
 }
 
 /* Config.settablePropsWithHelp : Config => String */
 function Config_settablePropsWithHelp($0) {
- return Util_renderString($0, Text_PrettyPrint_Prettyprinter_Doc_vsep(Prelude_Types_List_mapAppend({h: 0}, $9 => Config_n__9351_2426_help($0, $9), Data_Config_settablePropNamesAndHelp())));
+ return Util_renderString($0, Text_PrettyPrint_Prettyprinter_Doc_vsep(Prelude_Types_List_mapAppend({h: 0}, $9 => Config_n__9568_2510_help($0, $9), Data_Config_settablePropNamesAndHelp())));
 }
 
-/* Config.setConfig : Config => String -> String -> Promise Config */
+/* Config.setConfig : Config => String -> String -> Promise' Config */
 function Config_setConfig($0, $1, $2) {
- return Config_with__setConfig_2171($1, Data_Config_settablePropNamed($1), $2, $0);
+ return Config_with__setConfig_2245($1, Data_Config_settablePropNamed($1), $2, $0);
 }
 
 /* Config.propSetter : SettableProp n h -> Config -> String -> Maybe Config */
 function Config_propSetter($0, $1) {
  return $2 => {
   switch($0) {
-   case 0: return Config_update(csegen_457(), $8 => Config_parseBool($8), b => $c => ({a1: $c.a1, a2: $c.a2, a3: $c.a3, a4: $c.a4, a5: $c.a5, a6: b, a7: $c.a7, a8: $c.a8, a9: $c.a9, a10: $c.a10, a11: $c.a11, a12: $c.a12, a13: $c.a13, a14: $c.a14, a15: $c.a15}), $1, $2);
-   case 1: return Config_update(csegen_457(), $23 => Config_parseBool($23), b => $27 => ({a1: $27.a1, a2: $27.a2, a3: $27.a3, a4: $27.a4, a5: $27.a5, a6: $27.a6, a7: b, a8: $27.a8, a9: $27.a9, a10: $27.a10, a11: $27.a11, a12: $27.a12, a13: $27.a13, a14: $27.a14, a15: $27.a15}), $1, $2);
-   case 2: return Config_update(csegen_457(), $3e => Config_parseBool($3e), b => $42 => ({a1: $42.a1, a2: $42.a2, a3: $42.a3, a4: $42.a4, a5: $42.a5, a6: $42.a6, a7: $42.a7, a8: b, a9: $42.a9, a10: $42.a10, a11: $42.a11, a12: $42.a12, a13: $42.a13, a14: $42.a14, a15: $42.a15}), $1, $2);
-   case 3: return Config_update(csegen_457(), $59 => ({a1: $59}), s => $5c => ({a1: $5c.a1, a2: $5c.a2, a3: $5c.a3, a4: s, a5: $5c.a5, a6: $5c.a6, a7: $5c.a7, a8: $5c.a8, a9: $5c.a9, a10: $5c.a10, a11: $5c.a11, a12: $5c.a12, a13: $5c.a13, a14: $5c.a14, a15: $5c.a15}), $1, $2);
-   case 4: return Config_update(csegen_457(), $73 => ({a1: $73}), s => $76 => ({a1: $76.a1, a2: $76.a2, a3: $76.a3, a4: $76.a4, a5: s, a6: $76.a6, a7: $76.a7, a8: $76.a8, a9: $76.a9, a10: $76.a10, a11: $76.a11, a12: $76.a12, a13: $76.a13, a14: $76.a14, a15: $76.a15}), $1, $2);
-   case 5: return Config_update(csegen_457(), $8d => Data_Theme_parseString($8d), t => $91 => ({a1: $91.a1, a2: $91.a2, a3: $91.a3, a4: $91.a4, a5: $91.a5, a6: $91.a6, a7: $91.a7, a8: $91.a8, a9: $91.a9, a10: $91.a10, a11: $91.a11, a12: $91.a12, a13: $91.a13, a14: t, a15: $91.a15}), $1, $2);
-   case 6: return Config_update(csegen_457(), $a8 => ({a1: $a8}), s => $ab => ({a1: $ab.a1, a2: $ab.a2, a3: $ab.a3, a4: $ab.a4, a5: $ab.a5, a6: $ab.a6, a7: $ab.a7, a8: $ab.a8, a9: $ab.a9, a10: $ab.a10, a11: $ab.a11, a12: $ab.a12, a13: {a1: s}, a14: $ab.a14, a15: $ab.a15}), $1, $2);
-   case 7: return Config_update(csegen_457(), $c3 => Config_parseBool($c3), b => $c7 => ({a1: $c7.a1, a2: $c7.a2, a3: $c7.a3, a4: $c7.a4, a5: $c7.a5, a6: b, a7: $c7.a7, a8: $c7.a8, a9: $c7.a9, a10: $c7.a10, a11: $c7.a11, a12: $c7.a12, a13: $c7.a13, a14: $c7.a14, a15: $c7.a15}), $1, $2);
-   case 8: return Config_update(csegen_457(), $de => Config_parseBool($de), b => $e2 => ({a1: $e2.a1, a2: $e2.a2, a3: $e2.a3, a4: $e2.a4, a5: $e2.a5, a6: $e2.a6, a7: b, a8: $e2.a8, a9: $e2.a9, a10: $e2.a10, a11: $e2.a11, a12: $e2.a12, a13: $e2.a13, a14: $e2.a14, a15: $e2.a15}), $1, $2);
-   case 9: return Config_update(csegen_457(), $f9 => Config_parseBool($f9), b => $fd => ({a1: $fd.a1, a2: $fd.a2, a3: $fd.a3, a4: $fd.a4, a5: $fd.a5, a6: $fd.a6, a7: $fd.a7, a8: b, a9: $fd.a9, a10: $fd.a10, a11: $fd.a11, a12: $fd.a12, a13: $fd.a13, a14: $fd.a14, a15: $fd.a15}), $1, $2);
+   case 0: return Config_update(csegen_462(), $8 => Config_parseBool($8), b => $c => ({a1: $c.a1, a2: $c.a2, a3: $c.a3, a4: $c.a4, a5: $c.a5, a6: b, a7: $c.a7, a8: $c.a8, a9: $c.a9, a10: $c.a10, a11: $c.a11, a12: $c.a12, a13: $c.a13, a14: $c.a14, a15: $c.a15}), $1, $2);
+   case 1: return Config_update(csegen_462(), $23 => Config_parseBool($23), b => $27 => ({a1: $27.a1, a2: $27.a2, a3: $27.a3, a4: $27.a4, a5: $27.a5, a6: $27.a6, a7: b, a8: $27.a8, a9: $27.a9, a10: $27.a10, a11: $27.a11, a12: $27.a12, a13: $27.a13, a14: $27.a14, a15: $27.a15}), $1, $2);
+   case 2: return Config_update(csegen_462(), $3e => Config_parseBool($3e), b => $42 => ({a1: $42.a1, a2: $42.a2, a3: $42.a3, a4: $42.a4, a5: $42.a5, a6: $42.a6, a7: $42.a7, a8: b, a9: $42.a9, a10: $42.a10, a11: $42.a11, a12: $42.a12, a13: $42.a13, a14: $42.a14, a15: $42.a15}), $1, $2);
+   case 3: return Config_update(csegen_462(), $59 => ({a1: $59}), s => $5c => ({a1: $5c.a1, a2: $5c.a2, a3: $5c.a3, a4: s, a5: $5c.a5, a6: $5c.a6, a7: $5c.a7, a8: $5c.a8, a9: $5c.a9, a10: $5c.a10, a11: $5c.a11, a12: $5c.a12, a13: $5c.a13, a14: $5c.a14, a15: $5c.a15}), $1, $2);
+   case 4: return Config_update(csegen_462(), $73 => ({a1: $73}), s => $76 => ({a1: $76.a1, a2: $76.a2, a3: $76.a3, a4: $76.a4, a5: s, a6: $76.a6, a7: $76.a7, a8: $76.a8, a9: $76.a9, a10: $76.a10, a11: $76.a11, a12: $76.a12, a13: $76.a13, a14: $76.a14, a15: $76.a15}), $1, $2);
+   case 5: return Config_update(csegen_462(), $8d => Data_Theme_parseString($8d), t => $91 => ({a1: $91.a1, a2: $91.a2, a3: $91.a3, a4: $91.a4, a5: $91.a5, a6: $91.a6, a7: $91.a7, a8: $91.a8, a9: $91.a9, a10: $91.a10, a11: $91.a11, a12: $91.a12, a13: $91.a13, a14: t, a15: $91.a15}), $1, $2);
+   case 6: return Config_update(csegen_462(), $a8 => ({a1: $a8}), s => $ab => ({a1: $ab.a1, a2: $ab.a2, a3: $ab.a3, a4: $ab.a4, a5: $ab.a5, a6: $ab.a6, a7: $ab.a7, a8: $ab.a8, a9: $ab.a9, a10: $ab.a10, a11: $ab.a11, a12: $ab.a12, a13: {a1: s}, a14: $ab.a14, a15: $ab.a15}), $1, $2);
+   case 7: return Config_update(csegen_462(), $c3 => Config_parseBool($c3), b => $c7 => ({a1: $c7.a1, a2: $c7.a2, a3: $c7.a3, a4: $c7.a4, a5: $c7.a5, a6: b, a7: $c7.a7, a8: $c7.a8, a9: $c7.a9, a10: $c7.a10, a11: $c7.a11, a12: $c7.a12, a13: $c7.a13, a14: $c7.a14, a15: $c7.a15}), $1, $2);
+   case 8: return Config_update(csegen_462(), $de => Config_parseBool($de), b => $e2 => ({a1: $e2.a1, a2: $e2.a2, a3: $e2.a3, a4: $e2.a4, a5: $e2.a5, a6: $e2.a6, a7: b, a8: $e2.a8, a9: $e2.a9, a10: $e2.a10, a11: $e2.a11, a12: $e2.a12, a13: $e2.a13, a14: $e2.a14, a15: $e2.a15}), $1, $2);
+   case 9: return Config_update(csegen_462(), $f9 => Config_parseBool($f9), b => $fd => ({a1: $fd.a1, a2: $fd.a2, a3: $fd.a3, a4: $fd.a4, a5: $fd.a5, a6: $fd.a6, a7: $fd.a7, a8: b, a9: $fd.a9, a10: $fd.a10, a11: $fd.a11, a12: $fd.a12, a13: $fd.a13, a14: $fd.a14, a15: $fd.a15}), $1, $2);
   }
  };
 }
@@ -9256,19 +9381,30 @@ function Config_preferOriginRemote($0) {
 
 /* Config.parseGitHubURI : String -> Maybe GitRemote */
 function Config_parseGitHubURI($0) {
- return Prelude_Types_x3cx7cx3e_Alternative_Maybe(Config_n__8441_1489_parseHTTPS($0, $0), () => Config_n__8441_1490_parseSSH($0, $0));
+ return Prelude_Types_x3cx7cx3e_Alternative_Maybe(Config_n__8648_1563_parseHTTPS($0, $0), () => Config_n__8648_1564_parseSSH($0, $0));
 }
 
 /* Config.parseBool : String -> Maybe Bool */
 function Config_parseBool($0) {
- return Config_with__parseBool_1625($0, Data_String_toLower($0));
+ return Config_with__parseBool_1699($0, Data_String_toLower($0));
+}
+
+/* Config.nonOrgFallback : Lazy a -> Promise OrgError a -> Promise String a */
+function Config_nonOrgFallback($0, $1, $2, $3) {
+ const $6 = $7 => $8 => $9 => {
+  switch($7.h) {
+   case 0: /* nothing */ return Data_Promise_pure_Applicative_x28Promisex20x24ex29($0(), $8, $9);
+   case undefined: /* just */ return Data_Promise_reject($7.a1, $8, $9);
+  }
+ };
+ return Data_Promise_bindError($1, $6, $2, $3);
 }
 
-/* Config.loadOrCreateConfig : Git => Maybe String -> Bool -> Nat -> Maybe String -> Promise Config */
+/* Config.loadOrCreateConfig : Git => Maybe String -> Bool -> Nat -> Maybe String -> Promise' Config */
 function Config_loadOrCreateConfig($0, $1, $2, $3, $4, $5, $6) {
  const $10 = $11 => {
   switch($11.h) {
-   case 1: /* Right */ return $13 => $14 => Data_Promise_pure_Applicative_Promise($11.a1, $13, $14);
+   case 1: /* Right */ return $13 => $14 => Data_Promise_pure_Applicative_x28Promisex20x24ex29($11.a1, $13, $14);
    case 0: /* Left */ {
     return $19 => {
      switch($11.a1.h) {
@@ -9286,7 +9422,7 @@ function Config_loadOrCreateConfig($0, $1, $2, $3, $4, $5, $6) {
    }
   }
  };
- return Data_Promise_x3ex3ex3d_Monad_Promise(Config_loadConfig(csegen_73()(), $2, $3, $4), $10, $5, $6);
+ return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(Config_loadConfig(csegen_73()(), $2, $3, $4), $10, $5, $6);
 }
 
 /* Config.loadConfig : HasIO io => Bool -> Nat -> Maybe String -> io (Either ConfigError Config) */
@@ -9360,9 +9496,9 @@ function Config_loadConfig($0, $1, $2, $3) {
  return $32($4e);
 }
 
-/* Config.getConfig : Config => String -> Promise String */
+/* Config.getConfig : Config => String -> Promise' String */
 function Config_getConfig($0, $1) {
- return $2 => Config_with__getConfig_2386($1, Data_Config_settablePropNamed($1), $0, $2);
+ return $2 => Config_with__getConfig_2467($1, Data_Config_settablePropNamed($1), $0, $2);
 }
 
 /* Config.findConfig : HasIO io => String -> Fuel -> io (Maybe String) */
@@ -9384,14 +9520,14 @@ function Config_findConfig($0, $1, $2) {
 
 /* Config.dropPrefix' : String -> String -> Maybe String */
 function Config_dropPrefixx27($0, $1) {
- return Prelude_Types_map_Functor_Maybe($4 => Prelude_Types_fastPack($4), Config_n__8394_1442_dropx27($0, Prelude_Types_fastUnpack($1)));
+ return Prelude_Types_map_Functor_Maybe($4 => Prelude_Types_fastPack($4), Config_n__8601_1516_dropx27($0, Prelude_Types_fastUnpack($1)));
 }
 
-/* Config.createConfig : Git => Maybe String -> Bool -> Nat -> Maybe String -> Promise Config */
+/* Config.createConfig : Git => Maybe String -> Bool -> Nat -> Maybe String -> Promise' Config */
 function Config_createConfig($0, $1, $2, $3, $4, $5, $6) {
  const $25 = $26 => $27 => $28 => {
   const $37 = $38 => {
-   const $3a = Config_n__9448_2537_enterForDefaultStr($0, $4, $3, $2, $1, 'unset');
+   const $3a = Config_n__9665_2621_enterForDefaultStr($0, $4, $3, $2, $1, 'unset');
    const $39 = () => $42 => $43 => {
     const $6d = $6e => $6f => $70 => {
      const $72 = $73 => $74 => {
@@ -9401,7 +9537,7 @@ function Config_createConfig($0, $1, $2, $3, $4, $5, $6) {
         default: return {a1: Data_String_trim($77)};
        }
       };
-      return Data_Promise_map_Functor_Promise($76, csegen_470()(), $73, $74);
+      return Data_Promise_map_Functor_x28Promisex20x24ex29($76, csegen_475()(), $73, $74);
      };
      const $83 = configPAT => $84 => $85 => {
       const $91 = $92 => $93 => $94 => {
@@ -9409,22 +9545,22 @@ function Config_createConfig($0, $1, $2, $3, $4, $5, $6) {
         case undefined: /* just */ {
          const $a8 = remoteGuess => $a9 => $aa => {
           const $c7 = defaultOrgAndRepo => {
-           const $c8 = Config_n__9448_2536_defaultStr($0, $4, $3, $2, $1, csegen_441()(), defaultOrgAndRepo);
+           const $c8 = Config_n__9665_2620_defaultStr($0, $4, $3, $2, $1, csegen_446()(), defaultOrgAndRepo);
            return $d3 => $d4 => {
             const $f2 = $f3 => $f4 => $f5 => {
              const $113 = org => {
-              const $114 = Config_n__9448_2536_defaultStr($0, $4, $3, $2, $1, csegen_437()(), defaultOrgAndRepo);
+              const $114 = Config_n__9665_2620_defaultStr($0, $4, $3, $2, $1, csegen_442()(), defaultOrgAndRepo);
               return $11f => $120 => {
                const $13e = $13f => $140 => $141 => {
                 const $15f = repo => {
-                 const $160 = Config_n__9448_2537_enterForDefaultStr($0, $4, $3, $2, $1, remoteGuess);
+                 const $160 = Config_n__9665_2621_enterForDefaultStr($0, $4, $3, $2, $1, remoteGuess);
                  return $168 => $169 => {
                   const $187 = $188 => $189 => $18a => {
                    const $1a2 = defaultRemote => $1a3 => $1a4 => {
                     const $1ac = commentOnRequest => $1ad => $1ae => {
                      const $1b6 = requestTeams => $1b7 => $1b8 => {
                       const $1c0 = requestUsers => {
-                       const $1c1 = Config_n__9448_2537_enterForDefaultStr($0, $4, $3, $2, $1, 'dark');
+                       const $1c1 = Config_n__9665_2621_enterForDefaultStr($0, $4, $3, $2, $1, 'dark');
                        return $1c9 => $1ca => {
                         const $1e8 = $1e9 => $1ea => $1eb => {
                          const $212 = theme => $213 => $214 => {
@@ -9434,79 +9570,79 @@ function Config_createConfig($0, $1, $2, $3, $4, $5, $6) {
                              const $249 = updatedAt => {
                               const $24a = {a1: Prelude_Types_foldMap_Foldable_List(csegen_50()(), $251 => $251, {a1: './', a2: {a1: Data_Config_filename(), a2: {h: 0}}}), a2: $2, a3: $3, a4: $4};
                               return $25b => $25c => {
-                               const $266 = teamSlugs => $267 => $268 => {
-                                const $273 = repoLabels => $274 => $275 => {
-                                 const $27f = orgMembers => {
-                                  const $280 = {a1: updatedAt, a2: org, a3: repo, a4: defaultRemote, a5: mainBranch, a6: requestTeams, a7: requestUsers, a8: commentOnRequest, a9: teamSlugs, a10: repoLabels, a11: orgMembers, a12: {h: 0}, a13: Prelude_Types_map_Functor_Maybe($290 => $290, configPAT), a14: theme, a15: $24a};
-                                  return $294 => $295 => Data_Promise_x3ex3ex3d_Monad_Promise($298 => $299 => Data_Promise_map_Functor_Promise($29c => (undefined), $29e => $29f => Config_writeConfig($280, $29e, $29f), $298, $299), $2a7 => $2a8 => $2a9 => Data_Promise_x3ex3ex3d_Monad_Promise($2ac => $2ad => $2ae => Data_Promise_liftIO_HasIO_Promise($2b1 => Prelude_IO_prim__putStr('Your new configuration is:\n', $2b1), $2ac, $2ad, $2ae), $2b9 => $2ba => $2bb => Data_Promise_x3ex3ex3d_Monad_Promise($2be => $2bf => $2c0 => Data_Promise_liftIO_HasIO_Promise($2c3 => Prelude_IO_prim__putStr((Data_Config_show_Show_Config($280)+'\n'), $2c3), $2be, $2bf, $2c0), $2cf => $2d0 => $2d1 => Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Types_either(() => $2d6 => Util_renderIO($280, csegen_73()(), $2d6), () => csegen_435()(), Config_checkConfigConsistency($280)), $2e4 => $2e5 => $2e6 => Data_Promise_pure_Applicative_Promise($280, $2e5, $2e6), $2d0, $2d1), $2ba, $2bb), $2a8, $2a9), $294, $295);
+                               const $26d = teamSlugs => $26e => $26f => {
+                                const $280 = orgMembers => $281 => $282 => {
+                                 const $28d = repoLabels => {
+                                  const $28e = {a1: updatedAt, a2: org, a3: repo, a4: defaultRemote, a5: mainBranch, a6: requestTeams, a7: requestUsers, a8: commentOnRequest, a9: teamSlugs, a10: repoLabels, a11: orgMembers, a12: {h: 0}, a13: Prelude_Types_map_Functor_Maybe($29e => $29e, configPAT), a14: theme, a15: $24a};
+                                  return $2a2 => $2a3 => Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($2a6 => $2a7 => Data_Promise_map_Functor_x28Promisex20x24ex29($2aa => (undefined), $2ac => $2ad => Config_writeConfig($28e, $2ac, $2ad), $2a6, $2a7), $2b5 => $2b6 => $2b7 => Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($2ba => $2bb => $2bc => Data_Promise_liftIO_HasIO_x28Promisex20x24ex29($2bf => Prelude_IO_prim__putStr('Your new configuration is:\n', $2bf), $2ba, $2bb, $2bc), $2c7 => $2c8 => $2c9 => Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($2cc => $2cd => $2ce => Data_Promise_liftIO_HasIO_x28Promisex20x24ex29($2d1 => Prelude_IO_prim__putStr((Data_Config_show_Show_Config($28e)+'\n'), $2d1), $2cc, $2cd, $2ce), $2dd => $2de => $2df => Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(Prelude_Types_either(() => $2e4 => Util_renderIO($28e, csegen_73()(), $2e4), () => csegen_440()(), Config_checkConfigConsistency($28e)), $2f2 => $2f3 => $2f4 => Data_Promise_pure_Applicative_x28Promisex20x24ex29($28e, $2f3, $2f4), $2de, $2df), $2c8, $2c9), $2b6, $2b7), $2a2, $2a3);
                                  };
-                                 return Data_Promise_x3ex3ex3d_Monad_Promise($278 => $279 => FFI_GitHub_listOrgMembers(_, org, $278, $279), $27f, $274, $275);
+                                 return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($285 => $286 => FFI_GitHub_listRepoLabels(_, org, repo, $285, $286), $28d, $281, $282);
                                 };
-                                return Data_Promise_x3ex3ex3d_Monad_Promise($26b => $26c => FFI_GitHub_listRepoLabels(_, org, repo, $26b, $26c), $273, $267, $268);
+                                return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($272 => $273 => Config_nonOrgFallback(() => ({h: 0}), $277 => $278 => FFI_GitHub_listOrgMembers(_, org, $277, $278), $272, $273), $280, $26e, $26f);
                                };
-                               return Data_Promise_x3ex3ex3d_Monad_Promise($25f => $260 => FFI_GitHub_listTeams(_, org, $25f, $260), $266, $25b, $25c);
+                               return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($25f => $260 => Config_nonOrgFallback(() => ({h: 0}), $264 => $265 => FFI_GitHub_listTeams(_, org, $264, $265), $25f, $260), $26d, $25b, $25c);
                               };
                              };
-                             return Data_Promise_x3ex3ex3d_Monad_Promise(csegen_452()(), $249, $243, $244);
+                             return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(csegen_457()(), $249, $243, $244);
                             };
-                            return Data_Promise_x3ex3ex3d_Monad_Promise($23a => $23b => FFI_GitHub_getRepoDefaultBranch(_, org, repo, $23a, $23b), $242, $236, $237);
+                            return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($23a => $23b => FFI_GitHub_getRepoDefaultBranch(_, org, repo, $23a, $23b), $242, $236, $237);
                            };
-                           return Data_Promise_x3ex3ex3d_Monad_Promise($228 => $229 => $22a => Data_Promise_liftIO_HasIO_Promise($22d => Prelude_IO_prim__putStr('Creating config...\n', $22d), $228, $229, $22a), $234, $224, $225);
+                           return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($228 => $229 => $22a => Data_Promise_liftIO_HasIO_x28Promisex20x24ex29($22d => Prelude_IO_prim__putStr('Creating config...\n', $22d), $228, $229, $22a), $234, $224, $225);
                           };
-                          return Data_Promise_x3ex3ex3d_Monad_Promise($217 => $218 => $219 => Data_Promise_liftIO_HasIO_Promise($21c => FFI_GitHub_octokit($92.a1, $21c), $217, $218, $219), $223, $213, $214);
+                          return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($217 => $218 => $219 => Data_Promise_liftIO_HasIO_x28Promisex20x24ex29($21c => FFI_GitHub_octokit($92.a1, $21c), $217, $218, $219), $223, $213, $214);
                          };
-                         return Data_Promise_x3ex3ex3d_Monad_Promise(Config_n__9448_2538_offerRetry($0, $4, $3, $2, $1, csegen_73()(), 'The theme must be either \'dark\' or \'light\'. Which would you prefer?', 'Could not parse the input as a valid theme; will use \'dark\' for now.', () => 1, $1fb => $1fc => Data_Promise_map_Functor_Promise($1ff => Data_Theme_parseString(Config_n__9448_2539_orIfEmpty($0, $4, $3, $2, $1, {a1: 'dark'}, Data_String_trim($1ff))), csegen_470()(), $1fb, $1fc)), $212, $1ea, $1eb);
+                         return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(Config_n__9665_2622_offerRetry($0, $4, $3, $2, $1, csegen_73()(), 'The theme must be either \'dark\' or \'light\'. Which would you prefer?', 'Could not parse the input as a valid theme; will use \'dark\' for now.', () => 1, $1fb => $1fc => Data_Promise_map_Functor_x28Promisex20x24ex29($1ff => Data_Theme_parseString(Config_n__9665_2623_orIfEmpty($0, $4, $3, $2, $1, {a1: 'dark'}, Data_String_trim($1ff))), csegen_475()(), $1fb, $1fc)), $212, $1ea, $1eb);
                         };
-                        return Data_Promise_x3ex3ex3d_Monad_Promise($1cd => $1ce => $1cf => Data_Promise_liftIO_HasIO_Promise($1d2 => Prelude_IO_prim__putStr((Prelude_Types_foldMap_Foldable_List(csegen_50()(), $1db => $1db, {a1: 'Would you like harmony configured for a dark or light terminal background', a2: {a1: $1c1, a2: {a1: '?', a2: {h: 0}}}})+'\n'), $1d2), $1cd, $1ce, $1cf), $1e8, $1c9, $1ca);
+                        return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($1cd => $1ce => $1cf => Data_Promise_liftIO_HasIO_x28Promisex20x24ex29($1d2 => Prelude_IO_prim__putStr((Prelude_Types_foldMap_Foldable_List(csegen_50()(), $1db => $1db, {a1: 'Would you like harmony configured for a dark or light terminal background', a2: {a1: $1c1, a2: {a1: '?', a2: {h: 0}}}})+'\n'), $1d2), $1cd, $1ce, $1cf), $1e8, $1c9, $1ca);
                        };
                       };
-                      return Data_Promise_x3ex3ex3d_Monad_Promise(Util_yesNoPrompt(csegen_73()(), 'Would you like harmony to request reviews from individual users when it requests a teams review?'), $1c0, $1b7, $1b8);
+                      return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(Util_yesNoPrompt(csegen_73()(), 'Would you like harmony to request reviews from individual users when it requests a teams review?'), $1c0, $1b7, $1b8);
                      };
-                     return Data_Promise_x3ex3ex3d_Monad_Promise(Util_yesNoPrompt(csegen_73()(), 'Would you like harmony to request reviews from teams when it requests reviewers?'), $1b6, $1ad, $1ae);
+                     return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(Util_yesNoPrompt(csegen_73()(), 'Would you like harmony to request reviews from teams when it requests reviewers?'), $1b6, $1ad, $1ae);
                     };
-                    return Data_Promise_x3ex3ex3d_Monad_Promise(Util_yesNoPrompt(csegen_73()(), 'Would you like harmony to comment when it requests reviewers?'), $1ac, $1a3, $1a4);
+                    return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(Util_yesNoPrompt(csegen_73()(), 'Would you like harmony to comment when it requests reviewers?'), $1ac, $1a3, $1a4);
                    };
-                   return Data_Promise_x3ex3ex3d_Monad_Promise($18d => $18e => Data_Promise_map_Functor_Promise($191 => Config_n__9448_2539_orIfEmpty($0, $4, $3, $2, $1, {a1: remoteGuess}, Data_String_trim($191)), csegen_470()(), $18d, $18e), $1a2, $189, $18a);
+                   return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($18d => $18e => Data_Promise_map_Functor_x28Promisex20x24ex29($191 => Config_n__9665_2623_orIfEmpty($0, $4, $3, $2, $1, {a1: remoteGuess}, Data_String_trim($191)), csegen_475()(), $18d, $18e), $1a2, $189, $18a);
                   };
-                  return Data_Promise_x3ex3ex3d_Monad_Promise($16c => $16d => $16e => Data_Promise_liftIO_HasIO_Promise($171 => Prelude_IO_prim__putStr((Prelude_Types_foldMap_Foldable_List(csegen_50()(), $17a => $17a, {a1: 'What GitHub remote repo would you like to use harmony for', a2: {a1: $160, a2: {a1: '?', a2: {h: 0}}}})+'\n'), $171), $16c, $16d, $16e), $187, $168, $169);
+                  return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($16c => $16d => $16e => Data_Promise_liftIO_HasIO_x28Promisex20x24ex29($171 => Prelude_IO_prim__putStr((Prelude_Types_foldMap_Foldable_List(csegen_50()(), $17a => $17a, {a1: 'What GitHub remote repo would you like to use harmony for', a2: {a1: $160, a2: {a1: '?', a2: {h: 0}}}})+'\n'), $171), $16c, $16d, $16e), $187, $168, $169);
                  };
                 };
-                return Data_Promise_x3ex3ex3d_Monad_Promise($144 => $145 => Data_Promise_map_Functor_Promise($148 => Config_n__9448_2539_orIfEmpty($0, $4, $3, $2, $1, Config_n__9448_2541_repo($0, $4, $3, $2, $1, defaultOrgAndRepo), Data_String_trim($148)), csegen_470()(), $144, $145), $15f, $140, $141);
+                return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($144 => $145 => Data_Promise_map_Functor_x28Promisex20x24ex29($148 => Config_n__9665_2623_orIfEmpty($0, $4, $3, $2, $1, Config_n__9665_2625_repo($0, $4, $3, $2, $1, defaultOrgAndRepo), Data_String_trim($148)), csegen_475()(), $144, $145), $15f, $140, $141);
                };
-               return Data_Promise_x3ex3ex3d_Monad_Promise($123 => $124 => $125 => Data_Promise_liftIO_HasIO_Promise($128 => Prelude_IO_prim__putStr((Prelude_Types_foldMap_Foldable_List(csegen_50()(), $131 => $131, {a1: 'What repository would you like to use harmony for', a2: {a1: $114, a2: {a1: '?', a2: {h: 0}}}})+'\n'), $128), $123, $124, $125), $13e, $11f, $120);
+               return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($123 => $124 => $125 => Data_Promise_liftIO_HasIO_x28Promisex20x24ex29($128 => Prelude_IO_prim__putStr((Prelude_Types_foldMap_Foldable_List(csegen_50()(), $131 => $131, {a1: 'What repository would you like to use harmony for', a2: {a1: $114, a2: {a1: '?', a2: {h: 0}}}})+'\n'), $128), $123, $124, $125), $13e, $11f, $120);
               };
              };
-             return Data_Promise_x3ex3ex3d_Monad_Promise($f8 => $f9 => Data_Promise_map_Functor_Promise($fc => Config_n__9448_2539_orIfEmpty($0, $4, $3, $2, $1, Config_n__9448_2540_org($0, $4, $3, $2, $1, defaultOrgAndRepo), Data_String_trim($fc)), csegen_470()(), $f8, $f9), $113, $f4, $f5);
+             return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($f8 => $f9 => Data_Promise_map_Functor_x28Promisex20x24ex29($fc => Config_n__9665_2623_orIfEmpty($0, $4, $3, $2, $1, Config_n__9665_2624_org($0, $4, $3, $2, $1, defaultOrgAndRepo), Data_String_trim($fc)), csegen_475()(), $f8, $f9), $113, $f4, $f5);
             };
-            return Data_Promise_x3ex3ex3d_Monad_Promise($d7 => $d8 => $d9 => Data_Promise_liftIO_HasIO_Promise($dc => Prelude_IO_prim__putStr((Prelude_Types_foldMap_Foldable_List(csegen_50()(), $e5 => $e5, {a1: 'What GitHub org would you like to use harmony for', a2: {a1: $c8, a2: {a1: '?', a2: {h: 0}}}})+'\n'), $dc), $d7, $d8, $d9), $f2, $d3, $d4);
+            return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($d7 => $d8 => $d9 => Data_Promise_liftIO_HasIO_x28Promisex20x24ex29($dc => Prelude_IO_prim__putStr((Prelude_Types_foldMap_Foldable_List(csegen_50()(), $e5 => $e5, {a1: 'What GitHub org would you like to use harmony for', a2: {a1: $c8, a2: {a1: '?', a2: {h: 0}}}})+'\n'), $dc), $d7, $d8, $d9), $f2, $d3, $d4);
            };
           };
-          return Data_Promise_x3ex3ex3d_Monad_Promise($ad => $ae => Data_Promise_x3cx7cx3e_Alternative_Promise($b1 => $b2 => Data_Promise_map_Functor_Promise($b5 => Config_parseGitHubURI($b5), $b9 => $ba => FFI_Git_remoteURI($0, remoteGuess, $b9, $ba), $b1, $b2), () => csegen_472()(), $ad, $ae), $c7, $a9, $aa);
+          return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($ad => $ae => Data_Promise_x3cx7cx3e_Alternative_x28Promisex20Stringx29($b1 => $b2 => Data_Promise_map_Functor_x28Promisex20x24ex29($b5 => Config_parseGitHubURI($b5), $b9 => $ba => FFI_Git_remoteURI($0, remoteGuess, $b9, $ba), $b1, $b2), () => csegen_477()(), $ad, $ae), $c7, $a9, $aa);
          };
-         return Data_Promise_x3ex3ex3d_Monad_Promise($98 => $99 => Data_Promise_map_Functor_Promise($9c => Config_preferOriginRemote($9c), $a0 => $a1 => FFI_Git_listRemotes($0, $a0, $a1), $98, $99), $a8, $93, $94);
+         return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($98 => $99 => Data_Promise_map_Functor_x28Promisex20x24ex29($9c => Config_preferOriginRemote($9c), $a0 => $a1 => FFI_Git_listRemotes($0, $a0, $a1), $98, $99), $a8, $93, $94);
         }
         default: return Data_Promise_reject('Either the GITHUB_PAT environment variable or githubPAT config property must be set to a personal access token.', $93, $94);
        }
       };
-      return Data_Promise_x3ex3ex3d_Monad_Promise($88 => $89 => Data_Promise_pure_Applicative_Promise(Prelude_Types_x3cx7cx3e_Alternative_Maybe($1, () => configPAT), $88, $89), $91, $84, $85);
+      return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($88 => $89 => Data_Promise_pure_Applicative_x28Promisex20x24ex29(Prelude_Types_x3cx7cx3e_Alternative_Maybe($1, () => configPAT), $88, $89), $91, $84, $85);
      };
-     return Data_Promise_x3ex3ex3d_Monad_Promise($72, $83, $6f, $70);
+     return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($72, $83, $6f, $70);
     };
-    return Data_Promise_x3ex3ex3d_Monad_Promise($46 => $47 => $48 => Data_Promise_liftIO_HasIO_Promise($4b => Prelude_IO_prim__putStr(Data_String_fastUnlines({a1: 'Harmony uses a GitHub Personal Access Token (PAT) to communicate with GitHub.', a2: {a1: 'You can set this via the $GITHUB_PAT environment variable or a config property.', a2: {a1: 'If you don\'t set in your config now, you can set later with `harmony config githubPAT abcdefg`.', a2: {a1: 'The ENV var will always take precedence over the config property.', a2: {a1: '', a2: {a1: Prelude_Types_foldMap_Foldable_List(csegen_50()(), $60 => $60, {a1: 'What PAT would you like to set in the config file', a2: {a1: $3a, a2: {a1: '?', a2: {h: 0}}}}), a2: {h: 0}}}}}}}), $4b), $46, $47, $48), $6d, $42, $43);
+    return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($46 => $47 => $48 => Data_Promise_liftIO_HasIO_x28Promisex20x24ex29($4b => Prelude_IO_prim__putStr(Data_String_fastUnlines({a1: 'Harmony uses a GitHub Personal Access Token (PAT) to communicate with GitHub.', a2: {a1: 'You can set this via the $GITHUB_PAT environment variable or a config property.', a2: {a1: 'If you don\'t set in your config now, you can set later with `harmony config githubPAT abcdefg`.', a2: {a1: 'The ENV var will always take precedence over the config property.', a2: {a1: '', a2: {a1: Prelude_Types_foldMap_Foldable_List(csegen_50()(), $60 => $60, {a1: 'What PAT would you like to set in the config file', a2: {a1: $3a, a2: {a1: '?', a2: {h: 0}}}}), a2: {h: 0}}}}}}}), $4b), $46, $47, $48), $6d, $42, $43);
    };
    return $39();
   };
-  return Data_Promise_x3ex3ex3d_Monad_Promise($2b => $2c => $2d => Data_Promise_liftIO_HasIO_Promise($30 => Prelude_IO_prim__putStr('\n', $30), $2b, $2c, $2d), $37, $27, $28);
+  return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($2b => $2c => $2d => Data_Promise_liftIO_HasIO_x28Promisex20x24ex29($30 => Prelude_IO_prim__putStr('\n', $30), $2b, $2c, $2d), $37, $27, $28);
  };
- return Data_Promise_x3ex3ex3d_Monad_Promise($9 => $a => $b => Data_Promise_liftIO_HasIO_Promise($e => Prelude_IO_prim__putStr((Prelude_Types_foldMap_Foldable_List(csegen_50()(), $17 => $17, {a1: 'Creating a new configuration (storing in ', a2: {a1: Data_Config_filename(), a2: {a1: ')...', a2: {h: 0}}}})+'\n'), $e), $9, $a, $b), $25, $5, $6);
+ return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($9 => $a => $b => Data_Promise_liftIO_HasIO_x28Promisex20x24ex29($e => Prelude_IO_prim__putStr((Prelude_Types_foldMap_Foldable_List(csegen_50()(), $17 => $17, {a1: 'Creating a new configuration (storing in ', a2: {a1: Data_Config_filename(), a2: {a1: ')...', a2: {h: 0}}}})+'\n'), $e), $9, $a, $b), $25, $5, $6);
 }
 
 /* Config.checkConfigConsistency : Config -> Either (Doc AnsiStyle) () */
 function Config_checkConfigConsistency($0) {
- return Config_n__8283_1335_checkRequestSettings($0, $0);
+ return Config_n__8490_1409_checkRequestSettings($0, $0);
 }
 
-/* Config.addIgnoredPRs : Config -> List Integer -> Promise Config */
+/* Config.addIgnoredPRs : Config -> List Integer -> Promise' Config */
 function Config_addIgnoredPRs($0, $1, $2, $3) {
  return Config_writeConfig({a1: $0.a1, a2: $0.a2, a3: $0.a3, a4: $0.a4, a5: $0.a5, a6: $0.a6, a7: $0.a7, a8: $0.a8, a9: $0.a9, a10: $0.a10, a11: $0.a11, a12: Data_List_nub(csegen_227(), Prelude_Types_List_tailRecAppend($0.a12, $1)), a13: $0.a13, a14: $0.a14, a15: $0.a15}, $2, $3);
 }
@@ -9559,7 +9695,7 @@ function Data_List_PrefixSuffix_dropPrefix($0, $1, $2) {
 }
 
 /* Commands.case block in contribute */
-function Commands_case__contribute_3019($0, $1, $2, $3, $4, $5, $6, $7, $8, $9, $a, $b, $c, $d, $e) {
+function Commands_case__contribute_3117($0, $1, $2, $3, $4, $5, $6, $7, $8, $9, $a, $b, $c, $d, $e) {
  const $10 = Data_List_headx27(Data_List_drop($9, Prelude_Types_List_tailRecAppend($e.a1, $e.a2)));
  return $19 => $1a => {
   switch($10.h) {
@@ -9569,40 +9705,40 @@ function Commands_case__contribute_3019($0, $1, $2, $3, $4, $5, $6, $7, $8, $9,
      const $24 = Prelude_Types_map_Functor_Maybe($27 => $10.a1.a7, $a);
      switch($24.h) {
       case undefined: /* just */ return FFI_Git_checkoutBranch($0, $24.a1, $22, $23);
-      case 0: /* nothing */ return Data_Promise_pure_Applicative_Promise(undefined, $22, $23);
+      case 0: /* nothing */ return Data_Promise_pure_Applicative_x28Promisex20x24ex29(undefined, $22, $23);
      }
     };
-    return Data_Promise_x3ex3ex3d_Monad_Promise($21, $34 => $35 => $36 => $37 => Data_Promise_liftIO_HasIO_Promise($3a => Prelude_IO_prim__putStr((Data_PullRequest_rf__webURI($8, $10.a1)+'\n'), $3a), $35, $36, $37), $19, $1a);
+    return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($21, $34 => $35 => $36 => $37 => Data_Promise_liftIO_HasIO_x28Promisex20x24ex29($3a => Prelude_IO_prim__putStr((Data_PullRequest_rf__webURI($8, $10.a1)+'\n'), $3a), $35, $36, $37), $19, $1a);
    }
   }
  };
 }
 
 /* Commands.case block in case block in graph */
-function Commands_case__casex20blockx20inx20graph_2168($0, $1, $2, $3, $4, $5, $6, $7, $8) {
+function Commands_case__casex20blockx20inx20graph_2254($0, $1, $2, $3, $4, $5, $6, $7, $8) {
  return $9 => {
   const $c = $d => $e => {
    switch(Data_Maybe_isJust($3)) {
-    case 1: return Data_Promise_map_Functor_Promise($14 => ({a1: $14}), PullRequest_countReviewsByEachUser($2, $0)(PullRequest_combined($6)), $d, $e);
-    case 0: return Data_Promise_pure_Applicative_Promise({h: 0}, $d, $e);
+    case 1: return Data_Promise_map_Functor_x28Promisex20x24ex29($14 => ({a1: $14}), PullRequest_countReviewsByEachUser($2, $0)(PullRequest_combined($6)), $d, $e);
+    case 0: return Data_Promise_pure_Applicative_x28Promisex20x24ex29({h: 0}, $d, $e);
    }
   };
-  return Data_Promise_x3ex3ex3d_Monad_Promise($c, completedReviews => Util_renderIO($2, csegen_73()(), Graph_reviewsGraph($2, csegen_224(), {a1: ann => $31 => Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String($31), a2: ann => $35 => $36 => Text_PrettyPrint_Prettyprinter_Doc_prettyPrec_Pretty_String($35, $36)}, $7.a2, $7.a1, $5, completedReviews)), $8, $9);
+  return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($c, completedReviews => Util_renderIO($2, csegen_73()(), Graph_reviewsGraph($2, csegen_224(), {a1: ann => $31 => Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String($31), a2: ann => $35 => $36 => Text_PrettyPrint_Prettyprinter_Doc_prettyPrec_Pretty_String($35, $36)}, $7.a2, $7.a1, $5, completedReviews)), $8, $9);
  };
 }
 
 /* Commands.case block in graph */
-function Commands_case__graph_2126($0, $1, $2, $3, $4, $5) {
+function Commands_case__graph_2210($0, $1, $2, $3, $4, $5) {
  return $6 => {
   switch($4.h) {
-   case undefined: /* just */ return Data_Promise_x3ex3ex3d_Monad_Promise($a => $b => FFI_GitHub_listTeamMembers($0, $2.a2, $4.a1, $a, $b), teamMemberLogins => $14 => $15 => Data_Promise_x3ex3ex3d_Monad_Promise(PullRequest_listPartitionedPRs($2, $0, 4n, 100n), prs => $1e => Commands_case__casex20blockx20inx20graph_2168($0, $1, $2, $3, $4.a1, teamMemberLogins, prs, PullRequest_rf__allReviewers(prs), $1e), $14, $15), $5, $6);
+   case undefined: /* just */ return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($a => $b => FFI_GitHub_forceListTeamMembers($0, $2.a2, $4.a1, $a, $b), teamMemberLogins => $14 => $15 => Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(PullRequest_listPartitionedPRs($2, $0, 4n, 100n), prs => $1e => Commands_case__casex20blockx20inx20graph_2254($0, $1, $2, $3, $4.a1, teamMemberLogins, prs, PullRequest_rf__allReviewers(prs), $1e), $14, $15), $5, $6);
    case 0: /* nothing */ return Data_Promise_reject('The graph command expects the name of a GitHub Team as an argument.', $5, $6);
   }
  };
 }
 
 /* Commands.case block in request */
-function Commands_case__request_1766($0, $1, $2, $3, $4, $5) {
+function Commands_case__request_1779($0, $1, $2, $3, $4, $5) {
  return $7 => $9 => {
   let $a;
   switch(Prelude_Types_null_Foldable_List($5.a1)) {
@@ -9644,27 +9780,27 @@ function Commands_case__request_1766($0, $1, $2, $3, $4, $5) {
       }
       return Prelude_Interfaces_when(csegen_65()(), $46, () => $4c => $4d => Commands_label($0, $1, $2, $5.a2.a2, $4c, $4d));
      };
-     return Data_Promise_x3ex3ex3d_Monad_Promise($35 => $36 => PullRequest_requestReviewers($0, $2, $2f.a2, $5.a2.a1, $5.a1, $3, $35, $36), $40, $30, $31);
+     return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($35 => $36 => PullRequest_requestReviewers($0, $2, $2f.a2, $5.a2.a1, $5.a1, $3, $35, $36), $40, $30, $31);
     };
-    return Data_Promise_x3ex3ex3d_Monad_Promise($16 => $17 => Data_Promise_x3ex3ex3d_Monad_Promise($1a => $1b => FFI_Git_currentBranch($1, $1a, $1b), $21 => $22 => $23 => PullRequest_identifyOrCreatePR($0, $1, $2, 0, $21, $22, $23), $16, $17), $2e, $7, $9);
+    return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($16 => $17 => Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($1a => $1b => FFI_Git_currentBranch($1, $1a, $1b), $21 => $22 => $23 => PullRequest_identifyOrCreatePR($0, $1, $2, 0, $21, $22, $23), $16, $17), $2e, $7, $9);
    }
   }
  };
 }
 
 /* Commands.case block in case block in request,partitionedArgs */
-function Commands_case__casex20blockx20inx20requestx2cpartitionedArgs_1686($0, $1, $2, $3, $4, $5, $6, $7) {
+function Commands_case__casex20blockx20inx20requestx2cpartitionedArgs_1699($0, $1, $2, $3, $4, $5, $6, $7) {
  const $9 = Prelude_Interfaces_mapHom({a1: d => b => c => a => $d => $e => $f => ({a1: $d($f.a1), a2: $e($f.a2)}), a2: b => c => a => $18 => $19 => ({a1: $18($19.a1), a2: $19.a2}), a3: a => d => b => $20 => $21 => ({a1: $21.a1, a2: $20($21.a2)})}, $28 => Prelude_Types_List_mapAppend({h: 0}, $2c => Data_String_Extra_drop(1n, $2c), $28), {a1: $5, a2: $7.a1});
  return {a1: $9.a1, a2: {a1: $7.a2, a2: $9.a2}};
 }
 
 /* Commands.case block in request,partitionedArgs */
-function Commands_case__requestx2cpartitionedArgs_1663($0, $1, $2, $3, $4, $5) {
- return Commands_case__casex20blockx20inx20requestx2cpartitionedArgs_1686($0, $1, $2, $3, $4, $5.a1, $5.a2, Data_List_partition($12 => BashCompletion_isHashPrefix($12), $5.a2));
+function Commands_case__requestx2cpartitionedArgs_1676($0, $1, $2, $3, $4, $5) {
+ return Commands_case__casex20blockx20inx20requestx2cpartitionedArgs_1699($0, $1, $2, $3, $4, $5.a1, $5.a2, Data_List_partition($12 => BashCompletion_isHashPrefix($12), $5.a2));
 }
 
-/* Commands.9895:2513:recombineIgnoreArgs */
-function Commands_n__9895_2513_recombineIgnoreArgs($0, $1) {
+/* Commands.10121:2607:recombineIgnoreArgs */
+function Commands_n__10121_2607_recombineIgnoreArgs($0, $1) {
  switch($1.h) {
   case 0: /* nil */ return {a1: {h: 0}, a2: {h: 0}};
   case undefined: /* cons */ {
@@ -9673,20 +9809,20 @@ function Commands_n__9895_2513_recombineIgnoreArgs($0, $1) {
      switch($1.a2.h) {
       case 0: /* nil */ return {a1: {h: 0}, a2: {a1: '-i', a2: {h: 0}}};
       case undefined: /* cons */ {
-       const $b = Commands_n__9895_2511_parseIgnoreOpt($0, $1.a2.a1);
+       const $b = Commands_n__10121_2605_parseIgnoreOpt($0, $1.a2.a1);
        switch($b.h) {
         case undefined: /* just */ {
-         const $f = Commands_n__9895_2513_recombineIgnoreArgs($0, $1.a2.a2);
+         const $f = Commands_n__10121_2607_recombineIgnoreArgs($0, $1.a2.a2);
          return {a1: {a1: $b.a1, a2: $f.a1}, a2: $f.a2};
         }
         case 0: /* nothing */ {
-         const $17 = Commands_n__9895_2513_recombineIgnoreArgs($0, $1.a2.a2);
+         const $17 = Commands_n__10121_2607_recombineIgnoreArgs($0, $1.a2.a2);
          return {a1: $17.a1, a2: {a1: '-i', a2: {a1: $1.a2.a1, a2: $17.a2}}};
         }
        }
       }
       default: {
-       const $21 = Commands_n__9895_2513_recombineIgnoreArgs($0, $1.a2);
+       const $21 = Commands_n__10121_2607_recombineIgnoreArgs($0, $1.a2);
        return {a1: $21.a1, a2: {a1: $1.a1, a2: $21.a2}};
       }
      }
@@ -9695,26 +9831,26 @@ function Commands_n__9895_2513_recombineIgnoreArgs($0, $1) {
      switch($1.a2.h) {
       case 0: /* nil */ return {a1: {h: 0}, a2: {a1: '--ignore', a2: {h: 0}}};
       case undefined: /* cons */ {
-       const $2e = Commands_n__9895_2511_parseIgnoreOpt($0, $1.a2.a1);
+       const $2e = Commands_n__10121_2605_parseIgnoreOpt($0, $1.a2.a1);
        switch($2e.h) {
         case undefined: /* just */ {
-         const $32 = Commands_n__9895_2513_recombineIgnoreArgs($0, $1.a2.a2);
+         const $32 = Commands_n__10121_2607_recombineIgnoreArgs($0, $1.a2.a2);
          return {a1: {a1: $2e.a1, a2: $32.a1}, a2: $32.a2};
         }
         case 0: /* nothing */ {
-         const $3a = Commands_n__9895_2513_recombineIgnoreArgs($0, $1.a2.a2);
+         const $3a = Commands_n__10121_2607_recombineIgnoreArgs($0, $1.a2.a2);
          return {a1: $3a.a1, a2: {a1: '--ignore', a2: {a1: $1.a2.a1, a2: $3a.a2}}};
         }
        }
       }
       default: {
-       const $44 = Commands_n__9895_2513_recombineIgnoreArgs($0, $1.a2);
+       const $44 = Commands_n__10121_2607_recombineIgnoreArgs($0, $1.a2);
        return {a1: $44.a1, a2: {a1: $1.a1, a2: $44.a2}};
       }
      }
     }
     default: {
-     const $4c = Commands_n__9895_2513_recombineIgnoreArgs($0, $1.a2);
+     const $4c = Commands_n__10121_2607_recombineIgnoreArgs($0, $1.a2);
      return {a1: $4c.a1, a2: {a1: $1.a1, a2: $4c.a2}};
     }
    }
@@ -9722,33 +9858,33 @@ function Commands_n__9895_2513_recombineIgnoreArgs($0, $1) {
  }
 }
 
-/* Commands.9284:1922:putNameLn */
-function Commands_n__9284_1922_putNameLn($0, $1, $2, $3) {
+/* Commands.9492:1998:putNameLn */
+function Commands_n__9492_1998_putNameLn($0, $1, $2, $3) {
  return Text_PrettyPrint_Prettyprinter_Doc_hsep({a1: Text_PrettyPrint_Prettyprinter_Doc_fillBreak(15, Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_italic(), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String($3.a1))), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Text_PrettyPrint_Prettyprinter_Doc_unsafeTextWithoutNewLines('-'), a2: {h: 0}}), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String($3.a2), a2: {h: 0}}}});
 }
 
-/* Commands.8605:1299:putLabels */
-function Commands_n__8605_1299_putLabels($0, $1, $2, $3, $4) {
- return Text_PrettyPrint_Prettyprinter_Doc_hcat(Data_List_intersperse(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(', '), Prelude_Types_List_mapAppend({h: 0}, $f => Commands_n__8605_1298_putLabel($0, $1, $2, $3, $f), $4)));
+/* Commands.8744:1300:putLabels */
+function Commands_n__8744_1300_putLabels($0, $1, $2, $3, $4) {
+ return Text_PrettyPrint_Prettyprinter_Doc_hcat(Data_List_intersperse(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(', '), Prelude_Types_List_mapAppend({h: 0}, $f => Commands_n__8744_1299_putLabel($0, $1, $2, $3, $f), $4)));
 }
 
-/* Commands.8605:1298:putLabel */
-function Commands_n__8605_1298_putLabel($0, $1, $2, $3, $4) {
+/* Commands.8744:1299:putLabel */
+function Commands_n__8744_1299_putLabel($0, $1, $2, $3, $4) {
  return Text_PrettyPrint_Prettyprinter_Doc_enclose(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('\"'), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('\"'), Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_color(2), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String($4)));
 }
 
-/* Commands.8960:1651:partitionedArgs */
-function Commands_n__8960_1651_partitionedArgs($0, $1, $2, $3, $4) {
- return Commands_case__requestx2cpartitionedArgs_1663($0, $1, $2, $3, $4, Data_List_partition($e => Data_String_isPrefixOf('+', $e), $4));
+/* Commands.9111:1664:partitionedArgs */
+function Commands_n__9111_1664_partitionedArgs($0, $1, $2, $3, $4) {
+ return Commands_case__requestx2cpartitionedArgs_1676($0, $1, $2, $3, $4, Data_List_partition($e => Data_String_isPrefixOf('+', $e), $4));
 }
 
-/* Commands.9736:2375:parseTeamArg */
-function Commands_n__9736_2375_parseTeamArg($0, $1) {
+/* Commands.9962:2469:parseTeamArg */
+function Commands_n__9962_2469_parseTeamArg($0, $1) {
  return {a1: {a1: $1}};
 }
 
-/* Commands.9895:2512:parseSkipArg */
-function Commands_n__9895_2512_parseSkipArg($0, $1) {
+/* Commands.10121:2606:parseSkipArg */
+function Commands_n__10121_2606_parseSkipArg($0, $1) {
  const $2 = Prelude_Types_fastUnpack($1);
  switch($2.h) {
   case undefined: /* cons */ {
@@ -9761,15 +9897,15 @@ function Commands_n__9895_2512_parseSkipArg($0, $1) {
  }
 }
 
-/* Commands.9895:2511:parseIgnoreOpt */
-function Commands_n__9895_2511_parseIgnoreOpt($0, $1) {
- const $2 = Data_String_split(csegen_436(), $1);
+/* Commands.10121:2605:parseIgnoreOpt */
+function Commands_n__10121_2605_parseIgnoreOpt($0, $1) {
+ const $2 = Data_String_split(csegen_441(), $1);
  const $7 = Data_List1_last($2);
  return Prelude_Types_map_Functor_Maybe($c => $c, Data_String_parsePositive(csegen_2(), $7));
 }
 
-/* Commands.9736:2374:parseCompletedFlag */
-function Commands_n__9736_2374_parseCompletedFlag($0, $1) {
+/* Commands.9962:2468:parseCompletedFlag */
+function Commands_n__9962_2468_parseCompletedFlag($0, $1) {
  switch($1) {
   case '-c': return {a1: {h: 0}};
   case '--completed': return {a1: {h: 0}};
@@ -9777,8 +9913,8 @@ function Commands_n__9736_2374_parseCompletedFlag($0, $1) {
  }
 }
 
-/* Commands.9895:2510:parseCheckoutFlag */
-function Commands_n__9895_2510_parseCheckoutFlag($0, $1) {
+/* Commands.10121:2604:parseCheckoutFlag */
+function Commands_n__10121_2604_parseCheckoutFlag($0, $1) {
  switch($1) {
   case '-c': return {a1: {h: 0 /* Checkout */}};
   case '--checkout': return {a1: {h: 0 /* Checkout */}};
@@ -9786,17 +9922,17 @@ function Commands_n__9895_2510_parseCheckoutFlag($0, $1) {
  }
 }
 
-/* Commands.10225:2849:isNotIgnored */
-function Commands_n__10225_2849_isNotIgnored($0, $1, $2, $3, $4, $5) {
+/* Commands.10451:2943:isNotIgnored */
+function Commands_n__10451_2943_isNotIgnored($0, $1, $2, $3, $4, $5) {
  return Data_Maybe_isNothing(Data_List_find($a => Prelude_EqOrd_x3dx3d_Eq_Integer($a, $5.a1), $4.a12));
 }
 
-/* Commands.9284:1921:forkedUser */
-function Commands_n__9284_1921_forkedUser($0, $1, $2, $3) {
+/* Commands.9492:1997:forkedUser */
+function Commands_n__9492_1997_forkedUser($0, $1, $2, $3) {
  return FFI_Concurrency_fork(csegen_73()(), ('user --json '+$3));
 }
 
-/* Commands.whoami : Config => Git => Octokit => Promise () */
+/* Commands.whoami : Config => Git => Octokit => Promise' () */
 function Commands_whoami($0, $1, $2, $3, $4) {
  return User_Me_printInfoOnSelf($0, $2, $1, $3, $4);
 }
@@ -9818,9 +9954,9 @@ function Commands_teamNameArg($0) {
  }
 }
 
-/* Commands.sync : Config => Octokit => Promise () */
+/* Commands.sync : Config => Octokit => Promise' () */
 function Commands_sync($0, $1, $2, $3) {
- return Data_Promise_map_Functor_Promise($6 => (undefined), $8 => $9 => Config_syncConfig($0, $1, 1, $8, $9), $2, $3);
+ return Data_Promise_map_Functor_x28Promisex20x24ex29($6 => (undefined), $8 => $9 => Config_syncConfig($0, $1, 1, $8, $9), $2, $3);
 }
 
 /* Commands.skipArg : ContributeArg -> Maybe Nat */
@@ -9832,18 +9968,18 @@ function Commands_skipArg($0) {
 }
 
 /* Commands.request : Config => Git => Octokit => List String -> {default False _ : Bool} ->
-Promise () */
+Promise' () */
 function Commands_request($0, $1, $2, $3, $4) {
- return Commands_case__request_1766($0, $1, $2, $4, $3, Commands_n__8960_1651_partitionedArgs($0, $1, $2, $4, $3));
+ return Commands_case__request_1779($0, $1, $2, $4, $3, Commands_n__9111_1664_partitionedArgs($0, $1, $2, $4, $3));
 }
 
-/* Commands.reflect : Config => Octokit => Promise () */
+/* Commands.reflect : Config => Octokit => Promise' () */
 function Commands_reflect($0, $1, $2, $3) {
  return User_Reflect_reflectOnSelf($0, $1, $2, $3);
 }
 
 /* Commands.pr : Config => Git => Octokit => {default False _ : Bool} ->
-List String -> Promise () */
+List String -> Promise' () */
 function Commands_pr($0, $1, $2, $3, $4, $5) {
  return $6 => {
   switch(Prelude_Types_foldMap_Foldable_List({a1: $b => $c => Prelude_Interfaces_Bool_Semigroup_x3cx2bx3e_Semigroup_AllBool($b, $c), a2: 1}, $12 => BashCompletion_isHashPrefix($12), $4)) {
@@ -9851,8 +9987,8 @@ function Commands_pr($0, $1, $2, $3, $4, $5) {
     const $30 = $31 => $32 => $33 => {
      const $36 = $37 => $38 => {
       switch($31.a1) {
-       case 0: return $3a => Data_Promise_liftIO_HasIO_Promise($3d => Prelude_IO_prim__putStr((Data_PullRequest_rf__webURI($0, $31.a2)+'\n'), $3d), $37, $38, $3a);
-       case 1: return Data_Promise_pure_Applicative_Promise(undefined, $37, $38);
+       case 0: return $3a => Data_Promise_liftIO_HasIO_x28Promisex20x24ex29($3d => Prelude_IO_prim__putStr((Data_PullRequest_rf__webURI($0, $31.a2)+'\n'), $3d), $37, $38, $3a);
+       case 1: return Data_Promise_pure_Applicative_x28Promisex20x24ex29(undefined, $37, $38);
       }
      };
      const $4d = $4e => {
@@ -9869,9 +10005,9 @@ function Commands_pr($0, $1, $2, $3, $4, $5) {
       }
       return Prelude_Interfaces_when(csegen_65()(), $53, () => $58 => $59 => Commands_label($0, $1, $2, $4, $58, $59));
      };
-     return Data_Promise_x3ex3ex3d_Monad_Promise($36, $4d, $32, $33);
+     return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($36, $4d, $32, $33);
     };
-    return Data_Promise_x3ex3ex3d_Monad_Promise($18 => $19 => Data_Promise_x3ex3ex3d_Monad_Promise($1c => $1d => FFI_Git_currentBranch($1, $1c, $1d), $23 => $24 => $25 => PullRequest_identifyOrCreatePR($0, $1, $2, $3, $23, $24, $25), $18, $19), $30, $5, $6);
+    return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($18 => $19 => Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($1c => $1d => FFI_Git_currentBranch($1, $1c, $1d), $23 => $24 => $25 => PullRequest_identifyOrCreatePR($0, $1, $2, $3, $23, $24, $25), $18, $19), $30, $5, $6);
    }
    case 0: return Data_Promise_reject('The pr command only accepts labels prefixed with \'#\' and the --draft flag.', $5, $6);
   }
@@ -9888,7 +10024,7 @@ function Commands_parseGraphArgs($0) {
      switch($0.a2.a2.h) {
       case undefined: /* cons */ return {h: 0 /* Left */, a1: 'graph accepts at most one team name and the --completed flag.'};
       default: {
-       const $6 = Prelude_Types_traverse_Traversable_List(csegen_9(), $b => Commands_x3cx7cx7cx3e(csegen_500(), $10 => Commands_n__9736_2374_parseCompletedFlag($0, $10), $15 => Commands_n__9736_2375_parseTeamArg($0, $15), $b), $0);
+       const $6 = Prelude_Types_traverse_Traversable_List(csegen_9(), $b => Commands_x3cx7cx7cx3e(csegen_505(), $10 => Commands_n__9962_2468_parseCompletedFlag($0, $10), $15 => Commands_n__9962_2469_parseTeamArg($0, $15), $b), $0);
        switch($6.h) {
         case undefined: /* just */ return {h: 1 /* Right */, a1: $6.a1};
         case 0: /* nothing */ return {h: 0 /* Left */, a1: 'The graph command expects the name of a GitHub Team and optionally --completed as arguments.'};
@@ -9897,7 +10033,7 @@ function Commands_parseGraphArgs($0) {
      }
     }
     default: {
-     const $1d = Prelude_Types_traverse_Traversable_List(csegen_9(), $22 => Commands_x3cx7cx7cx3e(csegen_500(), $27 => Commands_n__9736_2374_parseCompletedFlag($0, $27), $2c => Commands_n__9736_2375_parseTeamArg($0, $2c), $22), $0);
+     const $1d = Prelude_Types_traverse_Traversable_List(csegen_9(), $22 => Commands_x3cx7cx7cx3e(csegen_505(), $27 => Commands_n__9962_2468_parseCompletedFlag($0, $27), $2c => Commands_n__9962_2469_parseTeamArg($0, $2c), $22), $0);
      switch($1d.h) {
       case undefined: /* just */ return {h: 1 /* Right */, a1: $1d.a1};
       case 0: /* nothing */ return {h: 0 /* Left */, a1: 'The graph command expects the name of a GitHub Team and optionally --completed as arguments.'};
@@ -9906,7 +10042,7 @@ function Commands_parseGraphArgs($0) {
    }
   }
   default: {
-   const $34 = Prelude_Types_traverse_Traversable_List(csegen_9(), $39 => Commands_x3cx7cx7cx3e(csegen_500(), $3e => Commands_n__9736_2374_parseCompletedFlag($0, $3e), $43 => Commands_n__9736_2375_parseTeamArg($0, $43), $39), $0);
+   const $34 = Prelude_Types_traverse_Traversable_List(csegen_9(), $39 => Commands_x3cx7cx7cx3e(csegen_505(), $3e => Commands_n__9962_2468_parseCompletedFlag($0, $3e), $43 => Commands_n__9962_2469_parseTeamArg($0, $43), $39), $0);
    switch($34.h) {
     case undefined: /* just */ return {h: 1 /* Right */, a1: $34.a1};
     case 0: /* nothing */ return {h: 0 /* Left */, a1: 'The graph command expects the name of a GitHub Team and optionally --completed as arguments.'};
@@ -9920,34 +10056,39 @@ function Commands_parseContributeArgs($0) {
  switch($0.h) {
   case 0: /* nil */ return {h: 1 /* Right */, a1: {h: 0}};
   default: {
-   const $3 = Commands_n__9895_2513_recombineIgnoreArgs($0, $0);
+   const $3 = Commands_n__10121_2607_recombineIgnoreArgs($0, $0);
    const $7 = Prelude_Types_List_mapAppend({h: 0}, $b => ({h: 1 /* Ignore */, a1: $b}), $3.a1);
-   const $e = Prelude_Types_traverse_Traversable_List(csegen_9(), $13 => Commands_x3cx7cx7cx3e(csegen_500(), $18 => Commands_n__9895_2512_parseSkipArg($0, $18), $1d => Commands_n__9895_2510_parseCheckoutFlag($0, $1d), $13), $3.a2);
+   const $e = Prelude_Types_traverse_Traversable_List(csegen_9(), $13 => Commands_x3cx7cx7cx3e(csegen_505(), $18 => Commands_n__10121_2606_parseSkipArg($0, $18), $1d => Commands_n__10121_2604_parseCheckoutFlag($0, $1d), $13), $3.a2);
    return Data_Either_maybeToEither(() => Commands_contributeUsageError(), Prelude_Types_map_Functor_Maybe($29 => Prelude_Types_List_tailRecAppend($7, $29), $e));
   }
  }
 }
 
-/* Commands.list : Config => Octokit => String -> Promise () */
+/* Commands.listOrgTeams : Config => Octokit => Promise' () */
+function Commands_listOrgTeams($0, $1, $2, $3) {
+ return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($6 => $7 => Data_Promise_map_Functor_x28Promisex20x24ex29(csegen_506(), $c => $d => FFI_GitHub_forceListTeams($1, $0.a2, $c, $d), $6, $7), teamNames => Util_renderIO($0, csegen_73()(), Text_PrettyPrint_Prettyprinter_Doc_vsep(Prelude_Types_List_mapAppend({h: 0}, $22 => Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_italic(), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String($22)), teamNames))), $2, $3);
+}
+
+/* Commands.list : Config => Octokit => String -> Promise' () */
 function Commands_list($0, $1, $2, $3, $4) {
- return Data_Promise_x3ex3ex3d_Monad_Promise($7 => $8 => Data_Promise_map_Functor_Promise(csegen_501(), $d => $e => FFI_GitHub_listTeamMembers($1, $0.a2, $2, $d, $e), $7, $8), teamMemberLogins => $19 => $1a => Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Basics_flip(csegen_407(), csegen_502(), Prelude_Types_traverse_Traversable_List(csegen_65()(), $28 => Commands_n__9284_1921_forkedUser($1, $2, $0, $28), teamMemberLogins)), teamMembersJson => $30 => $31 => Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Types_traverse_Traversable_List(csegen_65()(), $39 => $3a => Data_Promise_either(csegen_52(), Data_User_parseUser($39), $3a), teamMembersJson), teamMembers => Util_renderIO($0, csegen_73()(), Text_PrettyPrint_Prettyprinter_Doc_vsep(Prelude_Types_List_mapAppend({h: 0}, $4f => Commands_n__9284_1922_putNameLn($1, $2, $0, $4f), teamMembers))), $30, $31), $19, $1a), $3, $4);
+ return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($7 => $8 => Data_Promise_map_Functor_x28Promisex20x24ex29(csegen_506(), $d => $e => FFI_GitHub_forceListTeamMembers($1, $0.a2, $2, $d, $e), $7, $8), teamMemberLogins => $19 => $1a => Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(Prelude_Basics_flip(csegen_411(), csegen_508(), Prelude_Types_traverse_Traversable_List(csegen_65()(), $28 => Commands_n__9492_1997_forkedUser($1, $2, $0, $28), teamMemberLogins)), teamMembersJson => $30 => $31 => Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(Prelude_Types_traverse_Traversable_List(csegen_65()(), $39 => $3a => Data_Promise_either(Data_User_parseUser($39), $3a), teamMembersJson), teamMembers => Util_renderIO($0, csegen_73()(), Text_PrettyPrint_Prettyprinter_Doc_vsep(Prelude_Types_List_mapAppend({h: 0}, $4d => Commands_n__9492_1998_putNameLn($1, $2, $0, $4d), teamMembers))), $30, $31), $19, $1a), $3, $4);
 }
 
-/* Commands.label : Config => Git => Octokit => List String -> Promise () */
+/* Commands.label : Config => Git => Octokit => List String -> Promise' () */
 function Commands_label($0, $1, $2, $3, $4, $5) {
  const $20 = $21 => {
   const $23 = Prelude_Types_List_mapAppend({h: 0}, $27 => Commands_unslugifyLabel($0.a10, $27), $3);
-  return $2d => $2e => Data_Promise_x3ex3ex3d_Monad_Promise($31 => $32 => Label_addLabels($0, $2, $21.a2, $23, $31, $32), allLabels => Util_renderIO($0, csegen_73()(), Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('Added'), Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29(Commands_n__8605_1299_putLabels($1, $2, $3, $0, $23), Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Text_PrettyPrint_Prettyprinter_Doc_unsafeTextWithoutNewLines(' to PR.'), a2: {h: 0}}))), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(Prelude_Types_foldMap_Foldable_List(csegen_50()(), $63 => $63, {a1: 'All labels for PR of ', a2: {a1: $21.a2.a7, a2: {a1: ':', a2: {h: 0}}}})), Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29(Commands_n__8605_1299_putLabels($1, $2, $3, $0, allLabels), Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Text_PrettyPrint_Prettyprinter_Doc_unsafeTextWithoutNewLines('.'), a2: {h: 0}}))), a2: {h: 0}}})), $2d, $2e);
+  return $2d => $2e => Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($31 => $32 => Label_addLabels($0, $2, $21.a2, $23, $31, $32), allLabels => Util_renderIO($0, csegen_73()(), Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('Added'), Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29(Commands_n__8744_1300_putLabels($1, $2, $3, $0, $23), Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Text_PrettyPrint_Prettyprinter_Doc_unsafeTextWithoutNewLines(' to PR.'), a2: {h: 0}}))), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(Prelude_Types_foldMap_Foldable_List(csegen_50()(), $63 => $63, {a1: 'All labels for PR of ', a2: {a1: $21.a2.a7, a2: {a1: ':', a2: {h: 0}}}})), Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29(Commands_n__8744_1300_putLabels($1, $2, $3, $0, allLabels), Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Text_PrettyPrint_Prettyprinter_Doc_unsafeTextWithoutNewLines('.'), a2: {h: 0}}))), a2: {h: 0}}})), $2d, $2e);
  };
- return Data_Promise_x3ex3ex3d_Monad_Promise($8 => $9 => Data_Promise_x3ex3ex3d_Monad_Promise($c => $d => FFI_Git_currentBranch($1, $c, $d), $13 => $14 => $15 => PullRequest_identifyOrCreatePR($0, $1, $2, 0, $13, $14, $15), $8, $9), $20, $4, $5);
+ return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($8 => $9 => Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($c => $d => FFI_Git_currentBranch($1, $c, $d), $13 => $14 => $15 => PullRequest_identifyOrCreatePR($0, $1, $2, 0, $13, $14, $15), $8, $9), $20, $4, $5);
 }
 
-/* Commands.health : Config => Octokit => Promise () */
+/* Commands.health : Config => Octokit => Promise' () */
 function Commands_health($0, $1, $2, $3) {
- return Data_Promise_x3ex3ex3d_Monad_Promise(PullRequest_listOpenPRs($0, $1, 4n, 100n), prs => Util_renderIO($0, csegen_73()(), Graph_healthGraph($0, prs, $0.a2, $0.a3)), $2, $3);
+ return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(PullRequest_listOpenPRs($0, $1, 4n, 100n), prs => Util_renderIO($0, csegen_73()(), Graph_healthGraph($0, prs, $0.a2, $0.a3)), $2, $3);
 }
 
-/* Commands.graph : Config => Octokit => List GraphArg -> Promise () */
+/* Commands.graph : Config => Octokit => List GraphArg -> Promise' () */
 function Commands_graph($0, $1, $2) {
  const $5 = $6 => {
   switch($6.h) {
@@ -9956,7 +10097,7 @@ function Commands_graph($0, $1, $2) {
   }
  };
  const $3 = Data_List_find($5, $2);
- return $9 => Commands_case__graph_2126($1, $2, $0, $3, Data_List_headx27(Prelude_Types_List_mapMaybeAppend({h: 0}, $15 => Commands_teamNameArg($15), $2)), $9);
+ return $9 => Commands_case__graph_2210($1, $2, $0, $3, Data_List_headx27(Prelude_Types_List_mapMaybeAppend({h: 0}, $15 => Commands_teamNameArg($15), $2)), $9);
 }
 
 /* Commands.contributeUsageError : String */
@@ -9964,7 +10105,7 @@ const Commands_contributeUsageError = __lazy(function () {
  return 'contribute\'s arguments must be -<num> to skip num PRs, --ignore (-i) <uri>/<pr-number>, or --checkout (-c) to checkout the branch needing review.';
 });
 
-/* Commands.contribute : Config => Git => Octokit => List ContributeArg -> Promise () */
+/* Commands.contribute : Config => Git => Octokit => List ContributeArg -> Promise' () */
 function Commands_contribute($0, $1, $2, $3, $4, $5) {
  const $12 = openPrs => {
   const $16 = $17 => {
@@ -9980,7 +10121,7 @@ function Commands_contribute($0, $1, $2, $3, $4, $5) {
     return $2d => $2e => {
      const $30 = $31 => $32 => {
       switch(Prelude_Types_null_Foldable_List($2a)) {
-       case 1: return Data_Promise_pure_Applicative_Promise($0, $31, $32);
+       case 1: return Data_Promise_pure_Applicative_x28Promisex20x24ex29($0, $31, $32);
        case 0: return Config_addIgnoredPRs($0, $2a, $31, $32);
       }
      };
@@ -10000,28 +10141,28 @@ function Commands_contribute($0, $1, $2, $3, $4, $5) {
        }
       };
       const $53 = Prelude_Types_List_filterAppend({h: 0}, $56, $13);
-      const $5d = Prelude_Types_List_filterAppend({h: 0}, $61 => Commands_n__10225_2849_isNotIgnored($1, $2, $3, $0, configx27, $61), $53);
+      const $5d = Prelude_Types_List_filterAppend({h: 0}, $61 => Commands_n__10451_2943_isNotIgnored($1, $2, $3, $0, configx27, $61), $53);
       const $6a = Data_List_partition($6d => Data_PullRequest_isRequestedReviewer(myLogin, $6d), $5d);
-      return Commands_case__contribute_3019($1, $2, $3, $0, openPrs, $13, myLogin, $2a, configx27, $40, $4d, $53, $5d, $6a, Prelude_Interfaces_mapHom({a1: d => b => c => a => $85 => $86 => $87 => ({a1: $85($87.a1), a2: $86($87.a2)}), a2: b => c => a => $90 => $91 => ({a1: $90($91.a1), a2: $91.a2}), a3: a => d => b => $98 => $99 => ({a1: $99.a1, a2: $98($99.a2)})}, $a0 => Data_List_sortBy(csegen_514(), $a0), $6a));
+      return Commands_case__contribute_3117($1, $2, $3, $0, openPrs, $13, myLogin, $2a, configx27, $40, $4d, $53, $5d, $6a, Prelude_Interfaces_mapHom({a1: d => b => c => a => $85 => $86 => $87 => ({a1: $85($87.a1), a2: $86($87.a2)}), a2: b => c => a => $90 => $91 => ({a1: $90($91.a1), a2: $91.a2}), a3: a => d => b => $98 => $99 => ({a1: $99.a1, a2: $98($99.a2)})}, $a0 => Data_List_sortBy(csegen_520(), $a0), $6a));
      };
-     return Data_Promise_x3ex3ex3d_Monad_Promise($30, $3f, $2d, $2e);
+     return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($30, $3f, $2d, $2e);
     };
    };
-   return Data_Promise_x3ex3ex3d_Monad_Promise($1f => $20 => Data_Promise_map_Functor_Promise(csegen_510(), FFI_GitHub_getSelf($2), $1f, $20), $29, $1b, $1c);
+   return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($1f => $20 => Data_Promise_map_Functor_x28Promisex20x24ex29(csegen_516(), FFI_GitHub_getSelf($2), $1f, $20), $29, $1b, $1c);
   };
  };
- return Data_Promise_x3ex3ex3d_Monad_Promise(FFI_GitHub_listPullRequests($2, $0.a2, $0.a3, {a1: 0}, 100n, 0n), $12, $4, $5);
+ return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(FFI_GitHub_listPullRequests($2, $0.a2, $0.a3, {a1: 0}, 100n, 0n), $12, $4, $5);
 }
 
-/* Commands.branch : Config => Git => Promise () */
+/* Commands.branch : Config => Git => Promise' () */
 function Commands_branch($0, $1, $2, $3) {
  const $c = branch => {
   const $d = $0.a2;
   const $f = $0.a3;
   const $11 = Prelude_Types_foldMap_Foldable_List(csegen_50()(), $17 => $17, {a1: 'https://github.com/', a2: {a1: $d, a2: {a1: '/', a2: {a1: $f, a2: {a1: '/tree/', a2: {a1: branch, a2: {h: 0}}}}}}});
-  return $25 => $26 => $27 => Data_Promise_liftIO_HasIO_Promise($2a => Prelude_IO_prim__putStr(($11+'\n'), $2a), $25, $26, $27);
+  return $25 => $26 => $27 => Data_Promise_liftIO_HasIO_x28Promisex20x24ex29($2a => Prelude_IO_prim__putStr(($11+'\n'), $2a), $25, $26, $27);
  };
- return Data_Promise_x3ex3ex3d_Monad_Promise($6 => $7 => FFI_Git_currentBranch($1, $6, $7), $c, $2, $3);
+ return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($6 => $7 => FFI_Git_currentBranch($1, $6, $7), $c, $2, $3);
 }
 
 /* Commands.(<||>) : Alternative t => (a -> t b) -> (a -> t b) -> a -> t b */
@@ -10030,68 +10171,68 @@ function Commands_x3cx7cx7cx3e($0, $1, $2, $3) {
 }
 
 /* User.Reflect.case block in case block in reflectOnSelf */
-function User_Reflect_case__casex20blockx20inx20reflectOnSelf_1921($0, $1, $2, $3, $4, $5, $6, $7, $8, $9) {
- const $b = Prelude_Interfaces_mapHom({a1: d => b => c => a => $f => $10 => $11 => ({a1: $f($11.a1), a2: $10($11.a2)}), a2: b => c => a => $1a => $1b => ({a1: $1a($1b.a1), a2: $1b.a2}), a3: a => d => b => $22 => $23 => ({a1: $23.a1, a2: $22($23.a2)})}, $2a => Data_List_headx27(Data_List_sort({a1: {a1: $31 => $32 => Data_Date_x3dx3d_Eq_Date($31, $32), a2: $37 => $38 => Data_Date_x2fx3d_Eq_Date($37, $38)}, a2: $3d => $3e => Data_Date_compare_Ord_Date($3d, $3e), a3: $43 => $44 => Data_Date_x3c_Ord_Date($43, $44), a4: $49 => $4a => Data_Date_x3e_Ord_Date($49, $4a), a5: $4f => $50 => Data_Date_x3cx3d_Ord_Date($4f, $50), a6: $55 => $56 => Data_Date_x3ex3d_Ord_Date($55, $56), a7: $5b => $5c => Data_Date_max_Ord_Date($5b, $5c), a8: $61 => $62 => Data_Date_min_Ord_Date($61, $62)}, Prelude_Types_List_mapAppend({h: 0}, csegen_527(), $2a))), {a1: $7, a2: $9.a1});
+function User_Reflect_case__casex20blockx20inx20reflectOnSelf_1925($0, $1, $2, $3, $4, $5, $6, $7, $8, $9) {
+ const $b = Prelude_Interfaces_mapHom({a1: d => b => c => a => $f => $10 => $11 => ({a1: $f($11.a1), a2: $10($11.a2)}), a2: b => c => a => $1a => $1b => ({a1: $1a($1b.a1), a2: $1b.a2}), a3: a => d => b => $22 => $23 => ({a1: $23.a1, a2: $22($23.a2)})}, $2a => Data_List_headx27(Data_List_sort({a1: {a1: $31 => $32 => Data_Date_x3dx3d_Eq_Date($31, $32), a2: $37 => $38 => Data_Date_x2fx3d_Eq_Date($37, $38)}, a2: $3d => $3e => Data_Date_compare_Ord_Date($3d, $3e), a3: $43 => $44 => Data_Date_x3c_Ord_Date($43, $44), a4: $49 => $4a => Data_Date_x3e_Ord_Date($49, $4a), a5: $4f => $50 => Data_Date_x3cx3d_Ord_Date($4f, $50), a6: $55 => $56 => Data_Date_x3ex3d_Ord_Date($55, $56), a7: $5b => $5c => Data_Date_max_Ord_Date($5b, $5c), a8: $61 => $62 => Data_Date_min_Ord_Date($61, $62)}, Prelude_Types_List_mapAppend({h: 0}, csegen_533(), $2a))), {a1: $7, a2: $9.a1});
  return Util_renderIO($0, csegen_73()(), User_Reflect_print(Prelude_Types_String_length(User_Reflect_intro()), Prelude_Types_List_lengthTR($4), Prelude_Types_List_lengthTR($9.a1), Prelude_Types_List_lengthTR($9.a2), Prelude_Types_List_lengthTR($8), Prelude_Types_List_lengthTR($7), $5, $b.a1, $b.a2, $0));
 }
 
-/* User.Me.7401:2049:ul */
-function User_Me_n__7401_2049_ul($0, $1, $2, $3, $4) {
+/* User.Me.7540:2054:ul */
+function User_Me_n__7540_2054_ul($0, $1, $2, $3, $4) {
  return Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_underline(), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String($4));
 }
 
-/* User.Me.7401:2048:teams */
-function User_Me_n__7401_2048_teams($0, $1, $2, $3) {
- return Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: User_Me_n__7401_2049_ul($0, $1, $2, $3, 'GitHub Teams:'), a2: Prelude_Types_List_mapAppend({h: 0}, $11 => User_Me_n__7401_2046_it($0, $1, $2, $3, $11), $0)});
+/* User.Me.7540:2053:teams */
+function User_Me_n__7540_2053_teams($0, $1, $2, $3) {
+ return Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: User_Me_n__7540_2054_ul($0, $1, $2, $3, 'GitHub Teams:'), a2: Prelude_Types_List_mapAppend({h: 0}, $11 => User_Me_n__7540_2051_it($0, $1, $2, $3, $11), $0)});
 }
 
-/* User.Me.7401:2047:login */
-function User_Me_n__7401_2047_login($0, $1, $2, $3) {
- return Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('GitHub Login:'), User_Me_n__7401_2043_dataVal($0, $1, $2, $3, $1.a1));
+/* User.Me.7540:2052:login */
+function User_Me_n__7540_2052_login($0, $1, $2, $3) {
+ return Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('GitHub Login:'), User_Me_n__7540_2048_dataVal($0, $1, $2, $3, $1.a1));
 }
 
-/* User.Reflect.6461:1080:ital */
-function User_Reflect_n__6461_1080_ital($0, $1) {
+/* User.Reflect.6595:1080:ital */
+function User_Reflect_n__6595_1080_ital($0, $1) {
  return Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_italic(), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String($1));
 }
 
-/* User.Me.7401:2046:it */
-function User_Me_n__7401_2046_it($0, $1, $2, $3, $4) {
+/* User.Me.7540:2051:it */
+function User_Me_n__7540_2051_it($0, $1, $2, $3, $4) {
  return Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_italic(), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String($4));
 }
 
-/* User.Me.7551:2202:handleUnsetEmail */
-function User_Me_n__7551_2202_handleUnsetEmail($0, $1, $2, $3) {
+/* User.Me.7690:2207:handleUnsetEmail */
+function User_Me_n__7690_2207_handleUnsetEmail($0, $1, $2, $3) {
  switch($3) {
   case '': return {h: 0};
   default: return {a1: $3};
  }
 }
 
-/* User.Me.7401:2045:fullName */
-function User_Me_n__7401_2045_fullName($0, $1, $2, $3) {
- return Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('GitHub Name:'), User_Me_n__7401_2043_dataVal($0, $1, $2, $3, $1.a2));
+/* User.Me.7540:2050:fullName */
+function User_Me_n__7540_2050_fullName($0, $1, $2, $3) {
+ return Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('GitHub Name:'), User_Me_n__7540_2048_dataVal($0, $1, $2, $3, $1.a2));
 }
 
-/* User.Me.7401:2044:email */
-function User_Me_n__7401_2044_email($0, $1, $2, $3) {
+/* User.Me.7540:2049:email */
+function User_Me_n__7540_2049_email($0, $1, $2, $3) {
  let $8;
  switch($2.h) {
   case undefined: /* just */ {
-   $8 = User_Me_n__7401_2043_dataVal($0, $1, $2, $3, $2.a1);
+   $8 = User_Me_n__7540_2048_dataVal($0, $1, $2, $3, $2.a1);
    break;
   }
   case 0: /* nothing */ {
-   $8 = User_Me_n__7401_2046_it($0, $1, $2, $3, 'Not set');
+   $8 = User_Me_n__7540_2051_it($0, $1, $2, $3, 'Not set');
    break;
   }
  }
  return Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('Git Email:'), $8);
 }
 
-/* User.Me.7401:2043:dataVal */
-function User_Me_n__7401_2043_dataVal($0, $1, $2, $3, $4) {
- return Theme_theme($3, csegen_529(), Theme_cs({a1: 4, a2: {h: 0}}), 8)(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String($4));
+/* User.Me.7540:2048:dataVal */
+function User_Me_n__7540_2048_dataVal($0, $1, $2, $3, $4) {
+ return Theme_theme($3, csegen_535(), Theme_cs({a1: 4, a2: {h: 0}}), 8)(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String($4));
 }
 
 /* User.Reflect.rightTitle : String */
@@ -10109,26 +10250,26 @@ function User_replicatex27($0, $1, $2, $3, $4, $5) {
  return Theme_theme($0, $1, $2, $3)(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(Data_String_replicate($4, $5)));
 }
 
-/* User.Reflect.reflectOnSelf : Config => Octokit => Promise () */
+/* User.Reflect.reflectOnSelf : Config => Octokit => Promise' () */
 function User_Reflect_reflectOnSelf($0, $1, $2, $3) {
  const $c = prs => $d => $e => {
   const $1b = myLogin => $1c => $1d => {
    const $39 = reviews => {
-    const $3a = Prelude_Types_map_Functor_Maybe(csegen_532(), Data_List_headx27(Data_List_sortBy($43 => $44 => Prelude_Basics_on(csegen_512(), csegen_532(), $43, $44), reviews)));
+    const $3a = Prelude_Types_map_Functor_Maybe(csegen_538(), Data_List_headx27(Data_List_sortBy($43 => $44 => Prelude_Basics_on(csegen_518(), csegen_538(), $43, $44), reviews)));
     const $4d = PullRequest_tuple(prs);
     const $50 = Prelude_Interfaces_mapHom({a1: d => b => c => a => $54 => $55 => $56 => ({a1: $54($56.a1), a2: $55($56.a2)}), a2: b => c => a => $5f => $60 => ({a1: $5f($60.a1), a2: $60.a2}), a3: a => d => b => $67 => $68 => ({a1: $68.a1, a2: $67($68.a2)})}, $6f => Prelude_Types_List_filterAppend({h: 0}, $73 => Prelude_EqOrd_x3dx3d_Eq_String($73.a4, myLogin), $6f), $4d);
-    return User_Reflect_case__casex20blockx20inx20reflectOnSelf_1921($0, $1, prs, myLogin, reviews, $3a, $4d, $50.a1, $50.a2, Prelude_Interfaces_mapHom({a1: d => b => c => a => $88 => $89 => $8a => ({a1: $88($8a.a1), a2: $89($8a.a2)}), a2: b => c => a => $93 => $94 => ({a1: $93($94.a1), a2: $94.a2}), a3: a => d => b => $9b => $9c => ({a1: $9c.a1, a2: $9b($9c.a2)})}, $a3 => Prelude_Types_List_filterAppend({h: 0}, $a7 => Prelude_Types_foldMap_Foldable_List(csegen_96(), $ac => Prelude_EqOrd_x3dx3d_Eq_String($ac, myLogin), $a7.a6), $a3), $4d));
+    return User_Reflect_case__casex20blockx20inx20reflectOnSelf_1925($0, $1, prs, myLogin, reviews, $3a, $4d, $50.a1, $50.a2, Prelude_Interfaces_mapHom({a1: d => b => c => a => $88 => $89 => $8a => ({a1: $88($8a.a1), a2: $89($8a.a2)}), a2: b => c => a => $93 => $94 => ({a1: $93($94.a1), a2: $94.a2}), a3: a => d => b => $9b => $9c => ({a1: $9c.a1, a2: $9b($9c.a2)})}, $a3 => Prelude_Types_List_filterAppend({h: 0}, $a7 => Prelude_Types_foldMap_Foldable_List(csegen_96(), $ac => Prelude_EqOrd_x3dx3d_Eq_String($ac, myLogin), $a7.a6), $a3), $4d));
    };
-   return Data_Promise_x3ex3ex3d_Monad_Promise(PullRequest_reviewsByUser($0, $1, myLogin, Data_List_take(User_Reflect_reviewDetailsCount(), Prelude_Types_List_reverse(Data_List_sortBy($2d => $2e => Prelude_Basics_on(csegen_512(), csegen_527(), $2d, $2e), PullRequest_combined(prs))))), $39, $1c, $1d);
+   return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(PullRequest_reviewsByUser($0, $1, myLogin, Data_List_take(User_Reflect_reviewDetailsCount(), Prelude_Types_List_reverse(Data_List_sortBy($2d => $2e => Prelude_Basics_on(csegen_518(), csegen_533(), $2d, $2e), PullRequest_combined(prs))))), $39, $1c, $1d);
   };
-  return Data_Promise_x3ex3ex3d_Monad_Promise($11 => $12 => Data_Promise_map_Functor_Promise(csegen_510(), FFI_GitHub_getSelf($1), $11, $12), $1b, $d, $e);
+  return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($11 => $12 => Data_Promise_map_Functor_x28Promisex20x24ex29(csegen_516(), FFI_GitHub_getSelf($1), $11, $12), $1b, $d, $e);
  };
- return Data_Promise_x3ex3ex3d_Monad_Promise(PullRequest_listPartitionedPRs($0, $1, 4n, User_Reflect_prCount()), $c, $2, $3);
+ return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(PullRequest_listPartitionedPRs($0, $1, 4n, User_Reflect_prCount()), $c, $2, $3);
 }
 
-/* User.Me.printInfoOnSelf : Config => Octokit => Git => Promise () */
+/* User.Me.printInfoOnSelf : Config => Octokit => Git => Promise' () */
 function User_Me_printInfoOnSelf($0, $1, $2, $3, $4) {
- return Data_Promise_x3ex3ex3d_Monad_Promise($7 => $8 => Data_Promise_map_Functor_Promise($b => User_Me_n__7551_2202_handleUnsetEmail($1, $2, $0, $b), $12 => $13 => FFI_Git_userEmail($2, $12, $13), $7, $8), gitEmail => $1b => $1c => Data_Promise_x3ex3ex3d_Monad_Promise(FFI_GitHub_getSelf($1), githubUser => $22 => $23 => Data_Promise_x3ex3ex3d_Monad_Promise($26 => $27 => Data_Promise_map_Functor_Promise(csegen_501(), $2c => $2d => FFI_GitHub_listMyTeams($1, $2c, $2d), $26, $27), githubTeams => Util_renderIO($0, csegen_73()(), User_Me_print($0, gitEmail, githubUser, githubTeams)), $22, $23), $1b, $1c), $3, $4);
+ return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($7 => $8 => Data_Promise_map_Functor_x28Promisex20x24ex29($b => User_Me_n__7690_2207_handleUnsetEmail($1, $2, $0, $b), $12 => $13 => FFI_Git_userEmail($2, $12, $13), $7, $8), gitEmail => $1b => $1c => Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(FFI_GitHub_getSelf($1), githubUser => $22 => $23 => Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($26 => $27 => Data_Promise_map_Functor_x28Promisex20x24ex29(csegen_506(), $2c => $2d => FFI_GitHub_listMyTeams($1, $2c, $2d), $26, $27), githubTeams => Util_renderIO($0, csegen_73()(), User_Me_print($0, gitEmail, githubUser, githubTeams)), $22, $23), $1b, $1c), $3, $4);
 }
 
 /* User.Reflect.print : Nat -> Nat -> Nat -> Nat -> Nat -> Nat -> Maybe Date -> Maybe Date -> Maybe Date -> Config =>
@@ -10139,7 +10280,7 @@ function User_Reflect_print($0, $1, $2, $3, $4, $5, $6, $7, $8, $9) {
 
 /* User.Me.print : Config -> Maybe String -> User -> List String -> Doc AnsiStyle */
 function User_Me_print($0, $1, $2, $3) {
- return Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {a1: User_Me_n__7401_2044_email($3, $2, $1, $0), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {a1: User_Me_n__7401_2045_fullName($3, $2, $1, $0), a2: {a1: User_Me_n__7401_2047_login($3, $2, $1, $0), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {a1: User_Me_n__7401_2048_teams($3, $2, $1, $0), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {h: 0}}}}}}}}});
+ return Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {a1: User_Me_n__7540_2049_email($3, $2, $1, $0), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {a1: User_Me_n__7540_2050_fullName($3, $2, $1, $0), a2: {a1: User_Me_n__7540_2052_login($3, $2, $1, $0), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {a1: User_Me_n__7540_2053_teams($3, $2, $1, $0), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {h: 0}}}}}}}}});
 }
 
 /* User.Reflect.prCount : Fin 101 */
@@ -10159,7 +10300,7 @@ const User_Reflect_intro = __lazy(function () {
 
 /* User.Reflect.header : Nat -> Doc AnsiStyle */
 function User_Reflect_header($0) {
- return Text_PrettyPrint_Prettyprinter_Doc_indent(Number(_truncBigInt32($0)), Text_PrettyPrint_Prettyprinter_Doc_hsep({a1: User_Reflect_n__6461_1080_ital($0, User_Reflect_leftTitle()), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(' '), a2: {a1: User_Reflect_n__6461_1080_ital($0, User_Reflect_rightTitle()), a2: {h: 0}}}}));
+ return Text_PrettyPrint_Prettyprinter_Doc_indent(Number(_truncBigInt32($0)), Text_PrettyPrint_Prettyprinter_Doc_hsep({a1: User_Reflect_n__6595_1080_ital($0, User_Reflect_leftTitle()), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(' '), a2: {a1: User_Reflect_n__6595_1080_ital($0, User_Reflect_rightTitle()), a2: {h: 0}}}}));
 }
 
 /* User.Reflect.graph : Nat -> Nat -> Nat -> Nat -> Nat -> Nat -> Config => Doc AnsiStyle */
@@ -10177,12 +10318,12 @@ function User_Reflect_graph($0, $1, $2, $3, $4, $5, $6) {
 
 /* User.Reflect.details : Nat -> Nat -> Nat -> Nat -> Nat -> Nat -> Maybe Date -> Maybe Date -> Maybe Date -> Doc AnsiStyle */
 function User_Reflect_details($0, $1, $2, $3, $4, $5, $6, $7, $8) {
- return Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(User_Reflect_intro()), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_underline(), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('Requested Reviews:')), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_indent(2, Text_PrettyPrint_Prettyprinter_Doc_vsep(Data_List_catMaybes({a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('unreviewed:')}, a2: {a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_indent(2, Text_PrettyPrint_Prettyprinter_Doc_vsep(Data_List_catMaybes({a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_hsep({a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('open:'), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_color(3), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_Nat($2)), a2: {h: 0}}})}, a2: {a1: Prelude_Types_map_Functor_Maybe(csegen_538(), $8), a2: {a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_hsep({a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('closed:'), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_color(1), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_Nat($3)), a2: {h: 0}}})}, a2: {h: 0}}}})))}, a2: {a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_hsep({a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('reviews*:'), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_color(2), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_Nat($1)), a2: {h: 0}}})}, a2: {a1: Prelude_Types_map_Functor_Maybe(date => Text_PrettyPrint_Prettyprinter_Doc_indent(2, Text_PrettyPrint_Prettyprinter_Doc_hsep({a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('most recent:'), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(Data_Date_show_Show_Date(date)), a2: {h: 0}}})), $6), a2: {h: 0}}}}}))), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_underline(), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('Authored Pulls:')), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_indent(2, Text_PrettyPrint_Prettyprinter_Doc_vsep(Data_List_catMaybes({a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_hsep({a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('open:'), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_color(3), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_Nat($5)), a2: {h: 0}}})}, a2: {a1: Prelude_Types_map_Functor_Maybe(csegen_538(), $7), a2: {a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_hsep({a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('closed:'), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_color(2), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_Nat($4)), a2: {h: 0}}})}, a2: {h: 0}}}}))), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_italic(), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(Prelude_Types_foldMap_Foldable_List(csegen_50()(), $d0 => $d0, {a1: '*review count (not PR count) of most recent ', a2: {a1: Data_Fin_show_Show_x28Finx20x24nx29(User_Reflect_reviewDetailsCount()), a2: {a1: ' PRs.', a2: {h: 0}}}}))), a2: {h: 0}}}}}}}}}});
+ return Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(User_Reflect_intro()), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_underline(), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('Requested Reviews:')), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_indent(2, Text_PrettyPrint_Prettyprinter_Doc_vsep(Data_List_catMaybes({a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('unreviewed:')}, a2: {a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_indent(2, Text_PrettyPrint_Prettyprinter_Doc_vsep(Data_List_catMaybes({a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_hsep({a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('open:'), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_color(3), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_Nat($2)), a2: {h: 0}}})}, a2: {a1: Prelude_Types_map_Functor_Maybe(csegen_544(), $8), a2: {a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_hsep({a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('closed:'), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_color(1), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_Nat($3)), a2: {h: 0}}})}, a2: {h: 0}}}})))}, a2: {a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_hsep({a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('reviews*:'), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_color(2), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_Nat($1)), a2: {h: 0}}})}, a2: {a1: Prelude_Types_map_Functor_Maybe(date => Text_PrettyPrint_Prettyprinter_Doc_indent(2, Text_PrettyPrint_Prettyprinter_Doc_hsep({a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('most recent:'), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(Data_Date_show_Show_Date(date)), a2: {h: 0}}})), $6), a2: {h: 0}}}}}))), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_underline(), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('Authored Pulls:')), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_indent(2, Text_PrettyPrint_Prettyprinter_Doc_vsep(Data_List_catMaybes({a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_hsep({a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('open:'), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_color(3), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_Nat($5)), a2: {h: 0}}})}, a2: {a1: Prelude_Types_map_Functor_Maybe(csegen_544(), $7), a2: {a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_hsep({a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('closed:'), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_color(2), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_Nat($4)), a2: {h: 0}}})}, a2: {h: 0}}}}))), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_italic(), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(Prelude_Types_foldMap_Foldable_List(csegen_50()(), $d0 => $d0, {a1: '*review count (not PR count) of most recent ', a2: {a1: Data_Fin_show_Show_x28Finx20x24nx29(User_Reflect_reviewDetailsCount()), a2: {a1: ' PRs.', a2: {h: 0}}}}))), a2: {h: 0}}}}}}}}}});
 }
 
 /* User.Reflect.chart : Nat -> Nat -> Nat -> Nat -> Nat -> Nat -> Config => Nat -> Doc AnsiStyle */
 function User_Reflect_chart($0, $1, $2, $3, $4, $5, $6, $7) {
- return Text_PrettyPrint_Prettyprinter_Doc_indent(Number(_truncBigInt32($7)), Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29(Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29(User_replicatex27($6, csegen_529(), csegen_548(), 4, $1, '\u{b7}'), User_replicatex27($6, csegen_549(), csegen_549(), 7, $3, '\u{25e6}')), User_replicatex27($6, csegen_550(), csegen_550(), 5, $2, '<')), Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('|'), Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29(User_replicatex27($6, csegen_550(), csegen_550(), 5, $5, '>'), User_replicatex27($6, csegen_529(), csegen_548(), 4, $4, '\u{b7}')))));
+ return Text_PrettyPrint_Prettyprinter_Doc_indent(Number(_truncBigInt32($7)), Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29(Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29(User_replicatex27($6, csegen_535(), csegen_554(), 4, $1, '\u{b7}'), User_replicatex27($6, csegen_555(), csegen_555(), 7, $3, '\u{25e6}')), User_replicatex27($6, csegen_556(), csegen_556(), 5, $2, '<')), Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('|'), Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29(User_replicatex27($6, csegen_556(), csegen_556(), 5, $5, '>'), User_replicatex27($6, csegen_535(), csegen_554(), 4, $4, '\u{b7}')))));
 }
 
 /* Theme.4312:1214:maybeAnnotate */
@@ -10233,7 +10374,7 @@ function Theme_cs($0) {
 }
 
 /* PullRequest.with block in with block in listPartitionedPRs */
-function PullRequest_with__withx20blockx20inx20listPartitionedPRs_1609($0, $1, $2, $3, $4, $5, $6) {
+function PullRequest_with__withx20blockx20inx20listPartitionedPRs_1618($0, $1, $2, $3, $4, $5, $6) {
  return $7 => {
   switch($2.h) {
    case 1: /* No */ return $9 => PullRequest_partitionx27(Data_Pagination_metaPages($0, 1n, $4, 1n, $4), $7, $9);
@@ -10243,20 +10384,20 @@ function PullRequest_with__withx20blockx20inx20listPartitionedPRs_1609($0, $1, $
 }
 
 /* PullRequest.with block in listPartitionedPRs */
-function PullRequest_with__listPartitionedPRs_1547($0, $1, $2, $3, $4) {
+function PullRequest_with__listPartitionedPRs_1554($0, $1, $2, $3, $4) {
  switch($2.a1.h) {
-  case 1: /* No */ return $7 => $8 => Data_Promise_pure_Applicative_Promise(PullRequest_empty(), $7, $8);
+  case 1: /* No */ return $7 => $8 => Data_Promise_pure_Applicative_x28Promisex20x24ex29(PullRequest_empty(), $7, $8);
   default: {
    switch($2.a2.h) {
-    case 1: /* No */ return $f => $10 => Data_Promise_map_Functor_Promise($13 => PullRequest_partition($13), FFI_GitHub_listPullRequests($3, $4.a2, $4.a3, {h: 0}, $0, 0n), $f, $10);
-    default: return PullRequest_with__withx20blockx20inx20listPartitionedPRs_1609($0, $1, Data_Nat_isLTE(($1+1n), $0), $3, $2.a1.a1, $2.a2.a1, $4);
+    case 1: /* No */ return $f => $10 => Data_Promise_map_Functor_x28Promisex20x24ex29($13 => PullRequest_partition($13), FFI_GitHub_listPullRequests($3, $4.a2, $4.a3, {h: 0}, $0, 0n), $f, $10);
+    default: return PullRequest_with__withx20blockx20inx20listPartitionedPRs_1618($0, $1, Data_Nat_isLTE(($1+1n), $0), $3, $2.a1.a1, $2.a2.a1, $4);
    }
   }
  }
 }
 
 /* PullRequest.with block in with block in listOpenPRs */
-function PullRequest_with__withx20blockx20inx20listOpenPRs_1436($0, $1, $2, $3, $4, $5, $6) {
+function PullRequest_with__withx20blockx20inx20listOpenPRs_1442($0, $1, $2, $3, $4, $5, $6) {
  return $7 => {
   switch($2.h) {
    case 1: /* No */ return $9 => PullRequest_listx27({a1: 0}, Data_Pagination_metaPages($0, 1n, $4, 1n, $4), $7, $9);
@@ -10266,75 +10407,75 @@ function PullRequest_with__withx20blockx20inx20listOpenPRs_1436($0, $1, $2, $3,
 }
 
 /* PullRequest.with block in listOpenPRs */
-function PullRequest_with__listOpenPRs_1375($0, $1, $2, $3, $4) {
+function PullRequest_with__listOpenPRs_1380($0, $1, $2, $3, $4) {
  switch($2.a1.h) {
-  case 1: /* No */ return $7 => $8 => Data_Promise_pure_Applicative_Promise({h: 0}, $7, $8);
+  case 1: /* No */ return $7 => $8 => Data_Promise_pure_Applicative_x28Promisex20x24ex29({h: 0}, $7, $8);
   default: {
    switch($2.a2.h) {
     case 1: /* No */ return FFI_GitHub_listPullRequests($3, $4.a2, $4.a3, {a1: 0}, $0, 0n);
-    default: return PullRequest_with__withx20blockx20inx20listOpenPRs_1436($0, $1, Data_Nat_isLTE(($1+1n), $0), $3, $2.a1.a1, $2.a2.a1, $4);
+    default: return PullRequest_with__withx20blockx20inx20listOpenPRs_1442($0, $1, Data_Nat_isLTE(($1+1n), $0), $3, $2.a1.a1, $2.a2.a1, $4);
    }
   }
  }
 }
 
 /* PullRequest.case block in case block in case block in identifyOrCreatePR,createPR */
-function PullRequest_case__casex20blockx20inx20casex20blockx20inx20identifyOrCreatePRx2ccreatePR_3187($0, $1, $2, $3, $4, $5, $6, $7, $8) {
+function PullRequest_case__casex20blockx20inx20casex20blockx20inx20identifyOrCreatePRx2ccreatePR_3256($0, $1, $2, $3, $4, $5, $6, $7, $8) {
  switch($8.h) {
   case undefined: /* cons */ return ($8.a1+$8.a2);
   default: return $4.a5;
  }
 }
 
-/* PullRequest.9720:1965:userNotice */
-function PullRequest_n__9720_1965_userNotice($0, $1, $2, $3, $4, $5, $6) {
+/* PullRequest.9870:1986:userNotice */
+function PullRequest_n__9870_1986_userNotice($0, $1, $2, $3, $4, $5, $6) {
  switch($6.h) {
   case 0: /* nothing */ {
    switch($2.h) {
     case 0: /* nil */ return 'no users';
-    default: return Prelude_Types_foldMap_Foldable_List(csegen_50()(), $e => $e, {a1: PullRequest_n__9720_1962_csv($0, $1, $2, $3, $4, $5, $2), a2: {h: 0}});
+    default: return Prelude_Types_foldMap_Foldable_List(csegen_50()(), $e => $e, {a1: PullRequest_n__9870_1983_csv($0, $1, $2, $3, $4, $5, $2), a2: {h: 0}});
    }
   }
-  case undefined: /* just */ return Prelude_Types_foldMap_Foldable_List(csegen_50()(), $1f => $1f, {a1: PullRequest_n__9720_1962_csv($0, $1, $2, $3, $4, $5, {a1: $6.a1, a2: $2}), a2: {h: 0}});
+  case undefined: /* just */ return Prelude_Types_foldMap_Foldable_List(csegen_50()(), $1f => $1f, {a1: PullRequest_n__9870_1983_csv($0, $1, $2, $3, $4, $5, {a1: $6.a1, a2: $2}), a2: {h: 0}});
  }
 }
 
-/* PullRequest.9720:1964:teamNotice */
-function PullRequest_n__9720_1964_teamNotice($0, $1, $2, $3, $4, $5, $6) {
+/* PullRequest.9870:1985:teamNotice */
+function PullRequest_n__9870_1985_teamNotice($0, $1, $2, $3, $4, $5, $6) {
  switch($6.h) {
   case 0: /* nil */ return '';
   case undefined: /* cons */ {
    switch($6.a2.h) {
-    case 0: /* nil */ return Prelude_Types_foldMap_Foldable_List(csegen_50()(), $e => $e, {a1: ' and team ', a2: {a1: PullRequest_n__9720_1962_csv($0, $1, $2, $3, $4, $5, {a1: $6.a1, a2: {h: 0}}), a2: {h: 0}}});
-    default: return Prelude_Types_foldMap_Foldable_List(csegen_50()(), $23 => $23, {a1: ' and teams ', a2: {a1: PullRequest_n__9720_1962_csv($0, $1, $2, $3, $4, $5, $6), a2: {h: 0}}});
+    case 0: /* nil */ return Prelude_Types_foldMap_Foldable_List(csegen_50()(), $e => $e, {a1: ' and team ', a2: {a1: PullRequest_n__9870_1983_csv($0, $1, $2, $3, $4, $5, {a1: $6.a1, a2: {h: 0}}), a2: {h: 0}}});
+    default: return Prelude_Types_foldMap_Foldable_List(csegen_50()(), $23 => $23, {a1: ' and teams ', a2: {a1: PullRequest_n__9870_1983_csv($0, $1, $2, $3, $4, $5, $6), a2: {h: 0}}});
    }
   }
-  default: return Prelude_Types_foldMap_Foldable_List(csegen_50()(), $36 => $36, {a1: ' and teams ', a2: {a1: PullRequest_n__9720_1962_csv($0, $1, $2, $3, $4, $5, $6), a2: {h: 0}}});
+  default: return Prelude_Types_foldMap_Foldable_List(csegen_50()(), $36 => $36, {a1: ' and teams ', a2: {a1: PullRequest_n__9870_1983_csv($0, $1, $2, $3, $4, $5, $6), a2: {h: 0}}});
  }
 }
 
-/* PullRequest.10410:2629:prepareDescriptionFile */
-function PullRequest_n__10410_2629_prepareDescriptionFile($0, $1, $2, $3, $4, $5, $6) {
+/* PullRequest.10575:2665:prepareDescriptionFile */
+function PullRequest_n__10575_2665_prepareDescriptionFile($0, $1, $2, $3, $4, $5, $6) {
  return $5.a1.a2(undefined)(undefined)(System_File_Meta_exists($5, $6))($14 => Prelude_Interfaces_when($5.a1.a1, $14, () => $5.a1.a1.a1(undefined)(undefined)($25 => (undefined))(System_File_copyFile($5, $6, 'pr_description.tmp.md'))));
 }
 
-/* PullRequest.9720:1963:prComment */
-function PullRequest_n__9720_1963_prComment($0, $1, $2, $3, $4, $5, $6) {
+/* PullRequest.9870:1984:prComment */
+function PullRequest_n__9870_1984_prComment($0, $1, $2, $3, $4, $5, $6) {
  return Prelude_Types_foldMap_Foldable_List(csegen_50()(), $c => $c, {a1: ':musical_note: Harmoniously requested review from @', a2: {a1: $6, a2: {a1: '.', a2: {h: 0}}}});
 }
 
-/* PullRequest.10410:2628:inlineDescription */
-function PullRequest_n__10410_2628_inlineDescription($0, $1, $2, $3, $4, $5) {
+/* PullRequest.10575:2664:inlineDescription */
+function PullRequest_n__10575_2664_inlineDescription($0, $1, $2, $3, $4, $5) {
  return $5.a1.a2(undefined)(undefined)($5.a2(undefined)($14 => Prelude_IO_prim__putStr('What would you like the description to be (two blank lines to finish)?\n', $14)))($19 => $5.a1.a1.a1(undefined)(undefined)($24 => Data_String_fastUnlines($24))(Util_getManyLines($5, Data_Fuel_limit(100n))));
 }
 
-/* PullRequest.9493:1704:forkedReviews */
-function PullRequest_n__9493_1704_forkedReviews($0, $1, $2, $3) {
+/* PullRequest.9632:1714:forkedReviews */
+function PullRequest_n__9632_1714_forkedReviews($0, $1, $2, $3) {
  return FFI_Concurrency_fork(csegen_73()(), ('reviews --json '+Prelude_Show_show_Show_Integer($3.a1)));
 }
 
-/* PullRequest.8926:1169:filterString */
-function PullRequest_n__8926_1169_filterString($0, $1, $2, $3, $4) {
+/* PullRequest.9055:1169:filterString */
+function PullRequest_n__9055_1169_filterString($0, $1, $2, $3, $4) {
  switch($4.h) {
   case 0: /* nothing */ return 'none';
   case undefined: /* just */ {
@@ -10346,8 +10487,8 @@ function PullRequest_n__8926_1169_filterString($0, $1, $2, $3, $4) {
  }
 }
 
-/* PullRequest.10410:2627:editorDescription */
-function PullRequest_n__10410_2627_editorDescription($0, $1, $2, $3, $4, $5, $6, $7) {
+/* PullRequest.10575:2663:editorDescription */
+function PullRequest_n__10575_2663_editorDescription($0, $1, $2, $3, $4, $5, $6, $7) {
  const $19 = $1a => {
   const $32 = $33 => {
    switch($33) {
@@ -10357,16 +10498,16 @@ function PullRequest_n__10410_2627_editorDescription($0, $1, $2, $3, $4, $5, $6,
   };
   return $5.a1.a2(undefined)(undefined)(System_system($5, Prelude_Types_foldMap_Foldable_List(csegen_50()(), $2c => $2c, {a1: $6, a2: {a1: ' pr_description.tmp.md', a2: {h: 0}}})))($32);
  };
- return $5.a1.a2(undefined)(undefined)(PullRequest_n__10410_2629_prepareDescriptionFile($0, $1, $2, $3, $4, $5, $7))($19);
+ return $5.a1.a2(undefined)(undefined)(PullRequest_n__10575_2665_prepareDescriptionFile($0, $1, $2, $3, $4, $5, $7))($19);
 }
 
-/* PullRequest.9720:1962:csv */
-function PullRequest_n__9720_1962_csv($0, $1, $2, $3, $4, $5, $6) {
+/* PullRequest.9870:1983:csv */
+function PullRequest_n__9870_1983_csv($0, $1, $2, $3, $4, $5, $6) {
  return Util_renderString($5, Text_PrettyPrint_Prettyprinter_Doc_encloseSep(Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(', '), Prelude_Types_List_mapAppend({h: 0}, $16 => Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_color(2), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String($16)), $6)));
 }
 
-/* PullRequest.10410:2626:createPR */
-function PullRequest_n__10410_2626_createPR($0, $1, $2, $3, $4, $5, $6) {
+/* PullRequest.10575:2662:createPR */
+function PullRequest_n__10575_2662_createPR($0, $1, $2, $3, $4, $5, $6) {
  const $3a = $3b => $3c => $3d => {
   const $4a = $4b => $4c => $4d => {
    switch($4b) {
@@ -10377,17 +10518,17 @@ function PullRequest_n__10410_2626_createPR($0, $1, $2, $3, $4, $5, $6) {
         const $61 = $62 => $63 => {
          const $6c = $6d => $6e => $6f => {
           switch($6d.h) {
-           case undefined: /* just */ return Data_Promise_x3ex3ex3d_Monad_Promise($73 => $74 => $75 => Data_Promise_liftIO_HasIO_Promise($78 => Prelude_IO_prim__putStr('The following commits have not been pushed:\n\n', $78), $73, $74, $75), $80 => $81 => $82 => Data_Promise_x3ex3ex3d_Monad_Promise($85 => $86 => $87 => Data_Promise_liftIO_HasIO_Promise($8a => Prelude_IO_prim__putStr(($6d.a1+'\n'), $8a), $85, $86, $87), $94 => $95 => $96 => Data_Promise_x3ex3ex3d_Monad_Promise($99 => $9a => $9b => Data_Promise_liftIO_HasIO_Promise($9e => Prelude_IO_prim__putStr('\n\n', $9e), $99, $9a, $9b), $a6 => $a7 => $a8 => Data_Promise_x3ex3ex3d_Monad_Promise(Util_yesNoPrompt(csegen_73()(), 'Would you like to push these changes before creating a PR?'), pushUnpushedChanges => Prelude_Interfaces_when(csegen_65()(), pushUnpushedChanges, () => $b7 => $b8 => FFI_Git_push($0, $b7, $b8)), $a7, $a8), $95, $96), $81, $82), $6e, $6f);
-           case 0: /* nothing */ return Data_Promise_pure_Applicative_Promise(undefined, $6e, $6f);
+           case undefined: /* just */ return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($73 => $74 => $75 => Data_Promise_liftIO_HasIO_x28Promisex20x24ex29($78 => Prelude_IO_prim__putStr('The following commits have not been pushed:\n\n', $78), $73, $74, $75), $80 => $81 => $82 => Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($85 => $86 => $87 => Data_Promise_liftIO_HasIO_x28Promisex20x24ex29($8a => Prelude_IO_prim__putStr(($6d.a1+'\n'), $8a), $85, $86, $87), $94 => $95 => $96 => Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($99 => $9a => $9b => Data_Promise_liftIO_HasIO_x28Promisex20x24ex29($9e => Prelude_IO_prim__putStr('\n\n', $9e), $99, $9a, $9b), $a6 => $a7 => $a8 => Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(Util_yesNoPrompt(csegen_73()(), 'Would you like to push these changes before creating a PR?'), pushUnpushedChanges => Prelude_Interfaces_when(csegen_65()(), pushUnpushedChanges, () => $b7 => $b8 => FFI_Git_push($0, $b7, $b8)), $a7, $a8), $95, $96), $81, $82), $6e, $6f);
+           case 0: /* nothing */ return Data_Promise_pure_Applicative_x28Promisex20x24ex29(undefined, $6e, $6f);
           }
          };
-         return Data_Promise_x3ex3ex3d_Monad_Promise($66 => $67 => FFI_Git_unpushedCommits($0, $66, $67), $6c, $62, $63);
+         return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($66 => $67 => FFI_Git_unpushedCommits($0, $66, $67), $6c, $62, $63);
         };
         const $cb = $cc => $cd => $ce => {
          const $ec = $ed => $ee => $ef => {
           const $10e = $10f => $110 => $111 => {
            const $120 = baseBranchInput => {
-            const $121 = PullRequest_case__casex20blockx20inx20casex20blockx20inx20identifyOrCreatePRx2ccreatePR_3187($0, $1, $2, $3, $4, 1, 1, baseBranchInput, Data_String_strM(baseBranchInput));
+            const $121 = PullRequest_case__casex20blockx20inx20casex20blockx20inx20identifyOrCreatePRx2ccreatePR_3256($0, $1, $2, $3, $4, 1, 1, baseBranchInput, Data_String_strM(baseBranchInput));
             return $12e => $12f => {
              const $13e = $13f => {
               const $141 = Data_Maybe_fromMaybe(() => '', Prelude_Types_map_Functor_Maybe($147 => ($147+' - '), Util_parseJiraPrefix($2)));
@@ -10399,68 +10540,68 @@ function PullRequest_n__10410_2626_createPR($0, $1, $2, $3, $4, $5, $6) {
                   let $181;
                   switch($182.h) {
                    case 0: /* nothing */ {
-                    $181 = PullRequest_n__10410_2628_inlineDescription($0, $1, $2, $3, $4, csegen_73()());
+                    $181 = PullRequest_n__10575_2664_inlineDescription($0, $1, $2, $3, $4, csegen_73()());
                     break;
                    }
                    case undefined: /* just */ {
-                    $181 = $18e => $18f => Data_Promise_map_Functor_Promise($192 => Prelude_Types_either(() => $195 => '', () => $197 => $197, $192), PullRequest_n__10410_2627_editorDescription($0, $1, $2, $3, $4, csegen_73()(), $182.a1, templateFilePath), $18e, $18f);
+                    $181 = $18e => $18f => Data_Promise_map_Functor_x28Promisex20x24ex29($192 => Prelude_Types_either(() => $195 => '', () => $197 => $197, $192), PullRequest_n__10575_2663_editorDescription($0, $1, $2, $3, $4, csegen_73()(), $182.a1, templateFilePath), $18e, $18f);
                     break;
                    }
                   }
-                  return Data_Promise_x3ex3ex3d_Monad_Promise($181, description => $1a8 => $1a9 => Data_Promise_x3ex3ex3d_Monad_Promise($1ac => $1ad => $1ae => Data_Promise_liftIO_HasIO_Promise($1b1 => Prelude_IO_prim__putStr('Creating PR...\n', $1b1), $1ac, $1ad, $1ae), $1b9 => $1ba => $1bb => Data_Promise_x3ex3ex3d_Monad_Promise($1be => $1bf => $1c0 => Data_Promise_liftIO_HasIO_Promise($1c3 => Prelude_IO_prim__putStr(($2+'\n'), $1c3), $1be, $1bf, $1c0), $1cd => FFI_GitHub_createPR($1, $3, $4.a2, $4.a3, $2, $121, title, description), $1ba, $1bb), $1a8, $1a9), $17e, $17f);
+                  return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($181, description => $1a8 => $1a9 => Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($1ac => $1ad => $1ae => Data_Promise_liftIO_HasIO_x28Promisex20x24ex29($1b1 => Prelude_IO_prim__putStr('Creating PR...\n', $1b1), $1ac, $1ad, $1ae), $1b9 => $1ba => $1bb => Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($1be => $1bf => $1c0 => Data_Promise_liftIO_HasIO_x28Promisex20x24ex29($1c3 => Prelude_IO_prim__putStr(($2+'\n'), $1c3), $1be, $1bf, $1c0), $1cd => FFI_GitHub_createPR($1, $3, $4.a2, $4.a3, $2, $121, title, description), $1ba, $1bb), $1a8, $1a9), $17e, $17f);
                  };
-                 return Data_Promise_x3ex3ex3d_Monad_Promise($176 => $177 => Util_relativeToRoot($0, '.github/PULL_REQUEST_TEMPLATE.md', $176, $177), $17d, $172, $173);
+                 return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($176 => $177 => Util_relativeToRoot($0, '.github/PULL_REQUEST_TEMPLATE.md', $176, $177), $17d, $172, $173);
                 };
-                return Data_Promise_x3ex3ex3d_Monad_Promise($163 => $164 => Data_Promise_map_Functor_Promise($167 => ($141+Data_String_trim($167)), csegen_470()(), $163, $164), $171, $15f, $160);
+                return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($163 => $164 => Data_Promise_map_Functor_x28Promisex20x24ex29($167 => ($141+Data_String_trim($167)), csegen_475()(), $163, $164), $171, $15f, $160);
                };
-               return Data_Promise_x3ex3ex3d_Monad_Promise($151 => $152 => $153 => Data_Promise_liftIO_HasIO_Promise($156 => Prelude_IO_prim__putStr($141, $156), $151, $152, $153), $15d, $14d, $14e);
+               return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($151 => $152 => $153 => Data_Promise_liftIO_HasIO_x28Promisex20x24ex29($156 => Prelude_IO_prim__putStr($141, $156), $151, $152, $153), $15d, $14d, $14e);
               };
               return $140();
              };
-             return Data_Promise_x3ex3ex3d_Monad_Promise($132 => $133 => $134 => Data_Promise_liftIO_HasIO_Promise($137 => Prelude_IO_prim__putStr('What would you like the title to be?\n', $137), $132, $133, $134), $13e, $12e, $12f);
+             return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($132 => $133 => $134 => Data_Promise_liftIO_HasIO_x28Promisex20x24ex29($137 => Prelude_IO_prim__putStr('What would you like the title to be?\n', $137), $132, $133, $134), $13e, $12e, $12f);
             };
            };
-           return Data_Promise_x3ex3ex3d_Monad_Promise($114 => $115 => Data_Promise_map_Functor_Promise($118 => Data_String_trim($118), csegen_470()(), $114, $115), $120, $110, $111);
+           return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($114 => $115 => Data_Promise_map_Functor_x28Promisex20x24ex29($118 => Data_String_trim($118), csegen_475()(), $114, $115), $120, $110, $111);
           };
-          return Data_Promise_x3ex3ex3d_Monad_Promise($f2 => $f3 => $f4 => Data_Promise_liftIO_HasIO_Promise($f7 => Prelude_IO_prim__putStr((Prelude_Types_foldMap_Foldable_List(csegen_50()(), $100 => $100, {a1: 'What branch are you merging into (ENTER for default: ', a2: {a1: $4.a5, a2: {a1: ')?', a2: {h: 0}}}})+'\n'), $f7), $f2, $f3, $f4), $10e, $ee, $ef);
+          return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($f2 => $f3 => $f4 => Data_Promise_liftIO_HasIO_x28Promisex20x24ex29($f7 => Prelude_IO_prim__putStr((Prelude_Types_foldMap_Foldable_List(csegen_50()(), $100 => $100, {a1: 'What branch are you merging into (ENTER for default: ', a2: {a1: $4.a5, a2: {a1: ')?', a2: {h: 0}}}})+'\n'), $f7), $f2, $f3, $f4), $10e, $ee, $ef);
          };
-         return Data_Promise_x3ex3ex3d_Monad_Promise($d1 => $d2 => $d3 => Data_Promise_liftIO_HasIO_Promise($d6 => Prelude_IO_prim__putStr((Prelude_Types_foldMap_Foldable_List(csegen_50()(), $df => $df, {a1: 'Creating a new PR for the current branch (', a2: {a1: $2, a2: {a1: ').', a2: {h: 0}}}})+'\n'), $d6), $d1, $d2, $d3), $ec, $cd, $ce);
+         return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($d1 => $d2 => $d3 => Data_Promise_liftIO_HasIO_x28Promisex20x24ex29($d6 => Prelude_IO_prim__putStr((Prelude_Types_foldMap_Foldable_List(csegen_50()(), $df => $df, {a1: 'Creating a new PR for the current branch (', a2: {a1: $2, a2: {a1: ').', a2: {h: 0}}}})+'\n'), $d6), $d1, $d2, $d3), $ec, $cd, $ce);
         };
-        return Data_Promise_x3ex3ex3d_Monad_Promise($61, $cb, $5d, $5e);
+        return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($61, $cb, $5d, $5e);
        }
        case 0: return Data_Promise_reject('Not creating a PR (for now)...', $5d, $5e);
       }
      };
-     return Data_Promise_x3ex3ex3d_Monad_Promise($51 => $52 => PullRequest_n__10410_2624_continueGivenStagedChanges($0, $1, $2, $3, $4, $51, $52), $5b, $4c, $4d);
+     return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($51 => $52 => PullRequest_n__10575_2660_continueGivenStagedChanges($0, $1, $2, $3, $4, $51, $52), $5b, $4c, $4d);
     }
     case 0: return Data_Promise_reject('Not creating a PR (for now)...', $4c, $4d);
    }
   };
-  return Data_Promise_x3ex3ex3d_Monad_Promise($40 => $41 => PullRequest_n__10410_2625_continueGivenUncommittedChanges($0, $1, $2, $3, $4, $40, $41), $4a, $3c, $3d);
+  return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($40 => $41 => PullRequest_n__10575_2661_continueGivenUncommittedChanges($0, $1, $2, $3, $4, $40, $41), $4a, $3c, $3d);
  };
- return Data_Promise_x3ex3ex3d_Monad_Promise($9 => $a => Data_Promise_x3ex3ex3d_Monad_Promise($d => $e => FFI_Git_remoteTrackingBranch($0, $d, $e), $14 => Util_whenNothing(csegen_65()(), $14, $1b => $1c => Data_Promise_x3ex3ex3d_Monad_Promise($1f => $20 => $21 => Data_Promise_liftIO_HasIO_Promise($24 => Prelude_IO_prim__putStr('Creating a new remote branch...\n', $24), $1f, $20, $21), $2c => $2d => $2e => FFI_Git_pushNewBranch($0, $4.a4, $2, $2d, $2e), $1b, $1c)), $9, $a), $3a, $5, $6);
+ return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($9 => $a => Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($d => $e => FFI_Git_remoteTrackingBranch($0, $d, $e), $14 => Util_whenNothing(csegen_65()(), $14, $1b => $1c => Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($1f => $20 => $21 => Data_Promise_liftIO_HasIO_x28Promisex20x24ex29($24 => Prelude_IO_prim__putStr('Creating a new remote branch...\n', $24), $1f, $20, $21), $2c => $2d => $2e => FFI_Git_pushNewBranch($0, $4.a4, $2, $2d, $2e), $1b, $1c)), $9, $a), $3a, $5, $6);
 }
 
-/* PullRequest.10410:2625:continueGivenUncommittedChanges */
-function PullRequest_n__10410_2625_continueGivenUncommittedChanges($0, $1, $2, $3, $4, $5, $6) {
+/* PullRequest.10575:2661:continueGivenUncommittedChanges */
+function PullRequest_n__10575_2661_continueGivenUncommittedChanges($0, $1, $2, $3, $4, $5, $6) {
  const $f = $10 => $11 => $12 => {
   switch($10.h) {
-   case undefined: /* just */ return Data_Promise_x3ex3ex3d_Monad_Promise($16 => $17 => $18 => Data_Promise_liftIO_HasIO_Promise($1b => Prelude_IO_prim__putStr('The following files have uncommitted changes:\n', $1b), $16, $17, $18), $23 => $24 => $25 => Data_Promise_x3ex3ex3d_Monad_Promise($28 => $29 => $2a => Data_Promise_liftIO_HasIO_Promise($2d => Prelude_IO_prim__putStr(($10.a1+'\n'), $2d), $28, $29, $2a), csegen_571(), $24, $25), $11, $12);
-   case 0: /* nothing */ return Data_Promise_pure_Applicative_Promise(1, $11, $12);
+   case undefined: /* just */ return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($16 => $17 => $18 => Data_Promise_liftIO_HasIO_x28Promisex20x24ex29($1b => Prelude_IO_prim__putStr('The following files have uncommitted changes:\n', $1b), $16, $17, $18), $23 => $24 => $25 => Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($28 => $29 => $2a => Data_Promise_liftIO_HasIO_x28Promisex20x24ex29($2d => Prelude_IO_prim__putStr(($10.a1+'\n'), $2d), $28, $29, $2a), csegen_577(), $24, $25), $11, $12);
+   case 0: /* nothing */ return Data_Promise_pure_Applicative_x28Promisex20x24ex29(1, $11, $12);
   }
  };
- return Data_Promise_x3ex3ex3d_Monad_Promise($9 => $a => FFI_Git_uncommittedChanges($0, $9, $a), $f, $5, $6);
+ return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($9 => $a => FFI_Git_uncommittedChanges($0, $9, $a), $f, $5, $6);
 }
 
-/* PullRequest.10410:2624:continueGivenStagedChanges */
-function PullRequest_n__10410_2624_continueGivenStagedChanges($0, $1, $2, $3, $4, $5, $6) {
+/* PullRequest.10575:2660:continueGivenStagedChanges */
+function PullRequest_n__10575_2660_continueGivenStagedChanges($0, $1, $2, $3, $4, $5, $6) {
  const $f = $10 => $11 => $12 => {
   switch($10.h) {
-   case undefined: /* just */ return Data_Promise_x3ex3ex3d_Monad_Promise($16 => $17 => $18 => Data_Promise_liftIO_HasIO_Promise($1b => Prelude_IO_prim__putStr('The following files have staged but uncommitted changes:\n', $1b), $16, $17, $18), $23 => $24 => $25 => Data_Promise_x3ex3ex3d_Monad_Promise($28 => $29 => $2a => Data_Promise_liftIO_HasIO_Promise($2d => Prelude_IO_prim__putStr(($10.a1+'\n'), $2d), $28, $29, $2a), csegen_571(), $24, $25), $11, $12);
-   case 0: /* nothing */ return Data_Promise_pure_Applicative_Promise(1, $11, $12);
+   case undefined: /* just */ return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($16 => $17 => $18 => Data_Promise_liftIO_HasIO_x28Promisex20x24ex29($1b => Prelude_IO_prim__putStr('The following files have staged but uncommitted changes:\n', $1b), $16, $17, $18), $23 => $24 => $25 => Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($28 => $29 => $2a => Data_Promise_liftIO_HasIO_x28Promisex20x24ex29($2d => Prelude_IO_prim__putStr(($10.a1+'\n'), $2d), $28, $29, $2a), csegen_577(), $24, $25), $11, $12);
+   case 0: /* nothing */ return Data_Promise_pure_Applicative_x28Promisex20x24ex29(1, $11, $12);
   }
  };
- return Data_Promise_x3ex3ex3d_Monad_Promise($9 => $a => FFI_Git_stagedChanges($0, $9, $a), $f, $5, $6);
+ return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($9 => $a => FFI_Git_stagedChanges($0, $9, $a), $f, $5, $6);
 }
 
 /* PullRequest.(.allReviewers) : PRHistory -> (List String, List String) */
@@ -10473,37 +10614,37 @@ function PullRequest_tuple($0) {
  return {a1: $0.a1, a2: $0.a2};
 }
 
-/* PullRequest.reviewsForPrs : Config => Octokit => List PullRequest -> Promise (List Review) */
+/* PullRequest.reviewsForPrs : Config => Octokit => List PullRequest -> Promise' (List Review) */
 function PullRequest_reviewsForPrs($0, $1, $2, $3, $4) {
  const $19 = reviewsJson => $1a => $1b => {
   const $1d = $1e => {
-   const $25 = b => a => func => $26 => {
-    switch($26.h) {
-     case 0: /* Left */ return {h: 0 /* Left */, a1: $26.a1};
-     case 1: /* Right */ return {h: 1 /* Right */, a1: func($26.a1)};
+   const $23 = b => a => func => $24 => {
+    switch($24.h) {
+     case 0: /* Left */ return {h: 0 /* Left */, a1: $24.a1};
+     case 1: /* Right */ return {h: 1 /* Right */, a1: func($24.a1)};
     }
    };
-   const $2f = b => a => $30 => $31 => {
-    switch($30.h) {
-     case 0: /* Left */ return {h: 0 /* Left */, a1: $30.a1};
+   const $2d = b => a => $2e => $2f => {
+    switch($2e.h) {
+     case 0: /* Left */ return {h: 0 /* Left */, a1: $2e.a1};
      case 1: /* Right */ {
-      switch($31.h) {
-       case 1: /* Right */ return {h: 1 /* Right */, a1: $30.a1($31.a1)};
-       case 0: /* Left */ return {h: 0 /* Left */, a1: $31.a1};
+      switch($2f.h) {
+       case 1: /* Right */ return {h: 1 /* Right */, a1: $2e.a1($2f.a1)};
+       case 0: /* Left */ return {h: 0 /* Left */, a1: $2f.a1};
       }
      }
     }
    };
-   const $24 = {a1: $25, a2: a => $2d => ({h: 1 /* Right */, a1: $2d}), a3: $2f};
-   const $22 = Prelude_Types_traverse_Traversable_List($24, $3a => Language_JSON_Accessors_array($3d => Data_Review_parseReview($3d), $3a), reviewsJson);
-   return Data_Promise_either(csegen_52(), $22, $1e);
+   const $22 = {a1: $23, a2: a => $2b => ({h: 1 /* Right */, a1: $2b}), a3: $2d};
+   const $20 = Prelude_Types_traverse_Traversable_List($22, $38 => Language_JSON_Accessors_array($3b => Data_Review_parseReview($3b), $38), reviewsJson);
+   return Data_Promise_either($20, $1e);
   };
-  return Data_Promise_x3ex3ex3d_Monad_Promise($1d, reviews => $44 => $45 => Data_Promise_pure_Applicative_Promise(Prelude_Types_join_Monad_List(reviews), $44, $45), $1a, $1b);
+  return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($1d, reviews => $42 => $43 => Data_Promise_pure_Applicative_x28Promisex20x24ex29(Prelude_Types_join_Monad_List(reviews), $42, $43), $1a, $1b);
  };
- return Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Basics_flip(csegen_407(), csegen_502(), Prelude_Types_traverse_Traversable_List(csegen_65()(), $12 => PullRequest_n__9493_1704_forkedReviews($0, $1, $2, $12), $2)), $19, $3, $4);
+ return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(Prelude_Basics_flip(csegen_411(), csegen_508(), Prelude_Types_traverse_Traversable_List(csegen_65()(), $12 => PullRequest_n__9632_1714_forkedReviews($0, $1, $2, $12), $2)), $19, $3, $4);
 }
 
-/* PullRequest.reviewsByUser : Config => Octokit => String -> List PullRequest -> Promise (List Review) */
+/* PullRequest.reviewsByUser : Config => Octokit => String -> List PullRequest -> Promise' (List Review) */
 function PullRequest_reviewsByUser($0, $1, $2, $3) {
  const $7 = pr => {
   let $8;
@@ -10523,23 +10664,23 @@ function PullRequest_reviewsByUser($0, $1, $2, $3) {
   }
  };
  const $4 = Prelude_Types_List_filterAppend({h: 0}, $7, $3);
- return $11 => $12 => Data_Promise_x3ex3ex3d_Monad_Promise($15 => $16 => PullRequest_reviewsForPrs($0, $1, $4, $15, $16), reviews => $1e => $1f => Data_Promise_pure_Applicative_Promise(Prelude_Types_List_filterAppend({h: 0}, $25 => Data_Review_isAuthor($2, $25), reviews), $1e, $1f), $11, $12);
+ return $11 => $12 => Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($15 => $16 => PullRequest_reviewsForPrs($0, $1, $4, $15, $16), reviews => $1e => $1f => Data_Promise_pure_Applicative_x28Promisex20x24ex29(Prelude_Types_List_filterAppend({h: 0}, $25 => Data_Review_isAuthor($2, $25), reviews), $1e, $1f), $11, $12);
 }
 
 /* PullRequest.reviewsByEachUser : Config => Octokit =>
-List PullRequest -> Promise (SortedMap String (List Review)) */
+List PullRequest -> Promise' (SortedMap String (List Review)) */
 function PullRequest_reviewsByEachUser($0, $1, $2, $3, $4) {
  const $f = reviews => {
   const $10 = Data_List_groupAllWith(csegen_224(), $15 => $15.a2, reviews);
   const $18 = Prelude_Types_List_mapAppend({h: 0}, rs => ({a1: rs.a1.a2, a2: Data_List1_forget(rs)}), $10);
-  return $23 => $24 => Data_Promise_pure_Applicative_Promise(Data_SortedMap_fromList(csegen_224(), $18), $23, $24);
+  return $23 => $24 => Data_Promise_pure_Applicative_x28Promisex20x24ex29(Data_SortedMap_fromList(csegen_224(), $18), $23, $24);
  };
- return Data_Promise_x3ex3ex3d_Monad_Promise($7 => $8 => PullRequest_reviewsForPrs($0, $1, $2, $7, $8), $f, $3, $4);
+ return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($7 => $8 => PullRequest_reviewsForPrs($0, $1, $2, $7, $8), $f, $3, $4);
 }
 
 /* PullRequest.requestReviewers : Config => Octokit =>
 PullRequest -> List String -> List String -> {default False _ : Bool} ->
-Promise () */
+Promise' () */
 function PullRequest_requestReviewers($0, $1, $2, $3, $4, $5, $6, $7) {
  const $13 = $14 => $15 => $16 => {
   const $34 = teamMembers => $35 => $36 => {
@@ -10551,7 +10692,7 @@ function PullRequest_requestReviewers($0, $1, $2, $3, $4, $5, $6, $7) {
      break;
     }
     case 0: {
-     $38 = csegen_472()();
+     $38 = csegen_477()();
      break;
     }
    }
@@ -10580,10 +10721,10 @@ function PullRequest_requestReviewers($0, $1, $2, $3, $4, $5, $6, $7) {
        break;
       }
      }
-     const $59 = Prelude_Interfaces_when(csegen_65()(), $5e, () => $61 => $62 => Data_Promise_x3ex3ex3d_Monad_Promise($65 => $66 => Data_Promise_map_Functor_Promise($69 => (undefined), $6b => $6c => FFI_GitHub_addPullReviewers($1, $0.a2, $0.a3, $2.a1, $4d, $53, $6b, $6c), $65, $66), $7c => Prelude_Interfaces_when(csegen_65()(), $0.a8, () => $84 => $85 => {
+     const $59 = Prelude_Interfaces_when(csegen_65()(), $5e, () => $61 => $62 => Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($65 => $66 => Data_Promise_map_Functor_x28Promisex20x24ex29($69 => (undefined), $6b => $6c => FFI_GitHub_addPullReviewers($1, $0.a2, $0.a3, $2.a1, $4d, $53, $6b, $6c), $65, $66), $7c => Prelude_Interfaces_when(csegen_65()(), $0.a8, () => $84 => $85 => {
       switch(chosenUser.h) {
-       case undefined: /* just */ return FFI_GitHub_createComment($1, $0.a2, $0.a3, $2.a1, PullRequest_n__9720_1963_prComment($1, $5, $4, $3, $2, $0, chosenUser.a1), $84, $85);
-       case 0: /* nothing */ return Data_Promise_pure_Applicative_Promise(undefined, $84, $85);
+       case undefined: /* just */ return FFI_GitHub_createComment($1, $0.a2, $0.a3, $2.a1, PullRequest_n__9870_1984_prComment($1, $5, $4, $3, $2, $0, chosenUser.a1), $84, $85);
+       case 0: /* nothing */ return Data_Promise_pure_Applicative_x28Promisex20x24ex29(undefined, $84, $85);
       }
      }), $61, $62));
      const $a0 = $a1 => {
@@ -10601,29 +10742,29 @@ function PullRequest_requestReviewers($0, $1, $2, $3, $4, $5, $6, $7) {
       let $a2;
       switch($a3) {
        case 1: {
-        $a2 = () => $a8 => $a9 => $aa => Data_Promise_liftIO_HasIO_Promise($ad => Prelude_IO_prim__putStr((Util_renderString($0, Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_color(3), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('Could not pick a user from the given Team ')), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('(perhaps the only option was the author of the pull request?).'), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(Prelude_Types_foldMap_Foldable_List(csegen_50()(), $cb => $cb, {a1: 'Requested review from ', a2: {a1: PullRequest_n__9720_1964_teamNotice($1, $5, $4, $3, $2, $0, $53), a2: {a1: ' for the open PR ', a2: {h: 0}}}})), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(Prelude_Types_foldMap_Foldable_List(csegen_50()(), $e4 => $e4, {a1: 'for the current branch (', a2: {a1: Data_PullRequest_rf__webURI($0, $2), a2: {a1: ').', a2: {h: 0}}}})), a2: {h: 0}}}}}))+'\n'), $ad), $a8, $a9, $aa);
+        $a2 = () => $a8 => $a9 => $aa => Data_Promise_liftIO_HasIO_x28Promisex20x24ex29($ad => Prelude_IO_prim__putStr((Util_renderString($0, Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_color(3), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('Could not pick a user from the given Team ')), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('(perhaps the only option was the author of the pull request?).'), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(Prelude_Types_foldMap_Foldable_List(csegen_50()(), $cb => $cb, {a1: 'Requested review from ', a2: {a1: PullRequest_n__9870_1985_teamNotice($1, $5, $4, $3, $2, $0, $53), a2: {a1: ' for the open PR ', a2: {h: 0}}}})), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(Prelude_Types_foldMap_Foldable_List(csegen_50()(), $e4 => $e4, {a1: 'for the current branch (', a2: {a1: Data_PullRequest_rf__webURI($0, $2), a2: {a1: ').', a2: {h: 0}}}})), a2: {h: 0}}}}}))+'\n'), $ad), $a8, $a9, $aa);
         break;
        }
        case 0: {
-        $a2 = () => $f5 => $f6 => $f7 => Data_Promise_liftIO_HasIO_Promise($fa => Prelude_IO_prim__putStr((Util_renderString($0, Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(Prelude_Types_foldMap_Foldable_List(csegen_50()(), $10b => $10b, {a1: 'Requested review from ', a2: {a1: PullRequest_n__9720_1965_userNotice($1, $5, $4, $3, $2, $0, chosenUser), a2: {a1: PullRequest_n__9720_1964_teamNotice($1, $5, $4, $3, $2, $0, $53), a2: {a1: ' for the open PR ', a2: {h: 0}}}}})), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(Prelude_Types_foldMap_Foldable_List(csegen_50()(), $12e => $12e, {a1: 'for the current branch (', a2: {a1: Data_PullRequest_rf__webURI($0, $2), a2: {a1: ').', a2: {h: 0}}}})), a2: {h: 0}}}))+'\n'), $fa), $f5, $f6, $f7);
+        $a2 = () => $f5 => $f6 => $f7 => Data_Promise_liftIO_HasIO_x28Promisex20x24ex29($fa => Prelude_IO_prim__putStr((Util_renderString($0, Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(Prelude_Types_foldMap_Foldable_List(csegen_50()(), $10b => $10b, {a1: 'Requested review from ', a2: {a1: PullRequest_n__9870_1986_userNotice($1, $5, $4, $3, $2, $0, chosenUser), a2: {a1: PullRequest_n__9870_1985_teamNotice($1, $5, $4, $3, $2, $0, $53), a2: {a1: ' for the open PR ', a2: {h: 0}}}}})), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(Prelude_Types_foldMap_Foldable_List(csegen_50()(), $12e => $12e, {a1: 'for the current branch (', a2: {a1: Data_PullRequest_rf__webURI($0, $2), a2: {a1: ').', a2: {h: 0}}}})), a2: {h: 0}}}))+'\n'), $fa), $f5, $f6, $f7);
         break;
        }
       }
       return $a2();
      };
-     return Data_Promise_x3ex3ex3d_Monad_Promise($59, $a0, $56, $57);
+     return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($59, $a0, $56, $57);
     };
    };
-   return Data_Promise_x3ex3ex3d_Monad_Promise($38, $4c, $35, $36);
+   return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($38, $4c, $35, $36);
   };
-  return Data_Promise_x3ex3ex3d_Monad_Promise($1a => $1b => Data_Promise_map_Functor_Promise($1e => Prelude_Types_join_Monad_List($1e), Prelude_Types_traverse_Traversable_List(csegen_65()(), $27 => $28 => $29 => FFI_GitHub_listTeamMembers($1, $0.a2, $27, $28, $29), $3), $1a, $1b), $34, $15, $16);
+  return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($1a => $1b => Data_Promise_map_Functor_x28Promisex20x24ex29($1e => Prelude_Types_join_Monad_List($1e), Prelude_Types_traverse_Traversable_List(csegen_65()(), $27 => $28 => $29 => FFI_GitHub_forceListTeamMembers($1, $0.a2, $27, $28, $29), $3), $1a, $1b), $34, $15, $16);
  };
- return Data_Promise_x3ex3ex3d_Monad_Promise($a => $b => PullRequest_listReviewers($0, $1, 4n, 100n, $a, $b), $13, $6, $7);
+ return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($a => $b => PullRequest_listReviewers($0, $1, 4n, 100n, $a, $b), $13, $6, $7);
 }
 
-/* PullRequest.partition' : Pagination _ _ _ () -> Promise PRHistory */
+/* PullRequest.partition' : Pagination _ _ _ () -> Promise' PRHistory */
 function PullRequest_partitionx27($0, $1, $2) {
- return Data_Promise_map_Functor_Promise($5 => PullRequest_partition($5), $9 => $a => PullRequest_listx27({h: 0}, $0, $9, $a), $1, $2);
+ return Data_Promise_map_Functor_x28Promisex20x24ex29($5 => PullRequest_partition($5), $9 => $a => PullRequest_listx27({h: 0}, $0, $9, $a), $1, $2);
 }
 
 /* PullRequest.partition : List PullRequest -> PRHistory */
@@ -10631,55 +10772,55 @@ function PullRequest_partition($0) {
  return Prelude_Basics_uncurry($3 => $4 => ({a1: $3, a2: $4}), Data_List_partition($a => Data_PullRequest_x3dx3d_Eq_PRState($a.a5, 0), $0));
 }
 
-/* PullRequest.listReviewers : Config => Octokit => {default 0 _ : Nat} -> Fin 101 -> Promise (List String,
+/* PullRequest.listReviewers : Config => Octokit => {default 0 _ : Nat} -> Fin 101 -> Promise' (List String,
 List String) */
 function PullRequest_listReviewers($0, $1, $2, $3, $4, $5) {
- return Data_Promise_map_Functor_Promise($8 => PullRequest_rf__allReviewers($8), PullRequest_listPartitionedPRs($0, $1, $2, $3), $4, $5);
+ return Data_Promise_map_Functor_x28Promisex20x24ex29($8 => PullRequest_rf__allReviewers($8), PullRequest_listPartitionedPRs($0, $1, $2, $3), $4, $5);
 }
 
-/* PullRequest.listPartitionedPRs : Config => Octokit => {default 0 _ : Nat} -> Fin 101 -> Promise PRHistory */
+/* PullRequest.listPartitionedPRs : Config => Octokit => {default 0 _ : Nat} -> Fin 101 -> Promise' PRHistory */
 function PullRequest_listPartitionedPRs($0, $1, $2, $3) {
- return PullRequest_with__listPartitionedPRs_1547($3, $2, {a1: Data_Nat_isLT(0n, $3), a2: Data_Nat_isLT(0n, $2)}, $1, $0);
+ return PullRequest_with__listPartitionedPRs_1554($3, $2, {a1: Data_Nat_isLT(0n, $3), a2: Data_Nat_isLT(0n, $2)}, $1, $0);
 }
 
 /* PullRequest.listOpenPRs : Config => Octokit => {default 0 _ : Nat} ->
-Fin 101 -> Promise (List PullRequest) */
+Fin 101 -> Promise' (List PullRequest) */
 function PullRequest_listOpenPRs($0, $1, $2, $3) {
- return PullRequest_with__listOpenPRs_1375($3, $2, {a1: Data_Nat_isLT(0n, $3), a2: Data_Nat_isLT(0n, $2)}, $1, $0);
+ return PullRequest_with__listOpenPRs_1380($3, $2, {a1: Data_Nat_isLT(0n, $3), a2: Data_Nat_isLT(0n, $2)}, $1, $0);
 }
 
-/* PullRequest.list' : Maybe GitHubPRState -> Pagination _ _ _ () -> Promise (List PullRequest) */
+/* PullRequest.list' : Maybe GitHubPRState -> Pagination _ _ _ () -> Promise' (List PullRequest) */
 function PullRequest_listx27($0, $1, $2, $3) {
  const $43 = prJsons => $44 => $45 => {
   const $47 = $48 => {
-   const $4f = b => a => func => $50 => {
-    switch($50.h) {
-     case 0: /* Left */ return {h: 0 /* Left */, a1: $50.a1};
-     case 1: /* Right */ return {h: 1 /* Right */, a1: func($50.a1)};
+   const $4d = b => a => func => $4e => {
+    switch($4e.h) {
+     case 0: /* Left */ return {h: 0 /* Left */, a1: $4e.a1};
+     case 1: /* Right */ return {h: 1 /* Right */, a1: func($4e.a1)};
     }
    };
-   const $59 = b => a => $5a => $5b => {
-    switch($5a.h) {
-     case 0: /* Left */ return {h: 0 /* Left */, a1: $5a.a1};
+   const $57 = b => a => $58 => $59 => {
+    switch($58.h) {
+     case 0: /* Left */ return {h: 0 /* Left */, a1: $58.a1};
      case 1: /* Right */ {
-      switch($5b.h) {
-       case 1: /* Right */ return {h: 1 /* Right */, a1: $5a.a1($5b.a1)};
-       case 0: /* Left */ return {h: 0 /* Left */, a1: $5b.a1};
+      switch($59.h) {
+       case 1: /* Right */ return {h: 1 /* Right */, a1: $58.a1($59.a1)};
+       case 0: /* Left */ return {h: 0 /* Left */, a1: $59.a1};
       }
      }
     }
    };
-   const $4e = {a1: $4f, a2: a => $57 => ({h: 1 /* Right */, a1: $57}), a3: $59};
-   const $4c = Prelude_Types_traverse_Traversable_List($4e, csegen_427(), prJsons);
-   return Data_Promise_either(csegen_52(), $4c, $48);
+   const $4c = {a1: $4d, a2: a => $55 => ({h: 1 /* Right */, a1: $55}), a3: $57};
+   const $4a = Prelude_Types_traverse_Traversable_List($4c, csegen_432(), prJsons);
+   return Data_Promise_either($4a, $48);
   };
-  return Data_Promise_x3ex3ex3d_Monad_Promise($47, pulls => $68 => $69 => Data_Promise_pure_Applicative_Promise(Prelude_Types_join_Monad_List(pulls), $68, $69), $44, $45);
+  return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($47, pulls => $66 => $67 => Data_Promise_pure_Applicative_x28Promisex20x24ex29(Prelude_Types_join_Monad_List(pulls), $66, $67), $44, $45);
  };
- return Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Basics_flip(csegen_407(), $a => $b => $c => FFI_Concurrency_promiseAll({a1: acc => elem => func => init => input => Data_Pagination_foldr_Foldable_x28x28x28Paginationx20x24itemsx29x20x24perPagex29x20x24pagex29(func, init, input), a2: elem => acc => func => init => input => Data_Pagination_foldl_Foldable_x28x28x28Paginationx20x24itemsx29x20x24perPagex29x20x24pagex29(func, init, input), a3: elem => $1a => Data_Pagination_null_Foldable_x28x28x28Paginationx20x24itemsx29x20x24perPagex29x20x24pagex29($1a), a4: elem => acc => m => $1e => funcM => init => input => Data_Pagination_foldlM_Foldable_x28x28x28Paginationx20x24itemsx29x20x24perPagex29x20x24pagex29($1e, funcM, init, input), a5: elem => $25 => Data_Pagination_toList_Foldable_x28x28x28Paginationx20x24itemsx29x20x24perPagex29x20x24pagex29($25), a6: a => m => $29 => f => $2a => Data_Pagination_foldMap_Foldable_x28x28x28Paginationx20x24itemsx29x20x24perPagex29x20x24pagex29($29, f, $2a)}, $a, $b, $c), Data_Pagination_traversex27(csegen_65()(), $38 => $39 => $3a => $3b => PullRequest_forkedPRs($0, $38, $39, $3a, $3b), $1)), $43, $2, $3);
+ return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(Prelude_Basics_flip(csegen_411(), $a => $b => $c => FFI_Concurrency_promiseAll({a1: acc => elem => func => init => input => Data_Pagination_foldr_Foldable_x28x28x28Paginationx20x24itemsx29x20x24perPagex29x20x24pagex29(func, init, input), a2: elem => acc => func => init => input => Data_Pagination_foldl_Foldable_x28x28x28Paginationx20x24itemsx29x20x24perPagex29x20x24pagex29(func, init, input), a3: elem => $1a => Data_Pagination_null_Foldable_x28x28x28Paginationx20x24itemsx29x20x24perPagex29x20x24pagex29($1a), a4: elem => acc => m => $1e => funcM => init => input => Data_Pagination_foldlM_Foldable_x28x28x28Paginationx20x24itemsx29x20x24perPagex29x20x24pagex29($1e, funcM, init, input), a5: elem => $25 => Data_Pagination_toList_Foldable_x28x28x28Paginationx20x24itemsx29x20x24perPagex29x20x24pagex29($25), a6: a => m => $29 => f => $2a => Data_Pagination_foldMap_Foldable_x28x28x28Paginationx20x24itemsx29x20x24perPagex29x20x24pagex29($29, f, $2a)}, $a, $b, $c), Data_Pagination_traversex27(csegen_65()(), $38 => $39 => $3a => $3b => PullRequest_forkedPRs($0, $38, $39, $3a, $3b), $1)), $43, $2, $3);
 }
 
 /* PullRequest.identifyOrCreatePR : Config => Git => Octokit => {default False _ : Bool} ->
-String -> Promise (IdentifiedOrCreated, PullRequest) */
+String -> Promise' (IdentifiedOrCreated, PullRequest) */
 function PullRequest_identifyOrCreatePR($0, $1, $2, $3, $4, $5, $6) {
  const $10 = $11 => $12 => {
   switch($11.h) {
@@ -10708,22 +10849,22 @@ function PullRequest_identifyOrCreatePR($0, $1, $2, $3, $4, $5, $6) {
         }
        }
        const $17 = Prelude_Interfaces_when(csegen_65()(), $1c, () => $21 => $22 => Data_Promise_reject('There is already a PR for the current branch and Harmony does not currently support converting existing PRs to drafts.', $21, $22));
-       return Data_Promise_x3ex3ex3d_Monad_Promise($17, $28 => $29 => $2a => Data_Promise_pure_Applicative_Promise({a1: 0, a2: $11.a1}, $29, $2a), $12, $14);
+       return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($17, $28 => $29 => $2a => Data_Promise_pure_Applicative_x28Promisex20x24ex29({a1: 0, a2: $11.a1}, $29, $2a), $12, $14);
       }
       default: return Data_Promise_reject('Multiple PRs for the current brach. Harmony only handles 1 PR per branch currently.', $12, $14);
      }
     };
    }
-   case 0: /* nil */ return $37 => Data_Promise_map_Functor_Promise($3a => ({a1: 1, a2: $3a}), $3e => $3f => PullRequest_n__10410_2626_createPR($1, $2, $4, $3, $0, $3e, $3f), $12, $37);
+   case 0: /* nil */ return $37 => Data_Promise_map_Functor_x28Promisex20x24ex29($3a => ({a1: 1, a2: $3a}), $3e => $3f => PullRequest_n__10575_2662_createPR($1, $2, $4, $3, $0, $3e, $3f), $12, $37);
    default: return $4a => Data_Promise_reject('Multiple PRs for the current brach. Harmony only handles 1 PR per branch currently.', $12, $4a);
   }
  };
- return Data_Promise_x3ex3ex3d_Monad_Promise(FFI_GitHub_listPRsForBranch($2, $0.a2, $0.a3, $4), $10, $5, $6);
+ return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(FFI_GitHub_listPRsForBranch($2, $0.a2, $0.a3, $4), $10, $5, $6);
 }
 
-/* PullRequest.forkedPRs : Maybe GitHubPRState -> Nat -> Nat -> Nat -> () -> Promise Future */
+/* PullRequest.forkedPRs : Maybe GitHubPRState -> Nat -> Nat -> Nat -> () -> Promise' Future */
 function PullRequest_forkedPRs($0, $1, $2, $3, $4) {
- return FFI_Concurrency_fork(csegen_73()(), Prelude_Types_foldMap_Foldable_List(csegen_50()(), $f => $f, {a1: 'pulls --json ', a2: {a1: PullRequest_n__8926_1169_filterString($3, $4, $2, $1, $0), a2: {a1: ' ', a2: {a1: Prelude_Show_show_Show_Nat($1), a2: {a1: ' ', a2: {a1: Prelude_Show_show_Show_Nat($2), a2: {h: 0}}}}}}}));
+ return FFI_Concurrency_fork(csegen_73()(), Prelude_Types_foldMap_Foldable_List(csegen_50()(), $f => $f, {a1: 'pulls --json ', a2: {a1: PullRequest_n__9055_1169_filterString($3, $4, $2, $1, $0), a2: {a1: ' ', a2: {a1: Prelude_Show_show_Show_Nat($1), a2: {a1: ' ', a2: {a1: Prelude_Show_show_Show_Nat($2), a2: {h: 0}}}}}}}));
 }
 
 /* PullRequest.empty : PRHistory */
@@ -10731,9 +10872,9 @@ const PullRequest_empty = __lazy(function () {
  return {a1: {h: 0}, a2: {h: 0}};
 });
 
-/* PullRequest.countReviewsByEachUser : Config => Octokit => List PullRequest -> Promise (SortedMap String Nat) */
+/* PullRequest.countReviewsByEachUser : Config => Octokit => List PullRequest -> Promise' (SortedMap String Nat) */
 function PullRequest_countReviewsByEachUser($0, $1) {
- return Prelude_Interfaces_x3cx3dx3c(csegen_70()(), $7 => $8 => $9 => Data_Promise_pure_Applicative_Promise(Data_SortedMap_map_Functor_x28SortedMapx20x24kx29($e => Prelude_Types_List_lengthTR($e), $7), $8, $9), $15 => $16 => $17 => PullRequest_reviewsByEachUser($0, $1, $15, $16, $17));
+ return Prelude_Interfaces_x3cx3dx3c(csegen_70()(), $7 => $8 => $9 => Data_Promise_pure_Applicative_x28Promisex20x24ex29(Data_SortedMap_map_Functor_x28SortedMapx20x24kx29($e => Prelude_Types_List_lengthTR($e), $7), $8, $9), $15 => $16 => $17 => PullRequest_reviewsByEachUser($0, $1, $15, $16, $17));
 }
 
 /* PullRequest.combined : PRHistory -> List PullRequest */
@@ -10855,41 +10996,41 @@ function Data_List_DeleteBy_deleteByx27($0, $1, $2) {
  }
 }
 
-/* FFI.Concurrency.5687:4169:both */
-function FFI_Concurrency_n__5687_4169_both($0, $1, $2, $3, $4) {
+/* FFI.Concurrency.5709:4169:both */
+function FFI_Concurrency_n__5709_4169_both($0, $1, $2, $3, $4) {
  return $0.a1.a2(undefined)(undefined)($0.a2(undefined)($13 => FFI_Concurrency_prim__singleton($3, $13)))(xx27 => $0.a1.a2(undefined)(undefined)($0.a1.a2(undefined)(undefined)($4)($2b => $0.a2(undefined)($31 => FFI_Concurrency_prim__both(xx27, $2b, $31))))(nested => $0.a2(undefined)($3c => FFI_Concurrency_prim__flatten(nested, $3c))));
 }
 
-/* FFI.Concurrency.promiseAll : Foldable t => t Future -> Promise (List JSON) */
+/* FFI.Concurrency.promiseAll : Foldable t => t Future -> Promise' (List JSON) */
 function FFI_Concurrency_promiseAll($0, $1, $2, $3) {
  const $c = f => $d => $e => {
   const $21 = str => $22 => $23 => {
    const $25 = $26 => {
-    const $2b = JSON_Parser_parseJSON({h: 0}, str);
-    let $2a;
-    switch($2b.h) {
+    const $29 = JSON_Parser_parseJSON({h: 0}, str);
+    let $28;
+    switch($29.h) {
      case 0: /* Left */ {
-      $2a = {h: 0 /* Left */, a1: Prelude_Types_foldMap_Foldable_List(csegen_50()(), $35 => $35, {a1: 'Failed to parse JSON from ', a2: {a1: str, a2: {h: 0}}})};
+      $28 = {h: 0 /* Left */, a1: Prelude_Types_foldMap_Foldable_List(csegen_50()(), $33 => $33, {a1: 'Failed to parse JSON from ', a2: {a1: str, a2: {h: 0}}})};
       break;
      }
      case 1: /* Right */ {
-      $2a = {h: 1 /* Right */, a1: $2b.a1};
+      $28 = {h: 1 /* Right */, a1: $29.a1};
       break;
      }
     }
-    return Data_Promise_either(csegen_52(), $2a, $26);
+    return Data_Promise_either($28, $26);
    };
-   const $3d = $3e => $3f => $40 => {
-    switch($3e.h) {
-     case 5: /* JArray */ return Data_Promise_pure_Applicative_Promise($3e.a1, $3f, $40);
-     default: return Data_Promise_reject(Prelude_Types_foldMap_Foldable_List(csegen_50()(), $4d => $4d, {a1: 'Expected a JSON array from futures but got ', a2: {a1: JSON_Parser_showImpl($3e), a2: {a1: '.', a2: {h: 0}}}}), $3f, $40);
+   const $3b = $3c => $3d => $3e => {
+    switch($3c.h) {
+     case 5: /* JArray */ return Data_Promise_pure_Applicative_x28Promisex20x24ex29($3c.a1, $3d, $3e);
+     default: return Data_Promise_reject(Prelude_Types_foldMap_Foldable_List(csegen_50()(), $4b => $4b, {a1: 'Expected a JSON array from futures but got ', a2: {a1: JSON_Parser_showImpl($3c), a2: {a1: '.', a2: {h: 0}}}}), $3d, $3e);
     }
    };
-   return Data_Promise_x3ex3ex3d_Monad_Promise($25, $3d, $22, $23);
+   return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($25, $3b, $22, $23);
   };
-  return Data_Promise_x3ex3ex3d_Monad_Promise($11 => $12 => Data_Promise_promisify(ok => err => $15 => FFI_Concurrency_prim__awaitStringify(f, x => ok(x), y => err(y), $15), $11, $12), $21, $d, $e);
+  return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($11 => $12 => Data_Promise_promisify(ok => err => $15 => FFI_Concurrency_prim__awaitStringify(f, x => ok(x), y => err(y), $15), $11, $12), $21, $d, $e);
  };
- return Data_Promise_x3ex3ex3d_Monad_Promise(FFI_Concurrency_all(csegen_73()(), $0, $1), $c, $2, $3);
+ return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(FFI_Concurrency_all(csegen_73()(), $0, $1), $c, $2, $3);
 }
 
 /* FFI.Concurrency.fork : HasIO io => String -> io Future */
@@ -10899,7 +11040,7 @@ function FFI_Concurrency_fork($0, $1) {
 
 /* FFI.Concurrency.all : HasIO io => Foldable t => t Future -> io Future */
 function FFI_Concurrency_all($0, $1, $2) {
- return $1.a1(undefined)(undefined)($c => $d => FFI_Concurrency_n__5687_4169_both($0, $1, $2, $c, $d))($0.a2(undefined)($1a => FFI_Concurrency_prim__neutral($1a)))($2);
+ return $1.a1(undefined)(undefined)($c => $d => FFI_Concurrency_n__5709_4169_both($0, $1, $2, $c, $d))($0.a2(undefined)($1a => FFI_Concurrency_prim__neutral($1a)))($2);
 }
 
 /* Data.SortedMap.map */
@@ -11222,14 +11363,14 @@ function Data_Pagination_divNatNZLemma($0, $1, $2) {
  }
 }
 
-/* Label.addLabels : Config => Octokit => PullRequest -> List String -> Promise (List String) */
+/* Label.addLabels : Config => Octokit => PullRequest -> List String -> Promise' (List String) */
 function Label_addLabels($0, $1, $2, $3, $4, $5) {
  return FFI_GitHub_addPullLabels($1, $0.a2, $0.a3, $2.a1, $3, $4, $5);
 }
 
 /* Graph.6873:6647:pendingDot */
 function Graph_n__6873_6647_pendingDot($0, $1, $2, $3, $4, $5, $6) {
- return Theme_theme($6, csegen_550(), csegen_548(), 6)(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('\u{b7}'));
+ return Theme_theme($6, csegen_556(), csegen_554(), 6)(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('\u{b7}'));
 }
 
 /* Graph.6873:6646:note */
@@ -11239,7 +11380,7 @@ function Graph_n__6873_6646_note($0, $1, $2, $3, $4, $5, $6, $7) {
 
 /* Graph.6873:6645:missedDot */
 function Graph_n__6873_6645_missedDot($0, $1, $2, $3, $4, $5, $6) {
- return Theme_theme($6, csegen_549(), csegen_549(), 7)(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('\u{25e6}'));
+ return Theme_theme($6, csegen_555(), csegen_555(), 7)(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('\u{25e6}'));
 }
 
 /* Graph.6873:6644:maxValue */
@@ -11268,7 +11409,7 @@ function Graph_n__6873_6643_header($0, $1, $2, $3, $4, $5, $6) {
    break;
   }
  }
- const $37 = {a1: $38, a2: {a1: {a1: Text_PrettyPrint_Prettyprinter_Symbols_parens(Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Graph_n__6873_6645_missedDot($0, $1, $2, $3, $4, $5, $6), Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('overlayed on'), Graph_n__6873_6647_pendingDot($0, $1, $2, $3, $4, $5, $6))))}, a2: csegen_616()}};
+ const $37 = {a1: $38, a2: {a1: {a1: Text_PrettyPrint_Prettyprinter_Symbols_parens(Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Graph_n__6873_6645_missedDot($0, $1, $2, $3, $4, $5, $6), Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('overlayed on'), Graph_n__6873_6647_pendingDot($0, $1, $2, $3, $4, $5, $6))))}, a2: csegen_622()}};
  const $25 = {a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('1x the number of closed PRs with unanswered review requests'), Text_PrettyPrint_Prettyprinter_Symbols_parens(Graph_n__6873_6645_missedDot($0, $1, $2, $3, $4, $5, $6)))}, a2: $37};
  const $13 = {a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('4x the number of open review requests'), Text_PrettyPrint_Prettyprinter_Symbols_parens(Graph_n__6873_6647_pendingDot($0, $1, $2, $3, $4, $5, $6)))}, a2: $25};
  const $e = {a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('Weighted review workload.')}, a2: $13};
@@ -11279,7 +11420,7 @@ function Graph_n__6873_6643_header($0, $1, $2, $3, $4, $5, $6) {
 
 /* Graph.6476:6247:header */
 function Graph_n__6476_6247_header($0, $1, $2, $3) {
- return Text_PrettyPrint_Prettyprinter_Doc_vsep(Data_List_catMaybes({a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc()}, a2: {a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('Open Pull Requests grouped by month created.')}, a2: {a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc()}, a2: csegen_616()}}}));
+ return Text_PrettyPrint_Prettyprinter_Doc_vsep(Data_List_catMaybes({a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc()}, a2: {a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('Open Pull Requests grouped by month created.')}, a2: {a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc()}, a2: csegen_622()}}}));
 }
 
 /* Graph.6476:6246:graphable */
@@ -11302,20 +11443,20 @@ function Graph_n__6026_5865_countInParens($0, $1, $2) {
 
 /* Graph.6873:6641:completedBox */
 function Graph_n__6873_6641_completedBox($0, $1, $2, $3, $4, $5, $6) {
- return Theme_theme($6, csegen_529(), csegen_529(), 3)(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('\u{25aa}'));
+ return Theme_theme($6, csegen_535(), csegen_535(), 3)(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('\u{25aa}'));
 }
 
 /* Graph.6026:5864:coloredLabel */
 function Graph_n__6026_5864_coloredLabel($0, $1, $2) {
  switch((($2.a2===0n)?1:0)) {
-  case 1: return Theme_theme($0, csegen_529(), csegen_529(), 0)($1.a1(undefined)($2.a1));
+  case 1: return Theme_theme($0, csegen_535(), csegen_535(), 0)($1.a1(undefined)($2.a1));
   case 0: {
    switch(Prelude_Types_x3c_Ord_Nat($2.a2, 2n)) {
     case 1: return $1.a1(undefined)($2.a1);
     case 0: {
      switch(Prelude_Types_x3c_Ord_Nat($2.a2, 6n)) {
-      case 1: return Theme_theme($0, csegen_550(), csegen_548(), 1)($1.a1(undefined)($2.a1));
-      case 0: return Theme_theme($0, csegen_549(), csegen_549(), 2)($1.a1(undefined)($2.a1));
+      case 1: return Theme_theme($0, csegen_556(), csegen_554(), 1)($1.a1(undefined)($2.a1));
+      case 0: return Theme_theme($0, csegen_555(), csegen_555(), 2)($1.a1(undefined)($2.a1));
      }
     }
    }
@@ -11429,9 +11570,9 @@ function Graph_reviewsGraph($0, $1, $2, $3, $4, $5, $6) {
 
 /* Graph.healthGraph : Config => List PullRequest -> String -> String -> Doc AnsiStyle */
 function Graph_healthGraph($0, $1, $2, $3) {
- const $4 = Data_List_groupBy($7 => $8 => Prelude_Basics_on($b => $c => Prelude_Basics_on($f => $10 => (($f===$10)?1:0), $14 => $14.a2, $b, $c), csegen_513(), $7, $8), Data_List_sortBy(csegen_514(), $1));
+ const $4 = Data_List_groupBy($7 => $8 => Prelude_Basics_on($b => $c => Prelude_Basics_on($f => $10 => (($f===$10)?1:0), $14 => $14.a2, $b, $c), csegen_519(), $7, $8), Data_List_sortBy(csegen_520(), $1));
  const $21 = Prelude_Types_foldr_Foldable_List(xs => m => Prelude_Types_max_Ord_Nat(Data_List1_length(xs), m), 1n, $4);
- return Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Graph_n__6476_6247_header($3, $2, $1, $0), a2: {a1: Graph_graph($0, {a1: $39 => Graph_totalWidth_Graphable_x28PRsOnDatex20x24dateTyx29($0, csegen_634(), $39), a2: $40 => Graph_label_Graphable_x28PRsOnDatex20x24dateTyx29($0, csegen_634(), $40), a3: $47 => Graph_score_Graphable_x28PRsOnDatex20x24dateTyx29($0, csegen_634(), $47), a4: $4e => Graph_detractor_Graphable_x28PRsOnDatex20x24dateTyx29($0, csegen_634(), $4e), a5: $55 => Graph_bonus_Graphable_x28PRsOnDatex20x24dateTyx29($0, csegen_634(), $55)}, $21, Graph_n__6476_6249_unfoldGraph($3, $2, $1, $0, Data_Fuel_limit(48n), $4, {h: 0})), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(Graph_n__6476_6248_link($3, $2, $1, $0)), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {h: 0}}}}}});
+ return Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Graph_n__6476_6247_header($3, $2, $1, $0), a2: {a1: Graph_graph($0, {a1: $39 => Graph_totalWidth_Graphable_x28PRsOnDatex20x24dateTyx29($0, csegen_640(), $39), a2: $40 => Graph_label_Graphable_x28PRsOnDatex20x24dateTyx29($0, csegen_640(), $40), a3: $47 => Graph_score_Graphable_x28PRsOnDatex20x24dateTyx29($0, csegen_640(), $47), a4: $4e => Graph_detractor_Graphable_x28PRsOnDatex20x24dateTyx29($0, csegen_640(), $4e), a5: $55 => Graph_bonus_Graphable_x28PRsOnDatex20x24dateTyx29($0, csegen_640(), $55)}, $21, Graph_n__6476_6249_unfoldGraph($3, $2, $1, $0, Data_Fuel_limit(48n), $4, {h: 0})), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(Graph_n__6476_6248_link($3, $2, $1, $0)), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {h: 0}}}}}});
 }
 
 /* Graph.graphOne : Config -> Graphable g => Nat -> g -> Doc AnsiStyle */
@@ -11448,7 +11589,7 @@ function Graph_graph($0, $1, $2, $3) {
 
 /* Graph.bar : Config -> Nat -> Nat -> Nat -> Nat -> Doc AnsiStyle */
 function Graph_bar($0, $1, $2, $3, $4) {
- return Text_PrettyPrint_Prettyprinter_Doc_indent(Number(_truncBigInt32($1)), Text_PrettyPrint_Prettyprinter_Doc_hcat({a1: Theme_theme($0, csegen_549(), csegen_549(), 7)(Text_PrettyPrint_Prettyprinter_Doc_hcat(Data_List_replicateTR({h: 0}, $3, Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_Char('\u{25e6}')))), a2: {a1: Theme_theme($0, csegen_550(), csegen_548(), 6)(Text_PrettyPrint_Prettyprinter_Doc_hcat(Data_List_replicateTR({h: 0}, $2, Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_Char('\u{b7}')))), a2: {a1: Theme_theme($0, csegen_529(), csegen_529(), 3)(Text_PrettyPrint_Prettyprinter_Doc_hcat(Data_List_replicateTR({h: 0}, $4, Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_Char('\u{25aa}')))), a2: {h: 0}}}}));
+ return Text_PrettyPrint_Prettyprinter_Doc_indent(Number(_truncBigInt32($1)), Text_PrettyPrint_Prettyprinter_Doc_hcat({a1: Theme_theme($0, csegen_555(), csegen_555(), 7)(Text_PrettyPrint_Prettyprinter_Doc_hcat(Data_List_replicateTR({h: 0}, $3, Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_Char('\u{25e6}')))), a2: {a1: Theme_theme($0, csegen_556(), csegen_554(), 6)(Text_PrettyPrint_Prettyprinter_Doc_hcat(Data_List_replicateTR({h: 0}, $2, Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_Char('\u{b7}')))), a2: {a1: Theme_theme($0, csegen_535(), csegen_535(), 3)(Text_PrettyPrint_Prettyprinter_Doc_hcat(Data_List_replicateTR({h: 0}, $4, Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_Char('\u{25aa}')))), a2: {h: 0}}}}));
 }
 
 /* AppVersion.printVersion : HasIO io => io () */
@@ -11458,7 +11599,7 @@ function AppVersion_printVersion($0) {
 
 /* AppVersion.appVersion : String */
 const AppVersion_appVersion = __lazy(function () {
- return '4.3.0';
+ return '4.4.0';
 });