@mattpolzin/harmony 5.7.0 → 5.8.0

This diff represents the content of publicly available package versions that have been released to one of the supported registries. The information contained in this diff is provided for informational purposes only and reflects changes between package versions as they appear in their respective public registries.
Files changed (4) hide show
  1. package/README.md +11 -6
  2. package/harmony +706 -629
  3. package/man/harmony.1 +21 -7
  4. package/package.json +1 -1
package/harmony CHANGED
@@ -657,7 +657,7 @@ const digIssues = issueJson =>
657
657
  issueJson.map(digIssue)
658
658
 
659
659
  // Create Issue
660
- // Executes callback with stringified JSON {"issue_number": Int, "author": String, "created_at": Date, "title": String, "assignee": String?}
660
+ // Executes callback with stringified JSON {"issue_number": Int, "author": String, "created_at": Date, "title": String, "body": String?, "assignee": String?}
661
661
  const okit_create_issue = (octokit, owner, repo, title, body, onSuccess, onFailure) =>
662
662
  idris__okit_unpromisify(
663
663
  octokit.rest.issues.create({ owner, repo, title, body }),
@@ -666,7 +666,7 @@ const okit_create_issue = (octokit, owner, repo, title, body, onSuccess, onFailu
666
666
  )
667
667
 
668
668
  // Get a single Issue
669
- // Executes callback with stringified JSON {"issue_number": Int, "author": String, "created_at": Date, "title": String, "assignee": String?}
669
+ // Executes callback with stringified JSON {"issue_number": Int, "author": String, "created_at": Date, "title": String, "body": String?, "assignee": String?}
670
670
  const okit_get_issue = (octokit, owner, repo, issue_number, onSuccess, onFailure) =>
671
671
  idris__okit_unpromisify(
672
672
  octokit.rest.issues.get({ owner, repo, issue_number }),
@@ -1021,7 +1021,7 @@ function x24tcOpt_1($0) {
1021
1021
  case 0: return {h: 0 /* {TcDone:1} */, a1: $0.a5};
1022
1022
  default: {
1023
1023
  const $17 = {a1: $0.a5.a1.a1, a2: $0.a5.a1.a2, a3: $0.a5.a1.a3};
1024
- const $1b = Data_List_DeleteBy_deleteByx27($1e => $1f => Prelude_Basics_on($0.a1.a1.a1, csegen_754(), $1e, $1f), $17, $0.a6);
1024
+ const $1b = Data_List_DeleteBy_deleteByx27($1e => $1f => Prelude_Basics_on($0.a1.a1.a1, csegen_759(), $1e, $1f), $17, $0.a6);
1025
1025
  switch($1b.a1.h) {
1026
1026
  case 0: /* nothing */ {
1027
1027
  switch($0.a8) {
@@ -1036,7 +1036,7 @@ function x24tcOpt_1($0) {
1036
1036
  }
1037
1037
  default: {
1038
1038
  const $64 = {a1: $0.a5.a1.a1, a2: $0.a5.a1.a2, a3: $0.a5.a1.a3};
1039
- const $68 = Data_List_DeleteBy_deleteByx27($6b => $6c => Prelude_Basics_on($0.a1.a1.a1, csegen_754(), $6b, $6c), $64, $0.a6);
1039
+ const $68 = Data_List_DeleteBy_deleteByx27($6b => $6c => Prelude_Basics_on($0.a1.a1.a1, csegen_759(), $6b, $6c), $64, $0.a6);
1040
1040
  switch($68.a1.h) {
1041
1041
  case 0: /* nothing */ {
1042
1042
  switch($0.a8) {
@@ -1061,7 +1061,7 @@ function x24tcOpt_1($0) {
1061
1061
  case 0: return {h: 0 /* {TcDone:1} */, a1: $0.a5};
1062
1062
  default: {
1063
1063
  const $b5 = {a1: $0.a5.a1.a1, a2: $0.a5.a1.a2, a3: $0.a5.a1.a3};
1064
- const $b9 = Data_List_DeleteBy_deleteByx27($bc => $bd => Prelude_Basics_on($0.a1.a1.a1, csegen_754(), $bc, $bd), $b5, $0.a6);
1064
+ const $b9 = Data_List_DeleteBy_deleteByx27($bc => $bd => Prelude_Basics_on($0.a1.a1.a1, csegen_759(), $bc, $bd), $b5, $0.a6);
1065
1065
  switch($b9.a1.h) {
1066
1066
  case 0: /* nothing */ {
1067
1067
  switch($0.a8) {
@@ -1076,7 +1076,7 @@ function x24tcOpt_1($0) {
1076
1076
  }
1077
1077
  default: {
1078
1078
  const $102 = {a1: $0.a5.a1.a1, a2: $0.a5.a1.a2, a3: $0.a5.a1.a3};
1079
- const $106 = Data_List_DeleteBy_deleteByx27($109 => $10a => Prelude_Basics_on($0.a1.a1.a1, csegen_754(), $109, $10a), $102, $0.a6);
1079
+ const $106 = Data_List_DeleteBy_deleteByx27($109 => $10a => Prelude_Basics_on($0.a1.a1.a1, csegen_759(), $109, $10a), $102, $0.a6);
1080
1080
  switch($106.a1.h) {
1081
1081
  case 0: /* nothing */ {
1082
1082
  switch($0.a8) {
@@ -1115,8 +1115,8 @@ function x24tcOpt_2($0) {
1115
1115
  }
1116
1116
  }
1117
1117
 
1118
- /* Data.List.7781:8363:splitRec */
1119
- function Data_List_n__7781_8363_splitRec($0, $1, $2, $3, $4) {
1118
+ /* Data.List.7787:8509:splitRec */
1119
+ function Data_List_n__7787_8509_splitRec($0, $1, $2, $3, $4) {
1120
1120
  return __tailRec(x24tcOpt_2, {h: 1 /* {TcContinue2:1} */, a1: $0, a2: $1, a3: $2, a4: $3, a5: $4});
1121
1121
  }
1122
1122
 
@@ -1339,8 +1339,8 @@ function x24tcOpt_5($0) {
1339
1339
  }
1340
1340
  }
1341
1341
 
1342
- /* Text.PrettyPrint.Prettyprinter.Doc.8979:8927:initialIndentation */
1343
- function Text_PrettyPrint_Prettyprinter_Doc_n__8979_8927_initialIndentation($0, $1, $2, $3) {
1342
+ /* Text.PrettyPrint.Prettyprinter.Doc.8985:8927:initialIndentation */
1343
+ function Text_PrettyPrint_Prettyprinter_Doc_n__8985_8927_initialIndentation($0, $1, $2, $3) {
1344
1344
  return __tailRec(x24tcOpt_5, {h: 1 /* {TcContinue5:1} */, a1: $0, a2: $1, a3: $2, a4: $3});
1345
1345
  }
1346
1346
 
@@ -1415,13 +1415,13 @@ function Prelude_Types_x3dx3d_Eq_x28Listx20x24ax29($0, $1, $2) {
1415
1415
  function x24tcOpt_8($0) {
1416
1416
  switch($0.a2.h) {
1417
1417
  case 0: /* Leaf */ return {h: 0 /* {TcDone:8} */, a1: $0.a1({a1: $0.a2.a1, a2: $0.a2.a2})};
1418
- case 1: /* Branch2 */ return {h: 1 /* {TcContinue8:1} */, a1: $9 => ({a1: $9, a2: Data_SortedMap_Dependent_n__6823_6782_treeToListx27($0.a1, $0.a2.a3)}), a2: $0.a2.a1};
1419
- case 2: /* Branch3 */ return {h: 1 /* {TcContinue8:1} */, a1: $11 => ({a1: $11, a2: Data_SortedMap_Dependent_n__6823_6782_treeToListx27($16 => ({a1: $16, a2: Data_SortedMap_Dependent_n__6823_6782_treeToListx27($0.a1, $0.a2.a5)}), $0.a2.a3)}), a2: $0.a2.a1};
1418
+ case 1: /* Branch2 */ return {h: 1 /* {TcContinue8:1} */, a1: $9 => ({a1: $9, a2: Data_SortedMap_Dependent_n__6828_9064_treeToListx27($0.a1, $0.a2.a3)}), a2: $0.a2.a1};
1419
+ case 2: /* Branch3 */ return {h: 1 /* {TcContinue8:1} */, a1: $11 => ({a1: $11, a2: Data_SortedMap_Dependent_n__6828_9064_treeToListx27($16 => ({a1: $16, a2: Data_SortedMap_Dependent_n__6828_9064_treeToListx27($0.a1, $0.a2.a5)}), $0.a2.a3)}), a2: $0.a2.a1};
1420
1420
  }
1421
1421
  }
1422
1422
 
1423
- /* Data.SortedMap.Dependent.6823:6782:treeToList' */
1424
- function Data_SortedMap_Dependent_n__6823_6782_treeToListx27($0, $1) {
1423
+ /* Data.SortedMap.Dependent.6828:9064:treeToList' */
1424
+ function Data_SortedMap_Dependent_n__6828_9064_treeToListx27($0, $1) {
1425
1425
  return __tailRec(x24tcOpt_8, {h: 1 /* {TcContinue8:1} */, a1: $0, a2: $1});
1426
1426
  }
1427
1427
 
@@ -1708,7 +1708,7 @@ function JSON_Parser_object($0, $1, $2) {
1708
1708
  }
1709
1709
 
1710
1710
  /* JSON.Parser.case block in object */
1711
- function JSON_Parser_case__object_20635($0, $1, $2, $3, $4, $5, $6) {
1711
+ function JSON_Parser_case__object_22917($0, $1, $2, $3, $4, $5, $6) {
1712
1712
  return __tailRec(x24tcOpt_14, {h: 2 /* {TcContinue14:2} */, a1: $0, a2: $1, a3: $2, a4: $3, a5: $4, a6: $5, a7: $6});
1713
1713
  }
1714
1714
 
@@ -1719,14 +1719,14 @@ function x24tcOpt_15($0) {
1719
1719
  case undefined: /* cons */ {
1720
1720
  switch(Prelude_Types_elemBy(csegen_147(), $0.a2, $0.a3.a1)($0.a1)) {
1721
1721
  case 1: return {h: 1 /* {TcContinue15:1} */, a1: $0.a1, a2: $0.a2, a3: $0.a3.a2};
1722
- case 0: return {h: 0 /* {TcDone:15} */, a1: {a1: $0.a3.a1, a2: Data_List_n__4928_5587_nubByx27({a1: $0.a3.a1, a2: $0.a1}, $0.a2, $0.a3.a2)}};
1722
+ case 0: return {h: 0 /* {TcDone:15} */, a1: {a1: $0.a3.a1, a2: Data_List_n__4934_5733_nubByx27({a1: $0.a3.a1, a2: $0.a1}, $0.a2, $0.a3.a2)}};
1723
1723
  }
1724
1724
  }
1725
1725
  }
1726
1726
  }
1727
1727
 
1728
- /* Data.List.4928:5587:nubBy' */
1729
- function Data_List_n__4928_5587_nubByx27($0, $1, $2) {
1728
+ /* Data.List.4934:5733:nubBy' */
1729
+ function Data_List_n__4934_5733_nubByx27($0, $1, $2) {
1730
1730
  return __tailRec(x24tcOpt_15, {h: 1 /* {TcContinue15:1} */, a1: $0, a2: $1, a3: $2});
1731
1731
  }
1732
1732
 
@@ -1756,7 +1756,7 @@ function x24tcOpt_16($0) {
1756
1756
  }
1757
1757
 
1758
1758
  /* Data.String.with block in ltrim */
1759
- function Data_String_with__ltrim_9718($0, $1) {
1759
+ function Data_String_with__ltrim_9864($0, $1) {
1760
1760
  return __tailRec(x24tcOpt_16, {h: 1 /* {TcContinue16:1} */, a1: $0, a2: $1});
1761
1761
  }
1762
1762
 
@@ -1868,16 +1868,16 @@ function x24tcOpt_21($0) {
1868
1868
  case 0: /* nil */ return {h: 0 /* {TcDone:21} */, a1: {a1: Prelude_Types_List_reverse($0.a2), a2: {h: 0}}};
1869
1869
  case undefined: /* cons */ {
1870
1870
  switch($0.a3.a1) {
1871
- case '\n': return {h: 0 /* {TcDone:21} */, a1: {a1: Prelude_Types_List_reverse($0.a2), a2: Data_String_n__3989_9556_linesHelp($0.a1, {h: 0}, $0.a3.a2)}};
1871
+ case '\n': return {h: 0 /* {TcDone:21} */, a1: {a1: Prelude_Types_List_reverse($0.a2), a2: Data_String_n__3989_9702_linesHelp($0.a1, {h: 0}, $0.a3.a2)}};
1872
1872
  case '\r': {
1873
1873
  switch($0.a3.a2.h) {
1874
1874
  case undefined: /* cons */ {
1875
1875
  switch($0.a3.a2.a1) {
1876
- case '\n': return {h: 0 /* {TcDone:21} */, a1: {a1: Prelude_Types_List_reverse($0.a2), a2: Data_String_n__3989_9556_linesHelp($0.a1, {h: 0}, $0.a3.a2.a2)}};
1877
- default: return {h: 0 /* {TcDone:21} */, a1: {a1: Prelude_Types_List_reverse($0.a2), a2: Data_String_n__3989_9556_linesHelp($0.a1, {h: 0}, $0.a3.a2)}};
1876
+ case '\n': return {h: 0 /* {TcDone:21} */, a1: {a1: Prelude_Types_List_reverse($0.a2), a2: Data_String_n__3989_9702_linesHelp($0.a1, {h: 0}, $0.a3.a2.a2)}};
1877
+ default: return {h: 0 /* {TcDone:21} */, a1: {a1: Prelude_Types_List_reverse($0.a2), a2: Data_String_n__3989_9702_linesHelp($0.a1, {h: 0}, $0.a3.a2)}};
1878
1878
  }
1879
1879
  }
1880
- default: return {h: 0 /* {TcDone:21} */, a1: {a1: Prelude_Types_List_reverse($0.a2), a2: Data_String_n__3989_9556_linesHelp($0.a1, {h: 0}, $0.a3.a2)}};
1880
+ default: return {h: 0 /* {TcDone:21} */, a1: {a1: Prelude_Types_List_reverse($0.a2), a2: Data_String_n__3989_9702_linesHelp($0.a1, {h: 0}, $0.a3.a2)}};
1881
1881
  }
1882
1882
  }
1883
1883
  default: return {h: 1 /* {TcContinue21:1} */, a1: $0.a1, a2: {a1: $0.a3.a1, a2: $0.a2}, a3: $0.a3.a2};
@@ -1892,16 +1892,16 @@ function x24tcOpt_21($0) {
1892
1892
  case 0: /* nil */ return {h: 0 /* {TcDone:21} */, a1: {a1: Prelude_Types_List_reverse($0.a2), a2: {h: 0}}};
1893
1893
  case undefined: /* cons */ {
1894
1894
  switch($0.a3.a1) {
1895
- case '\n': return {h: 0 /* {TcDone:21} */, a1: {a1: Prelude_Types_List_reverse($0.a2), a2: Data_String_n__3989_9556_linesHelp($0.a1, {h: 0}, $0.a3.a2)}};
1895
+ case '\n': return {h: 0 /* {TcDone:21} */, a1: {a1: Prelude_Types_List_reverse($0.a2), a2: Data_String_n__3989_9702_linesHelp($0.a1, {h: 0}, $0.a3.a2)}};
1896
1896
  case '\r': {
1897
1897
  switch($0.a3.a2.h) {
1898
1898
  case undefined: /* cons */ {
1899
1899
  switch($0.a3.a2.a1) {
1900
- case '\n': return {h: 0 /* {TcDone:21} */, a1: {a1: Prelude_Types_List_reverse($0.a2), a2: Data_String_n__3989_9556_linesHelp($0.a1, {h: 0}, $0.a3.a2.a2)}};
1901
- default: return {h: 0 /* {TcDone:21} */, a1: {a1: Prelude_Types_List_reverse($0.a2), a2: Data_String_n__3989_9556_linesHelp($0.a1, {h: 0}, $0.a3.a2)}};
1900
+ case '\n': return {h: 0 /* {TcDone:21} */, a1: {a1: Prelude_Types_List_reverse($0.a2), a2: Data_String_n__3989_9702_linesHelp($0.a1, {h: 0}, $0.a3.a2.a2)}};
1901
+ default: return {h: 0 /* {TcDone:21} */, a1: {a1: Prelude_Types_List_reverse($0.a2), a2: Data_String_n__3989_9702_linesHelp($0.a1, {h: 0}, $0.a3.a2)}};
1902
1902
  }
1903
1903
  }
1904
- default: return {h: 0 /* {TcDone:21} */, a1: {a1: Prelude_Types_List_reverse($0.a2), a2: Data_String_n__3989_9556_linesHelp($0.a1, {h: 0}, $0.a3.a2)}};
1904
+ default: return {h: 0 /* {TcDone:21} */, a1: {a1: Prelude_Types_List_reverse($0.a2), a2: Data_String_n__3989_9702_linesHelp($0.a1, {h: 0}, $0.a3.a2)}};
1905
1905
  }
1906
1906
  }
1907
1907
  default: return {h: 1 /* {TcContinue21:1} */, a1: $0.a1, a2: {a1: $0.a3.a1, a2: $0.a2}, a3: $0.a3.a2};
@@ -1912,8 +1912,8 @@ function x24tcOpt_21($0) {
1912
1912
  }
1913
1913
  }
1914
1914
 
1915
- /* Data.String.3989:9556:linesHelp */
1916
- function Data_String_n__3989_9556_linesHelp($0, $1, $2) {
1915
+ /* Data.String.3989:9702:linesHelp */
1916
+ function Data_String_n__3989_9702_linesHelp($0, $1, $2) {
1917
1917
  return __tailRec(x24tcOpt_21, {h: 1 /* {TcContinue21:1} */, a1: $0, a2: $1, a3: $2});
1918
1918
  }
1919
1919
 
@@ -1947,14 +1947,14 @@ function Prelude_Types_List_lengthPlus($0, $1) {
1947
1947
  function x24tcOpt_24($0) {
1948
1948
  switch($0.a6.h) {
1949
1949
  case 0: /* Nil */ return {h: 0 /* {TcDone:24} */, a1: {h: 0 /* SEmpty */}};
1950
- case 2: /* UndoAnn */ return {h: 0 /* {TcDone:24} */, a1: {h: 5 /* SAnnPop */, a1: Text_PrettyPrint_Prettyprinter_Doc_n__8979_8926_best($0.a1, $0.a2, $0.a3, $0.a4, $0.a5, $0.a6.a1)}};
1950
+ case 2: /* UndoAnn */ return {h: 0 /* {TcDone:24} */, a1: {h: 5 /* SAnnPop */, a1: Text_PrettyPrint_Prettyprinter_Doc_n__8985_8926_best($0.a1, $0.a2, $0.a3, $0.a4, $0.a5, $0.a6.a1)}};
1951
1951
  case 1: /* Cons */ {
1952
1952
  switch($0.a6.a2.h) {
1953
1953
  case 0: /* Empty */ return {h: 1 /* {TcContinue24:1} */, a1: $0.a1, a2: $0.a2, a3: $0.a3, a4: $0.a4, a5: $0.a5, a6: $0.a6.a3};
1954
- case 1: /* Chara */ return {h: 0 /* {TcDone:24} */, a1: {h: 1 /* SChar */, a1: $0.a6.a2.a1, a2: () => Text_PrettyPrint_Prettyprinter_Doc_n__8979_8926_best($0.a1, $0.a2, $0.a3, $0.a4, _add32s($0.a5, 1), $0.a6.a3)}};
1955
- case 2: /* Text */ return {h: 0 /* {TcDone:24} */, a1: {h: 2 /* SText */, a1: $0.a6.a2.a1, a2: $0.a6.a2.a2, a3: () => Text_PrettyPrint_Prettyprinter_Doc_n__8979_8926_best($0.a1, $0.a2, $0.a3, $0.a4, _add32s($0.a5, $0.a6.a2.a1), $0.a6.a3)}};
1954
+ case 1: /* Chara */ return {h: 0 /* {TcDone:24} */, a1: {h: 1 /* SChar */, a1: $0.a6.a2.a1, a2: () => Text_PrettyPrint_Prettyprinter_Doc_n__8985_8926_best($0.a1, $0.a2, $0.a3, $0.a4, _add32s($0.a5, 1), $0.a6.a3)}};
1955
+ case 2: /* Text */ return {h: 0 /* {TcDone:24} */, a1: {h: 2 /* SText */, a1: $0.a6.a2.a1, a2: $0.a6.a2.a2, a3: () => Text_PrettyPrint_Prettyprinter_Doc_n__8985_8926_best($0.a1, $0.a2, $0.a3, $0.a4, _add32s($0.a5, $0.a6.a2.a1), $0.a6.a3)}};
1956
1956
  case 3: /* Line */ {
1957
- const $2d = Text_PrettyPrint_Prettyprinter_Doc_n__8979_8926_best($0.a1, $0.a2, $0.a3, $0.a6.a1, $0.a6.a1, $0.a6.a3);
1957
+ const $2d = Text_PrettyPrint_Prettyprinter_Doc_n__8985_8926_best($0.a1, $0.a2, $0.a3, $0.a6.a1, $0.a6.a1, $0.a6.a3);
1958
1958
  let $35;
1959
1959
  switch($2d.h) {
1960
1960
  case 0: /* SEmpty */ {
@@ -1973,21 +1973,21 @@ function x24tcOpt_24($0) {
1973
1973
  case 5: /* Cat */ return {h: 1 /* {TcContinue24:1} */, a1: $0.a1, a2: $0.a2, a3: $0.a3, a4: $0.a4, a5: $0.a5, a6: {h: 1 /* Cons */, a1: $0.a6.a1, a2: $0.a6.a2.a1, a3: {h: 1 /* Cons */, a1: $0.a6.a1, a2: $0.a6.a2.a2, a3: $0.a6.a3}}};
1974
1974
  case 6: /* Nest */ return {h: 1 /* {TcContinue24:1} */, a1: $0.a1, a2: $0.a2, a3: $0.a3, a4: $0.a4, a5: $0.a5, a6: {h: 1 /* Cons */, a1: _add32s($0.a6.a1, $0.a6.a2.a1), a2: $0.a6.a2.a2, a3: $0.a6.a3}};
1975
1975
  case 7: /* Union */ {
1976
- const $5d = Text_PrettyPrint_Prettyprinter_Doc_n__8979_8926_best($0.a1, $0.a2, $0.a3, $0.a4, $0.a5, {h: 1 /* Cons */, a1: $0.a6.a1, a2: $0.a6.a2.a1(), a3: $0.a6.a3});
1977
- const $69 = Text_PrettyPrint_Prettyprinter_Doc_n__8979_8926_best($0.a1, $0.a2, $0.a3, $0.a4, $0.a5, {h: 1 /* Cons */, a1: $0.a6.a1, a2: $0.a6.a2.a2(), a3: $0.a6.a3});
1978
- return {h: 0 /* {TcDone:24} */, a1: Text_PrettyPrint_Prettyprinter_Doc_n__8979_8928_selectNicer($0.a1, $0.a2, $0.a3, $0.a4, $0.a5, $5d, () => $69)};
1976
+ const $5d = Text_PrettyPrint_Prettyprinter_Doc_n__8985_8926_best($0.a1, $0.a2, $0.a3, $0.a4, $0.a5, {h: 1 /* Cons */, a1: $0.a6.a1, a2: $0.a6.a2.a1(), a3: $0.a6.a3});
1977
+ const $69 = Text_PrettyPrint_Prettyprinter_Doc_n__8985_8926_best($0.a1, $0.a2, $0.a3, $0.a4, $0.a5, {h: 1 /* Cons */, a1: $0.a6.a1, a2: $0.a6.a2.a2(), a3: $0.a6.a3});
1978
+ return {h: 0 /* {TcDone:24} */, a1: Text_PrettyPrint_Prettyprinter_Doc_n__8985_8928_selectNicer($0.a1, $0.a2, $0.a3, $0.a4, $0.a5, $5d, () => $69)};
1979
1979
  }
1980
1980
  case 8: /* Column */ return {h: 1 /* {TcContinue24:1} */, a1: $0.a1, a2: $0.a2, a3: $0.a3, a4: $0.a4, a5: $0.a5, a6: {h: 1 /* Cons */, a1: $0.a6.a1, a2: $0.a6.a2.a1($0.a5), a3: $0.a6.a3}};
1981
1981
  case 9: /* WithPageWidth */ return {h: 1 /* {TcContinue24:1} */, a1: $0.a1, a2: $0.a2, a3: $0.a3, a4: $0.a4, a5: $0.a5, a6: {h: 1 /* Cons */, a1: $0.a6.a1, a2: $0.a6.a2.a1($0.a2), a3: $0.a6.a3}};
1982
1982
  case 10: /* Nesting */ return {h: 1 /* {TcContinue24:1} */, a1: $0.a1, a2: $0.a2, a3: $0.a3, a4: $0.a4, a5: $0.a5, a6: {h: 1 /* Cons */, a1: $0.a6.a1, a2: $0.a6.a2.a1($0.a6.a1), a3: $0.a6.a3}};
1983
- case 11: /* Annotated */ return {h: 0 /* {TcDone:24} */, a1: {h: 4 /* SAnnPush */, a1: $0.a6.a2.a1, a2: Text_PrettyPrint_Prettyprinter_Doc_n__8979_8926_best($0.a1, $0.a2, $0.a3, $0.a4, $0.a5, {h: 1 /* Cons */, a1: $0.a6.a1, a2: $0.a6.a2.a2, a3: {h: 2 /* UndoAnn */, a1: $0.a6.a3}})}};
1983
+ case 11: /* Annotated */ return {h: 0 /* {TcDone:24} */, a1: {h: 4 /* SAnnPush */, a1: $0.a6.a2.a1, a2: Text_PrettyPrint_Prettyprinter_Doc_n__8985_8926_best($0.a1, $0.a2, $0.a3, $0.a4, $0.a5, {h: 1 /* Cons */, a1: $0.a6.a1, a2: $0.a6.a2.a2, a3: {h: 2 /* UndoAnn */, a1: $0.a6.a3}})}};
1984
1984
  }
1985
1985
  }
1986
1986
  }
1987
1987
  }
1988
1988
 
1989
- /* Text.PrettyPrint.Prettyprinter.Doc.8979:8926:best */
1990
- function Text_PrettyPrint_Prettyprinter_Doc_n__8979_8926_best($0, $1, $2, $3, $4, $5) {
1989
+ /* Text.PrettyPrint.Prettyprinter.Doc.8985:8926:best */
1990
+ function Text_PrettyPrint_Prettyprinter_Doc_n__8985_8926_best($0, $1, $2, $3, $4, $5) {
1991
1991
  return __tailRec(x24tcOpt_24, {h: 1 /* {TcContinue24:1} */, a1: $0, a2: $1, a3: $2, a4: $3, a5: $4, a6: $5});
1992
1992
  }
1993
1993
 
@@ -2499,7 +2499,7 @@ function JSON_Parser_array($0, $1, $2) {
2499
2499
  }
2500
2500
 
2501
2501
  /* JSON.Parser.case block in array */
2502
- function JSON_Parser_case__array_20381($0, $1, $2, $3) {
2502
+ function JSON_Parser_case__array_22663($0, $1, $2, $3) {
2503
2503
  return __tailRec(x24tcOpt_47, {h: 2 /* {TcContinue47:2} */, a1: $0, a2: $1, a3: $2, a4: $3});
2504
2504
  }
2505
2505
 
@@ -2877,118 +2877,128 @@ const csegen_427 = __lazy(function () {
2877
2877
  return {a1: Commands_Help_argument(0, '#<label>'), a2: csegen_422()};
2878
2878
  });
2879
2879
 
2880
- /* {csegen:604} */
2881
- const csegen_604 = __lazy(function () {
2880
+ /* {csegen:608} */
2881
+ const csegen_608 = __lazy(function () {
2882
2882
  return {a1: d => b => c => a => $1 => $2 => $3 => ({a1: $1($3.a1), a2: $2($3.a2)}), a2: b => c => a => $c => $d => ({a1: $c($d.a1), a2: $d.a2}), a3: a => d => b => $14 => $15 => ({a1: $15.a1, a2: $14($15.a2)})};
2883
2883
  });
2884
2884
 
2885
- /* {csegen:608} */
2886
- const csegen_608 = __lazy(function () {
2885
+ /* {csegen:612} */
2886
+ const csegen_612 = __lazy(function () {
2887
2887
  return {a1: {h: 0}, a2: {a1: '-i', a2: {h: 0}}};
2888
2888
  });
2889
2889
 
2890
- /* {csegen:613} */
2891
- const csegen_613 = __lazy(function () {
2890
+ /* {csegen:617} */
2891
+ const csegen_617 = __lazy(function () {
2892
2892
  return $0 => $1 => Data_Promise_pure_Applicative_x28Promisex20x24ex29(undefined, $0, $1);
2893
2893
  });
2894
2894
 
2895
- /* {csegen:628} */
2896
- const csegen_628 = __lazy(function () {
2895
+ /* {csegen:633} */
2896
+ const csegen_633 = __lazy(function () {
2897
2897
  return {a1: csegen_9(), a2: a => ({h: 0}), a3: a => $4 => $5 => Prelude_Types_x3cx7cx3e_Alternative_Maybe($4, $5)};
2898
2898
  });
2899
2899
 
2900
- /* {csegen:629} */
2901
- const csegen_629 = __lazy(function () {
2900
+ /* {csegen:634} */
2901
+ const csegen_634 = __lazy(function () {
2902
2902
  return $0 => Data_List_sort(csegen_240(), $0);
2903
2903
  });
2904
2904
 
2905
- /* {csegen:631} */
2906
- const csegen_631 = __lazy(function () {
2905
+ /* {csegen:636} */
2906
+ const csegen_636 = __lazy(function () {
2907
2907
  return $0 => $1 => $2 => FFI_Concurrency_promiseAll(csegen_147(), $0, $1, $2);
2908
2908
  });
2909
2909
 
2910
2910
  /* {csegen:643} */
2911
2911
  const csegen_643 = __lazy(function () {
2912
+ return $0 => {
2913
+ switch($0.h) {
2914
+ case 0: /* nothing */ return 1;
2915
+ default: return 0;
2916
+ }
2917
+ };
2918
+ });
2919
+
2920
+ /* {csegen:648} */
2921
+ const csegen_648 = __lazy(function () {
2912
2922
  return $0 => $1 => Data_Date_compare_Ord_Date($0, $1);
2913
2923
  });
2914
2924
 
2915
- /* {csegen:644} */
2916
- const csegen_644 = __lazy(function () {
2925
+ /* {csegen:649} */
2926
+ const csegen_649 = __lazy(function () {
2917
2927
  return $0 => $0.a3;
2918
2928
  });
2919
2929
 
2920
- /* {csegen:645} */
2921
- const csegen_645 = __lazy(function () {
2922
- return $0 => $1 => Prelude_Basics_on(csegen_643(), csegen_644(), $0, $1);
2930
+ /* {csegen:650} */
2931
+ const csegen_650 = __lazy(function () {
2932
+ return $0 => $1 => Prelude_Basics_on(csegen_648(), csegen_649(), $0, $1);
2923
2933
  });
2924
2934
 
2925
- /* {csegen:667} */
2926
- const csegen_667 = __lazy(function () {
2935
+ /* {csegen:672} */
2936
+ const csegen_672 = __lazy(function () {
2927
2937
  return $0 => $0.a3;
2928
2938
  });
2929
2939
 
2930
- /* {csegen:670} */
2931
- const csegen_670 = __lazy(function () {
2940
+ /* {csegen:675} */
2941
+ const csegen_675 = __lazy(function () {
2932
2942
  return Theme_cs({a1: 2, a2: {h: 0}}, {h: 0 /* Left */, a1: undefined});
2933
2943
  });
2934
2944
 
2935
- /* {csegen:673} */
2936
- const csegen_673 = __lazy(function () {
2945
+ /* {csegen:678} */
2946
+ const csegen_678 = __lazy(function () {
2937
2947
  return $0 => $0.a1;
2938
2948
  });
2939
2949
 
2940
- /* {csegen:679} */
2941
- const csegen_679 = __lazy(function () {
2950
+ /* {csegen:684} */
2951
+ const csegen_684 = __lazy(function () {
2942
2952
  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}}}));
2943
2953
  });
2944
2954
 
2945
- /* {csegen:689} */
2946
- const csegen_689 = __lazy(function () {
2955
+ /* {csegen:694} */
2956
+ const csegen_694 = __lazy(function () {
2947
2957
  return Theme_cs({a1: 0, a2: {h: 0}}, {h: 0 /* Left */, a1: undefined});
2948
2958
  });
2949
2959
 
2950
- /* {csegen:690} */
2951
- const csegen_690 = __lazy(function () {
2960
+ /* {csegen:695} */
2961
+ const csegen_695 = __lazy(function () {
2952
2962
  return Theme_cs({a1: 1, a2: {h: 0}}, {h: 0 /* Left */, a1: undefined});
2953
2963
  });
2954
2964
 
2955
- /* {csegen:691} */
2956
- const csegen_691 = __lazy(function () {
2965
+ /* {csegen:696} */
2966
+ const csegen_696 = __lazy(function () {
2957
2967
  return Theme_cs({a1: 3, a2: {h: 0}}, {h: 0 /* Left */, a1: undefined});
2958
2968
  });
2959
2969
 
2960
- /* {csegen:705} */
2961
- const csegen_705 = __lazy(function () {
2970
+ /* {csegen:710} */
2971
+ const csegen_710 = __lazy(function () {
2962
2972
  return $0 => Prelude_Types_either(() => $3 => '', () => $5 => $5, $0);
2963
2973
  });
2964
2974
 
2965
- /* {csegen:711} */
2966
- const csegen_711 = __lazy(function () {
2975
+ /* {csegen:716} */
2976
+ const csegen_716 = __lazy(function () {
2967
2977
  return $0 => Util_Prompting_yesNoPrompt(csegen_74()(), 1, 'Would you like to continue creating a Pull Request anyway?');
2968
2978
  });
2969
2979
 
2970
- /* {csegen:749} */
2971
- const csegen_749 = __lazy(function () {
2980
+ /* {csegen:754} */
2981
+ const csegen_754 = __lazy(function () {
2972
2982
  return $0 => Prelude_Types_fastPack(Prelude_Types_List_reverse($0));
2973
2983
  });
2974
2984
 
2975
- /* {csegen:754} */
2976
- const csegen_754 = __lazy(function () {
2985
+ /* {csegen:759} */
2986
+ const csegen_759 = __lazy(function () {
2977
2987
  return $0 => $0.a1;
2978
2988
  });
2979
2989
 
2980
- /* {csegen:761} */
2981
- const csegen_761 = __lazy(function () {
2990
+ /* {csegen:766} */
2991
+ const csegen_766 = __lazy(function () {
2982
2992
  return $0 => $1 => Data_Promise_map_Functor_x28Promisex20x24ex29($4 => Data_String_trim($4), csegen_406()(), $0, $1);
2983
2993
  });
2984
2994
 
2985
- /* {csegen:765} */
2986
- const csegen_765 = __lazy(function () {
2995
+ /* {csegen:771} */
2996
+ const csegen_771 = __lazy(function () {
2987
2997
  return {a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc()}, a2: {h: 0}};
2988
2998
  });
2989
2999
 
2990
- /* {csegen:781} */
2991
- const csegen_781 = __lazy(function () {
3000
+ /* {csegen:787} */
3001
+ const csegen_787 = __lazy(function () {
2992
3002
  return {a1: ann => $1 => Commands_Graph_pretty_Pretty_Date($1), a2: ann => $5 => $6 => Commands_Graph_prettyPrec_Pretty_Date($5, $6)};
2993
3003
  });
2994
3004
 
@@ -2997,23 +3007,23 @@ function prim__sub_Integer($0, $1) {
2997
3007
  return ($0-$1);
2998
3008
  }
2999
3009
 
3000
- /* Main.8861:1556:parsePg */
3001
- function Main_n__8861_1556_parsePg($0, $1, $2, $3, $4, $5, $6) {
3010
+ /* Main.8893:1556:parsePg */
3011
+ function Main_n__8893_1556_parsePg($0, $1, $2, $3, $4, $5, $6) {
3002
3012
  return Data_String_parsePositive(csegen_2(), $6);
3003
3013
  }
3004
3014
 
3005
- /* Main.8861:1555:parseLim */
3006
- function Main_n__8861_1555_parseLim($0, $1, $2, $3, $4, $5) {
3015
+ /* Main.8893:1555:parseLim */
3016
+ function Main_n__8893_1555_parseLim($0, $1, $2, $3, $4, $5) {
3007
3017
  return Prelude_Interfaces_x3cx3dx3c(csegen_14(), x => Data_Fin_natToFin(x, 101n), $e => Data_String_parsePositive(csegen_2(), $e));
3008
3018
  }
3009
3019
 
3010
- /* Main.8663:1303:ffiOpts */
3011
- function Main_n__8663_1303_ffiOpts($0, $1, $2, $3) {
3020
+ /* Main.8695:1303:ffiOpts */
3021
+ function Main_n__8695_1303_ffiOpts($0, $1, $2, $3) {
3012
3022
  return BashCompletion_ffiOpts($0, $3, $2, $1);
3013
3023
  }
3014
3024
 
3015
- /* Main.8663:1302:configuredOpts */
3016
- function Main_n__8663_1302_configuredOpts($0, $1, $2, $3) {
3025
+ /* Main.8695:1302:configuredOpts */
3026
+ function Main_n__8695_1302_configuredOpts($0, $1, $2, $3) {
3017
3027
  const $13 = $14 => {
3018
3028
  switch($14.h) {
3019
3029
  case 1: /* Right */ return $0.a1.a1.a2(undefined)(BashCompletion_opts($14.a1, $3, $2, $1));
@@ -3258,7 +3268,7 @@ function Main_handleAuthenticatedArgs($0, $1, $2, $3) {
3258
3268
  }
3259
3269
  return Prelude_Types_x3ex3ex3d_Monad_Maybe($b5, filter => ({a1: {a1: filter, a2: {a1: $b2.a1, a2: $b2.a2}}}));
3260
3270
  };
3261
- 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__8861_1555_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__8861_1556_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);
3271
+ 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__8893_1555_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__8893_1556_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);
3262
3272
  return $c2 => {
3263
3273
  switch($92.h) {
3264
3274
  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);
@@ -3336,79 +3346,59 @@ function Main_handleAuthenticatedArgs($0, $1, $2, $3) {
3336
3346
  }
3337
3347
  };
3338
3348
  }
3339
- case 'quick': {
3340
- switch($3.a2.h) {
3341
- case 0: /* nil */ return $24d => $24e => Commands_quick($0, $1, $2, 1, $24d, $24e);
3342
- case undefined: /* cons */ {
3343
- return $256 => {
3344
- switch($3.a2.a1) {
3345
- case '--bugfix': {
3346
- return $258 => {
3347
- switch($3.a2.a2.h) {
3348
- case 0: /* nil */ return Commands_quick($0, $1, $2, 0, $256, $258);
3349
- default: return Data_Promise_reject(Prelude_Types_foldMap_Foldable_List(csegen_51()(), $268 => $268, {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_53(), $3), a2: {a1: '.', a2: {h: 0}}}}), $256, $258);
3350
- }
3351
- };
3352
- }
3353
- default: return $276 => Data_Promise_reject(Prelude_Types_foldMap_Foldable_List(csegen_51()(), $27e => $27e, {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_53(), $3), a2: {a1: '.', a2: {h: 0}}}}), $256, $276);
3354
- }
3355
- };
3356
- }
3357
- default: return $28c => $28d => Data_Promise_reject(Prelude_Types_foldMap_Foldable_List(csegen_51()(), $295 => $295, {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_53(), $3), a2: {a1: '.', a2: {h: 0}}}}), $28c, $28d);
3358
- }
3359
- }
3349
+ case 'quick': return $24c => $24d => Commands_quick($0, $1, $2, Commands_parseQuickArgs($3.a2), $24c, $24d);
3360
3350
  case 'health': {
3361
- return $2a3 => $2a4 => {
3351
+ return $257 => $258 => {
3362
3352
  switch($3.a2.h) {
3363
- case undefined: /* cons */ return Data_Promise_reject('The health command does not take any arguments.', $2a3, $2a4);
3364
- case 0: /* nil */ return Commands_health($0, $2, $2a3, $2a4);
3365
- default: return Data_Promise_reject(Prelude_Types_foldMap_Foldable_List(csegen_51()(), $2b6 => $2b6, {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_53(), $3), a2: {a1: '.', a2: {h: 0}}}}), $2a3, $2a4);
3353
+ case undefined: /* cons */ return Data_Promise_reject('The health command does not take any arguments.', $257, $258);
3354
+ case 0: /* nil */ return Commands_health($0, $2, $257, $258);
3355
+ default: return Data_Promise_reject(Prelude_Types_foldMap_Foldable_List(csegen_51()(), $26a => $26a, {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_53(), $3), a2: {a1: '.', a2: {h: 0}}}}), $257, $258);
3366
3356
  }
3367
3357
  };
3368
3358
  }
3369
3359
  case 'pr': {
3370
- const $2c4 = Commands_parsePrArgs($3.a2);
3371
- switch($2c4.h) {
3372
- case 1: /* Right */ return $2c7 => $2c8 => Commands_pr($0, $1, $2, $2c4.a1, $2c7, $2c8);
3373
- case 0: /* Left */ return Main_exitError(csegen_74()(), $2c4.a1);
3360
+ const $278 = Commands_parsePrArgs($3.a2);
3361
+ switch($278.h) {
3362
+ case 1: /* Right */ return $27b => $27c => Commands_pr($0, $1, $2, $278.a1, $27b, $27c);
3363
+ case 0: /* Left */ return Main_exitError(csegen_74()(), $278.a1);
3374
3364
  }
3375
3365
  }
3376
3366
  case 'reflect': {
3377
- return $2d5 => $2d6 => {
3367
+ return $289 => $28a => {
3378
3368
  switch($3.a2.h) {
3379
- case 0: /* nil */ return Commands_reflect($0, $2, $2d5, $2d6);
3380
- default: return Data_Promise_reject(Prelude_Types_foldMap_Foldable_List(csegen_51()(), $2e4 => $2e4, {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_53(), $3), a2: {a1: '.', a2: {h: 0}}}}), $2d5, $2d6);
3369
+ case 0: /* nil */ return Commands_reflect($0, $2, $289, $28a);
3370
+ default: return Data_Promise_reject(Prelude_Types_foldMap_Foldable_List(csegen_51()(), $298 => $298, {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_53(), $3), a2: {a1: '.', a2: {h: 0}}}}), $289, $28a);
3381
3371
  }
3382
3372
  };
3383
3373
  }
3384
3374
  case 'contribute': {
3385
- const $2f2 = Commands_parseContributeArgs($3.a2);
3386
- switch($2f2.h) {
3387
- case 1: /* Right */ return $2f5 => $2f6 => Commands_contribute($0, $1, $2, $2f2.a1, $2f5, $2f6);
3388
- case 0: /* Left */ return Main_exitError(csegen_74()(), $2f2.a1);
3375
+ const $2a6 = Commands_parseContributeArgs($3.a2);
3376
+ switch($2a6.h) {
3377
+ case 1: /* Right */ return $2a9 => $2aa => Commands_contribute($0, $1, $2, $2a6.a1, $2a9, $2aa);
3378
+ case 0: /* Left */ return Main_exitError(csegen_74()(), $2a6.a1);
3389
3379
  }
3390
3380
  }
3391
3381
  case 'list': {
3392
- return $303 => {
3382
+ return $2b7 => {
3393
3383
  switch($3.a2.h) {
3394
- case 0: /* nil */ return $305 => Commands_listOrgTeams($0, $2, $303, $305);
3384
+ case 0: /* nil */ return $2b9 => Commands_listOrgTeams($0, $2, $2b7, $2b9);
3395
3385
  case undefined: /* cons */ {
3396
- return $30b => {
3386
+ return $2bf => {
3397
3387
  switch($3.a2.a2.h) {
3398
- case 0: /* nil */ return Commands_list($0, $2, $3.a2.a1, $303, $30b);
3399
- default: return Data_Promise_reject(Prelude_Types_foldMap_Foldable_List(csegen_51()(), $31a => $31a, {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_53(), $3), a2: {a1: '.', a2: {h: 0}}}}), $303, $30b);
3388
+ case 0: /* nil */ return Commands_list($0, $2, $3.a2.a1, $2b7, $2bf);
3389
+ default: return Data_Promise_reject(Prelude_Types_foldMap_Foldable_List(csegen_51()(), $2ce => $2ce, {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_53(), $3), a2: {a1: '.', a2: {h: 0}}}}), $2b7, $2bf);
3400
3390
  }
3401
3391
  };
3402
3392
  }
3403
- default: return $328 => Data_Promise_reject(Prelude_Types_foldMap_Foldable_List(csegen_51()(), $330 => $330, {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_53(), $3), a2: {a1: '.', a2: {h: 0}}}}), $303, $328);
3393
+ default: return $2dc => Data_Promise_reject(Prelude_Types_foldMap_Foldable_List(csegen_51()(), $2e4 => $2e4, {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_53(), $3), a2: {a1: '.', a2: {h: 0}}}}), $2b7, $2dc);
3404
3394
  }
3405
3395
  };
3406
3396
  }
3407
3397
  case 'graph': {
3408
- const $33e = Commands_parseGraphArgs($3.a2);
3409
- switch($33e.h) {
3410
- case 1: /* Right */ return Commands_graph($0, $2, $33e.a1);
3411
- case 0: /* Left */ return Main_exitError(csegen_74()(), $33e.a1);
3398
+ const $2f2 = Commands_parseGraphArgs($3.a2);
3399
+ switch($2f2.h) {
3400
+ case 1: /* Right */ return Commands_graph($0, $2, $2f2.a1);
3401
+ case 0: /* Left */ return Main_exitError(csegen_74()(), $2f2.a1);
3412
3402
  }
3413
3403
  }
3414
3404
  case 'rq': {
@@ -3434,18 +3424,18 @@ function Main_handleAuthenticatedArgs($0, $1, $2, $3) {
3434
3424
  }
3435
3425
  }
3436
3426
  case 'label': {
3437
- return $372 => $373 => {
3427
+ return $326 => $327 => {
3438
3428
  switch($3.a2.h) {
3439
- case 0: /* nil */ return Data_Promise_reject('The label command expects one or more labels as arguments.', $372, $373);
3440
- case undefined: /* cons */ return Commands_label($0, $1, $2, {a1: $3.a2.a1, a2: $3.a2.a2}, $372, $373);
3441
- default: return Data_Promise_reject(Prelude_Types_foldMap_Foldable_List(csegen_51()(), $389 => $389, {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_53(), $3), a2: {a1: '.', a2: {h: 0}}}}), $372, $373);
3429
+ case 0: /* nil */ return Data_Promise_reject('The label command expects one or more labels as arguments.', $326, $327);
3430
+ case undefined: /* cons */ return Commands_label($0, $1, $2, {a1: $3.a2.a1, a2: $3.a2.a2}, $326, $327);
3431
+ default: return Data_Promise_reject(Prelude_Types_foldMap_Foldable_List(csegen_51()(), $33d => $33d, {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_53(), $3), a2: {a1: '.', a2: {h: 0}}}}), $326, $327);
3442
3432
  }
3443
3433
  };
3444
3434
  }
3445
- default: return $397 => $398 => Data_Promise_reject(Prelude_Types_foldMap_Foldable_List(csegen_51()(), $3a0 => $3a0, {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_53(), $3), a2: {a1: '.', a2: {h: 0}}}}), $397, $398);
3435
+ default: return $34b => $34c => Data_Promise_reject(Prelude_Types_foldMap_Foldable_List(csegen_51()(), $354 => $354, {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_53(), $3), a2: {a1: '.', a2: {h: 0}}}}), $34b, $34c);
3446
3436
  }
3447
3437
  }
3448
- default: return $3ae => $3af => Data_Promise_reject(Prelude_Types_foldMap_Foldable_List(csegen_51()(), $3b7 => $3b7, {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_53(), $3), a2: {a1: '.', a2: {h: 0}}}}), $3ae, $3af);
3438
+ default: return $362 => $363 => Data_Promise_reject(Prelude_Types_foldMap_Foldable_List(csegen_51()(), $36b => $36b, {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_53(), $3), a2: {a1: '.', a2: {h: 0}}}}), $362, $363);
3449
3439
  }
3450
3440
  }
3451
3441
 
@@ -3517,10 +3507,10 @@ function Main_exitError($0, $1) {
3517
3507
  /* Main.bashCompletion : HasIO io => String -> String -> String -> io () */
3518
3508
  function Main_bashCompletion($0, $1, $2, $3) {
3519
3509
  const $4 = BashCompletion_cmdOpts($1, $2, $3);
3520
- const $9 = Prelude_Types_maybe(() => Main_n__8663_1303_ffiOpts($0, $3, $2, $1), () => $12 => $0.a1.a1.a2(undefined)({a1: $12}), $4);
3510
+ const $9 = Prelude_Types_maybe(() => Main_n__8695_1303_ffiOpts($0, $3, $2, $1), () => $12 => $0.a1.a1.a2(undefined)({a1: $12}), $4);
3521
3511
  const $26 = $27 => {
3522
3512
  switch($27.h) {
3523
- case 0: /* nothing */ return Main_n__8663_1302_configuredOpts($0, $3, $2, $1);
3513
+ case 0: /* nothing */ return Main_n__8695_1302_configuredOpts($0, $3, $2, $1);
3524
3514
  case undefined: /* just */ return $0.a1.a1.a2(undefined)($27.a1);
3525
3515
  }
3526
3516
  };
@@ -3528,18 +3518,18 @@ function Main_bashCompletion($0, $1, $2, $3) {
3528
3518
  return $0.a1.a2(undefined)(undefined)($1c)($3f => $0.a2(undefined)($45 => Prelude_IO_prim__putStr(Data_String_fastUnlines($3f), $45)));
3529
3519
  }
3530
3520
 
3531
- /* Text.PrettyPrint.Prettyprinter.Render.Terminal.4508:5068:writeOutput */
3532
- function Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4508_5068_writeOutput($0, $1, $2, $3) {
3521
+ /* Text.PrettyPrint.Prettyprinter.Render.Terminal.4514:5068:writeOutput */
3522
+ function Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4514_5068_writeOutput($0, $1, $2, $3) {
3533
3523
  return Control_Monad_ST_modifySTRef($1, $7 => ($7+$2), $3);
3534
3524
  }
3535
3525
 
3536
- /* Text.PrettyPrint.Prettyprinter.Render.Terminal.4508:5067:push */
3537
- function Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4508_5067_push($0, $1, $2, $3) {
3526
+ /* Text.PrettyPrint.Prettyprinter.Render.Terminal.4514:5067:push */
3527
+ function Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4514_5067_push($0, $1, $2, $3) {
3538
3528
  return Control_Monad_ST_modifySTRef($1, $7 => ({a1: $2, a2: $7}), $3);
3539
3529
  }
3540
3530
 
3541
- /* Text.PrettyPrint.Prettyprinter.Render.Terminal.4508:5066:pop */
3542
- function Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4508_5066_pop($0, $1, $2) {
3531
+ /* Text.PrettyPrint.Prettyprinter.Render.Terminal.4514:5066:pop */
3532
+ function Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4514_5066_pop($0, $1, $2) {
3543
3533
  const $9 = $a => $b => {
3544
3534
  switch($a.h) {
3545
3535
  case undefined: /* cons */ return Control_Monad_ST_x3ex3ex3d_Monad_x28STx20x24sx29($f => ($1.value=$a.a2), $15 => $16 => ({a1: $a.a1}), $b);
@@ -3549,8 +3539,8 @@ function Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4508_5066_pop($0, $1,
3549
3539
  return Control_Monad_ST_x3ex3ex3d_Monad_x28STx20x24sx29($5 => ($1.value), $9, $2);
3550
3540
  }
3551
3541
 
3552
- /* Text.PrettyPrint.Prettyprinter.Render.Terminal.4508:5065:peek */
3553
- function Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4508_5065_peek($0, $1, $2) {
3542
+ /* Text.PrettyPrint.Prettyprinter.Render.Terminal.4514:5065:peek */
3543
+ function Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4514_5065_peek($0, $1, $2) {
3554
3544
  const $9 = $a => $b => {
3555
3545
  switch($a.h) {
3556
3546
  case undefined: /* cons */ return {a1: $a.a1};
@@ -3560,36 +3550,36 @@ function Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4508_5065_peek($0, $1
3560
3550
  return Control_Monad_ST_x3ex3ex3d_Monad_x28STx20x24sx29($5 => ($1.value), $9, $2);
3561
3551
  }
3562
3552
 
3563
- /* Text.PrettyPrint.Prettyprinter.Render.Terminal.4508:5064:go */
3564
- function Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4508_5064_go($0, $1, $2, $3, $4) {
3553
+ /* Text.PrettyPrint.Prettyprinter.Render.Terminal.4514:5064:go */
3554
+ function Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4514_5064_go($0, $1, $2, $3, $4) {
3565
3555
  switch($3.h) {
3566
3556
  case 0: /* SEmpty */ return undefined;
3567
- case 1: /* SChar */ return Control_Monad_ST_x3ex3ex3d_Monad_x28STx20x24sx29($8 => Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4508_5068_writeOutput($0, $2, Data_String_singleton($3.a1), $8), $11 => $12 => Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4508_5064_go($0, $1, $2, $3.a2(), $12), $4);
3568
- case 2: /* SText */ return Control_Monad_ST_x3ex3ex3d_Monad_x28STx20x24sx29($1d => Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4508_5068_writeOutput($0, $2, $3.a2, $1d), $24 => $25 => Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4508_5064_go($0, $1, $2, $3.a3(), $25), $4);
3569
- case 3: /* SLine */ return Control_Monad_ST_x3ex3ex3d_Monad_x28STx20x24sx29($30 => Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4508_5068_writeOutput($0, $2, (Data_String_singleton('\n')+Text_PrettyPrint_Prettyprinter_Doc_textSpaces($3.a1)), $30), $3d => $3e => Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4508_5064_go($0, $1, $2, $3.a2, $3e), $4);
3557
+ case 1: /* SChar */ return Control_Monad_ST_x3ex3ex3d_Monad_x28STx20x24sx29($8 => Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4514_5068_writeOutput($0, $2, Data_String_singleton($3.a1), $8), $11 => $12 => Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4514_5064_go($0, $1, $2, $3.a2(), $12), $4);
3558
+ case 2: /* SText */ return Control_Monad_ST_x3ex3ex3d_Monad_x28STx20x24sx29($1d => Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4514_5068_writeOutput($0, $2, $3.a2, $1d), $24 => $25 => Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4514_5064_go($0, $1, $2, $3.a3(), $25), $4);
3559
+ case 3: /* SLine */ return Control_Monad_ST_x3ex3ex3d_Monad_x28STx20x24sx29($30 => Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4514_5068_writeOutput($0, $2, (Data_String_singleton('\n')+Text_PrettyPrint_Prettyprinter_Doc_textSpaces($3.a1)), $30), $3d => $3e => Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4514_5064_go($0, $1, $2, $3.a2, $3e), $4);
3570
3560
  case 4: /* SAnnPush */ {
3571
3561
  const $4d = $4e => {
3572
3562
  switch($4e.h) {
3573
3563
  case undefined: /* just */ {
3574
3564
  const $50 = Prelude_Types_List_tailRecAppend($3.a1, $4e.a1);
3575
- return $54 => Control_Monad_ST_x3ex3ex3d_Monad_x28STx20x24sx29($57 => Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4508_5067_push($0, $1, $50, $57), $5e => $5f => Control_Monad_ST_x3ex3ex3d_Monad_x28STx20x24sx29($62 => Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4508_5068_writeOutput($0, $2, Control_ANSI_SGR_escapeSGR($50), $62), $6b => $6c => Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4508_5064_go($0, $1, $2, $3.a2, $6c), $5f), $54);
3565
+ return $54 => Control_Monad_ST_x3ex3ex3d_Monad_x28STx20x24sx29($57 => Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4514_5067_push($0, $1, $50, $57), $5e => $5f => Control_Monad_ST_x3ex3ex3d_Monad_x28STx20x24sx29($62 => Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4514_5068_writeOutput($0, $2, Control_ANSI_SGR_escapeSGR($50), $62), $6b => $6c => Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4514_5064_go($0, $1, $2, $3.a2, $6c), $5f), $54);
3576
3566
  }
3577
3567
  case 0: /* nothing */ return $75 => ($1.value={h: 0});
3578
3568
  }
3579
3569
  };
3580
- return Control_Monad_ST_x3ex3ex3d_Monad_x28STx20x24sx29($48 => Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4508_5065_peek($0, $1, $48), $4d, $4);
3570
+ return Control_Monad_ST_x3ex3ex3d_Monad_x28STx20x24sx29($48 => Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4514_5065_peek($0, $1, $48), $4d, $4);
3581
3571
  }
3582
3572
  case 5: /* SAnnPop */ {
3583
3573
  const $82 = _ => $83 => {
3584
3574
  const $8b = $8c => $8d => {
3585
3575
  switch($8c.h) {
3586
- case undefined: /* just */ return Control_Monad_ST_x3ex3ex3d_Monad_x28STx20x24sx29($91 => Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4508_5068_writeOutput($0, $2, Control_ANSI_SGR_escapeSGR({a1: {h: 0 /* Reset */}, a2: $8c.a1}), $91), $9c => $9d => Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4508_5064_go($0, $1, $2, $3.a1, $9d), $8d);
3576
+ case undefined: /* just */ return Control_Monad_ST_x3ex3ex3d_Monad_x28STx20x24sx29($91 => Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4514_5068_writeOutput($0, $2, Control_ANSI_SGR_escapeSGR({a1: {h: 0 /* Reset */}, a2: $8c.a1}), $91), $9c => $9d => Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4514_5064_go($0, $1, $2, $3.a1, $9d), $8d);
3587
3577
  case 0: /* nothing */ return ($1.value={h: 0});
3588
3578
  }
3589
3579
  };
3590
- return Control_Monad_ST_x3ex3ex3d_Monad_x28STx20x24sx29($86 => Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4508_5065_peek($0, $1, $86), $8b, $83);
3580
+ return Control_Monad_ST_x3ex3ex3d_Monad_x28STx20x24sx29($86 => Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4514_5065_peek($0, $1, $86), $8b, $83);
3591
3581
  };
3592
- return Control_Monad_ST_x3ex3ex3d_Monad_x28STx20x24sx29($7d => Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4508_5066_pop($0, $1, $7d), $82, $4);
3582
+ return Control_Monad_ST_x3ex3ex3d_Monad_x28STx20x24sx29($7d => Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4514_5066_pop($0, $1, $7d), $82, $4);
3593
3583
  }
3594
3584
  }
3595
3585
  }
@@ -3619,7 +3609,7 @@ function Text_PrettyPrint_Prettyprinter_Render_Terminal_renderString($0) {
3619
3609
  };
3620
3610
  return Control_Monad_ST_x3ex3ex3d_Monad_x28STx20x24sx29($28 => (styleStackRef.value), $2c, $25);
3621
3611
  };
3622
- return Control_Monad_ST_x3ex3ex3d_Monad_x28STx20x24sx29($1c => Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4508_5064_go($0, styleStackRef, outputRef, $0, $1c), $23, $19);
3612
+ return Control_Monad_ST_x3ex3ex3d_Monad_x28STx20x24sx29($1c => Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4514_5064_go($0, styleStackRef, outputRef, $0, $1c), $23, $19);
3623
3613
  };
3624
3614
  return Control_Monad_ST_x3ex3ex3d_Monad_x28STx20x24sx29($14 => Control_Monad_ST_newSTRef('', $14), $18, $11);
3625
3615
  };
@@ -3707,9 +3697,9 @@ function Text_PrettyPrint_Prettyprinter_Doc_case__changesUponFlattening_4540($0,
3707
3697
  }
3708
3698
  }
3709
3699
 
3710
- /* Text.PrettyPrint.Prettyprinter.Doc.8979:8928:selectNicer */
3711
- function Text_PrettyPrint_Prettyprinter_Doc_n__8979_8928_selectNicer($0, $1, $2, $3, $4, $5, $6) {
3712
- switch($2($3)($4)(Text_PrettyPrint_Prettyprinter_Doc_n__8979_8927_initialIndentation($0, $1, $2, $6()))($5)) {
3700
+ /* Text.PrettyPrint.Prettyprinter.Doc.8985:8928:selectNicer */
3701
+ function Text_PrettyPrint_Prettyprinter_Doc_n__8985_8928_selectNicer($0, $1, $2, $3, $4, $5, $6) {
3702
+ switch($2($3)($4)(Text_PrettyPrint_Prettyprinter_Doc_n__8985_8927_initialIndentation($0, $1, $2, $6()))($5)) {
3713
3703
  case 1: return $5;
3714
3704
  case 0: return $6();
3715
3705
  }
@@ -3872,7 +3862,7 @@ const Text_PrettyPrint_Prettyprinter_Doc_line = __lazy(function () {
3872
3862
 
3873
3863
  /* Text.PrettyPrint.Prettyprinter.Doc.layoutWadlerLeijen : FittingPredicate ann -> PageWidth -> Doc ann -> SimpleDocStream ann */
3874
3864
  function Text_PrettyPrint_Prettyprinter_Doc_layoutWadlerLeijen($0, $1, $2) {
3875
- return Text_PrettyPrint_Prettyprinter_Doc_n__8979_8926_best($2, $1, $0, 0, 0, {h: 1 /* Cons */, a1: 0, a2: $2, a3: {h: 0 /* Nil */}});
3865
+ return Text_PrettyPrint_Prettyprinter_Doc_n__8985_8926_best($2, $1, $0, 0, 0, {h: 1 /* Cons */, a1: 0, a2: $2, a3: {h: 0 /* Nil */}});
3876
3866
  }
3877
3867
 
3878
3868
  /* Text.PrettyPrint.Prettyprinter.Doc.layoutUnbounded : Doc ann -> SimpleDocStream ann */
@@ -4071,7 +4061,7 @@ function Data_String_Extra_drop($0, $1) {
4071
4061
  }
4072
4062
 
4073
4063
  /* Data.String.with block in parsePositive,parsePosTrimmed */
4074
- function Data_String_with__parsePositivex2cparsePosTrimmed_10051($0, $1, $2, $3, $4) {
4064
+ function Data_String_with__parsePositivex2cparsePosTrimmed_10197($0, $1, $2, $3, $4) {
4075
4065
  switch($3) {
4076
4066
  case '': {
4077
4067
  switch($4.h) {
@@ -4126,7 +4116,7 @@ function Data_String_with__parsePositivex2cparsePosTrimmed_10051($0, $1, $2, $3,
4126
4116
  }
4127
4117
 
4128
4118
  /* Data.String.with block in asList */
4129
- function Data_String_with__asList_9694($0, $1) {
4119
+ function Data_String_with__asList_9840($0, $1) {
4130
4120
  switch($0) {
4131
4121
  case '': {
4132
4122
  switch($1.h) {
@@ -4138,17 +4128,17 @@ function Data_String_with__asList_9694($0, $1) {
4138
4128
  }
4139
4129
  }
4140
4130
 
4141
- /* Data.String.3856:9426:unlines' */
4142
- function Data_String_n__3856_9426_unlinesx27($0) {
4131
+ /* Data.String.3856:9572:unlines' */
4132
+ function Data_String_n__3856_9572_unlinesx27($0) {
4143
4133
  switch($0.h) {
4144
4134
  case 0: /* nil */ return {h: 0};
4145
- case undefined: /* cons */ return {a1: $0.a1, a2: {a1: '\n', a2: Data_String_n__3856_9426_unlinesx27($0.a2)}};
4135
+ case undefined: /* cons */ return {a1: $0.a1, a2: {a1: '\n', a2: Data_String_n__3856_9572_unlinesx27($0.a2)}};
4146
4136
  }
4147
4137
  }
4148
4138
 
4149
- /* Data.String.4465:10045:parsePosTrimmed */
4150
- function Data_String_n__4465_10045_parsePosTrimmed($0, $1, $2) {
4151
- return Data_String_with__parsePositivex2cparsePosTrimmed_10051(undefined, $0, $2, $2, Data_String_strM($2));
4139
+ /* Data.String.4465:10191:parsePosTrimmed */
4140
+ function Data_String_n__4465_10191_parsePosTrimmed($0, $1, $2) {
4141
+ return Data_String_with__parsePositivex2cparsePosTrimmed_10197(undefined, $0, $2, $2, Data_String_strM($2));
4152
4142
  }
4153
4143
 
4154
4144
  /* Data.String.trim : String -> String */
@@ -4197,17 +4187,17 @@ function Data_String_replicate($0, $1) {
4197
4187
 
4198
4188
  /* Data.String.parsePositive : Num a => String -> Maybe a */
4199
4189
  function Data_String_parsePositive($0, $1) {
4200
- return Data_String_n__4465_10045_parsePosTrimmed($0, $1, Data_String_trim($1));
4190
+ return Data_String_n__4465_10191_parsePosTrimmed($0, $1, Data_String_trim($1));
4201
4191
  }
4202
4192
 
4203
4193
  /* Data.String.ltrim : String -> String */
4204
4194
  function Data_String_ltrim($0) {
4205
- return Data_String_with__ltrim_9718($0, Data_String_asList($0));
4195
+ return Data_String_with__ltrim_9864($0, Data_String_asList($0));
4206
4196
  }
4207
4197
 
4208
4198
  /* Data.String.lines' : List Char -> List (List Char) */
4209
4199
  function Data_String_linesx27($0) {
4210
- return Data_String_n__3989_9556_linesHelp($0, {h: 0}, $0);
4200
+ return Data_String_n__3989_9702_linesHelp($0, {h: 0}, $0);
4211
4201
  }
4212
4202
 
4213
4203
  /* Data.String.lines : String -> List String */
@@ -4227,7 +4217,7 @@ function Data_String_isPrefixOf($0, $1) {
4227
4217
 
4228
4218
  /* Data.String.fastUnlines : List String -> String */
4229
4219
  function Data_String_fastUnlines($0) {
4230
- return Prelude_Types_fastConcat(Data_String_n__3856_9426_unlinesx27($0));
4220
+ return Prelude_Types_fastConcat(Data_String_n__3856_9572_unlinesx27($0));
4231
4221
  }
4232
4222
 
4233
4223
  /* Data.String.break : (Char -> Bool) -> String -> (String, String) */
@@ -4243,7 +4233,7 @@ function Data_String_break$($0, $1) {
4243
4233
 
4244
4234
  /* Data.String.asList : (str : String) -> AsList str */
4245
4235
  function Data_String_asList($0) {
4246
- return Data_String_with__asList_9694($0, Data_String_strM($0));
4236
+ return Data_String_with__asList_9840($0, Data_String_strM($0));
4247
4237
  }
4248
4238
 
4249
4239
  /* Data.Fin.show */
@@ -4266,6 +4256,30 @@ function Data_Fin_natToFin($0, $1) {
4266
4256
  }
4267
4257
  }
4268
4258
 
4259
+ /* Data.Maybe.isNothing : Maybe a -> Bool */
4260
+ function Data_Maybe_isNothing($0) {
4261
+ switch($0.h) {
4262
+ case 0: /* nothing */ return 1;
4263
+ case undefined: /* just */ return 0;
4264
+ }
4265
+ }
4266
+
4267
+ /* Data.Maybe.isJust : Maybe a -> Bool */
4268
+ function Data_Maybe_isJust($0) {
4269
+ switch($0.h) {
4270
+ case 0: /* nothing */ return 0;
4271
+ case undefined: /* just */ return 1;
4272
+ }
4273
+ }
4274
+
4275
+ /* Data.Maybe.fromMaybe : Lazy a -> Maybe a -> a */
4276
+ function Data_Maybe_fromMaybe($0, $1) {
4277
+ switch($1.h) {
4278
+ case 0: /* nothing */ return $0();
4279
+ case undefined: /* just */ return $1.a1;
4280
+ }
4281
+ }
4282
+
4269
4283
  /* Prelude.Uninhabited.void : (0 _ : Void) -> a */
4270
4284
  const Prelude_Uninhabited_void$ = __lazy(function () {
4271
4285
  _crashExp('No clauses in Prelude.Uninhabited.void');
@@ -5543,30 +5557,6 @@ function Data_Nat_divx27($0, $1, $2) {
5543
5557
  }
5544
5558
  }
5545
5559
 
5546
- /* Data.Maybe.isNothing : Maybe a -> Bool */
5547
- function Data_Maybe_isNothing($0) {
5548
- switch($0.h) {
5549
- case 0: /* nothing */ return 1;
5550
- case undefined: /* just */ return 0;
5551
- }
5552
- }
5553
-
5554
- /* Data.Maybe.isJust : Maybe a -> Bool */
5555
- function Data_Maybe_isJust($0) {
5556
- switch($0.h) {
5557
- case 0: /* nothing */ return 0;
5558
- case undefined: /* just */ return 1;
5559
- }
5560
- }
5561
-
5562
- /* Data.Maybe.fromMaybe : Lazy a -> Maybe a -> a */
5563
- function Data_Maybe_fromMaybe($0, $1) {
5564
- switch($1.h) {
5565
- case 0: /* nothing */ return $0();
5566
- case undefined: /* just */ return $1.a1;
5567
- }
5568
- }
5569
-
5570
5560
  /* Data.List1.map */
5571
5561
  function Data_List1_map_Functor_List1($0, $1) {
5572
5562
  return {a1: $0($1.a1), a2: Prelude_Types_List_mapAppend({h: 0}, $0, $1.a2)};
@@ -5587,17 +5577,17 @@ function Data_List1_last($0) {
5587
5577
  return Data_List1_n__3044_2644_loop($0.a1, $0.a2, $0.a1, $0.a2);
5588
5578
  }
5589
5579
 
5590
- /* Data.List.7781:8362:split */
5591
- function Data_List_n__7781_8362_split($0, $1, $2) {
5592
- return Data_List_n__7781_8363_splitRec($0, $1, $2, $2, $9 => $9);
5580
+ /* Data.List.7787:8508:split */
5581
+ function Data_List_n__7787_8508_split($0, $1, $2) {
5582
+ return Data_List_n__7787_8509_splitRec($0, $1, $2, $2, $9 => $9);
5593
5583
  }
5594
5584
 
5595
- /* Data.List.8487:9050:go */
5596
- function Data_List_n__8487_9050_go($0, $1, $2, $3, $4) {
5585
+ /* Data.List.8493:9196:go */
5586
+ function Data_List_n__8493_9196_go($0, $1, $2, $3, $4) {
5597
5587
  switch($4.h) {
5598
5588
  case 0: /* nil */ return {a1: Data_List1_singleton($3), a2: {h: 0}};
5599
5589
  case undefined: /* cons */ {
5600
- const $a = Data_List_n__8487_9050_go($0, $1, $2, $4.a1, $4.a2);
5590
+ const $a = Data_List_n__8493_9196_go($0, $1, $2, $4.a1, $4.a2);
5601
5591
  switch($2($3)($4.a1)) {
5602
5592
  case 1: return {a1: {a1: $3, a2: $a.a1}, a2: $a.a2};
5603
5593
  case 0: return {a1: Data_List1_singleton($3), a2: {a1: $a.a1, a2: $a.a2}};
@@ -5687,13 +5677,13 @@ function Data_List_sortBy($0, $1) {
5687
5677
  switch($1.a2.h) {
5688
5678
  case 0: /* nil */ return {a1: $1.a1, a2: {h: 0}};
5689
5679
  default: {
5690
- const $6 = Data_List_n__7781_8362_split($1, $0, $1);
5680
+ const $6 = Data_List_n__7787_8508_split($1, $0, $1);
5691
5681
  return Data_List_mergeBy($0, Data_List_sortBy($0, $6.a1), Data_List_sortBy($0, $6.a2));
5692
5682
  }
5693
5683
  }
5694
5684
  }
5695
5685
  default: {
5696
- const $15 = Data_List_n__7781_8362_split($1, $0, $1);
5686
+ const $15 = Data_List_n__7787_8508_split($1, $0, $1);
5697
5687
  return Data_List_mergeBy($0, Data_List_sortBy($0, $15.a1), Data_List_sortBy($0, $15.a2));
5698
5688
  }
5699
5689
  }
@@ -5736,7 +5726,7 @@ function Data_List_partition($0, $1) {
5736
5726
 
5737
5727
  /* Data.List.nubBy : (a -> a -> Bool) -> List a -> List a */
5738
5728
  function Data_List_nubBy($0, $1) {
5739
- return Data_List_n__4928_5587_nubByx27({h: 0}, $0, $1);
5729
+ return Data_List_n__4934_5733_nubByx27({h: 0}, $0, $1);
5740
5730
  }
5741
5731
 
5742
5732
  /* Data.List.nub : Eq a => List a -> List a */
@@ -5813,7 +5803,7 @@ function Data_List_groupBy($0, $1) {
5813
5803
  switch($1.h) {
5814
5804
  case 0: /* nil */ return {h: 0};
5815
5805
  case undefined: /* cons */ {
5816
- const $3 = Data_List_n__8487_9050_go($1.a1, $1.a2, $0, $1.a1, $1.a2);
5806
+ const $3 = Data_List_n__8493_9196_go($1.a1, $1.a2, $0, $1.a1, $1.a2);
5817
5807
  return {a1: $3.a1, a2: $3.a2};
5818
5808
  }
5819
5809
  }
@@ -5988,7 +5978,7 @@ const ZshCompletion_script = __lazy(function () {
5988
5978
  });
5989
5979
 
5990
5980
  /* BashCompletion.case block in case block in unhashify */
5991
- function BashCompletion_case__casex20blockx20inx20unhashify_10889($0, $1, $2) {
5981
+ function BashCompletion_case__casex20blockx20inx20unhashify_13171($0, $1, $2) {
5992
5982
  switch($0) {
5993
5983
  case '': {
5994
5984
  switch($2.h) {
@@ -6011,7 +6001,7 @@ function BashCompletion_case__casex20blockx20inx20unhashify_10889($0, $1, $2) {
6011
6001
  }
6012
6002
 
6013
6003
  /* BashCompletion.case block in unhashify */
6014
- function BashCompletion_case__unhashify_10869($0, $1) {
6004
+ function BashCompletion_case__unhashify_13151($0, $1) {
6015
6005
  switch($0) {
6016
6006
  case '': {
6017
6007
  switch($1.h) {
@@ -6021,7 +6011,7 @@ function BashCompletion_case__unhashify_10869($0, $1) {
6021
6011
  case '#': return $1.a2;
6022
6012
  case '\u{5c}': {
6023
6013
  const $6 = ('\u{5c}'+$1.a2);
6024
- return BashCompletion_case__casex20blockx20inx20unhashify_10889($1.a2, $6, Data_String_strM($1.a2));
6014
+ return BashCompletion_case__casex20blockx20inx20unhashify_13171($1.a2, $6, Data_String_strM($1.a2));
6025
6015
  }
6026
6016
  default: return $0;
6027
6017
  }
@@ -6033,7 +6023,7 @@ function BashCompletion_case__unhashify_10869($0, $1) {
6033
6023
  case '#': return $1.a2;
6034
6024
  case '\u{5c}': {
6035
6025
  const $11 = ('\u{5c}'+$1.a2);
6036
- return BashCompletion_case__casex20blockx20inx20unhashify_10889($1.a2, $11, Data_String_strM($1.a2));
6026
+ return BashCompletion_case__casex20blockx20inx20unhashify_13171($1.a2, $11, Data_String_strM($1.a2));
6037
6027
  }
6038
6028
  default: return $0;
6039
6029
  }
@@ -6041,8 +6031,8 @@ function BashCompletion_case__unhashify_10869($0, $1) {
6041
6031
  }
6042
6032
  }
6043
6033
 
6044
- /* BashCompletion.5276:11675:slugsOrLoginsOrLabels */
6045
- function BashCompletion_n__5276_11675_slugsOrLoginsOrLabels($0, $1) {
6034
+ /* BashCompletion.5303:13978:slugsOrLoginsOrLabels */
6035
+ function BashCompletion_n__5303_13978_slugsOrLoginsOrLabels($0, $1) {
6046
6036
  switch(Data_String_isPrefixOf('+', $0)) {
6047
6037
  case 1: return Prelude_Types_List_mapAppend({h: 0}, $9 => ('+'+$9), $1.a12);
6048
6038
  case 0: {
@@ -6061,7 +6051,7 @@ function BashCompletion_unslugify($0) {
6061
6051
 
6062
6052
  /* BashCompletion.unhashify : String -> String */
6063
6053
  function BashCompletion_unhashify($0) {
6064
- return BashCompletion_case__unhashify_10869($0, Data_String_strM($0));
6054
+ return BashCompletion_case__unhashify_13151($0, Data_String_strM($0));
6065
6055
  }
6066
6056
 
6067
6057
  /* BashCompletion.slugify : String -> String */
@@ -6078,7 +6068,7 @@ const BashCompletion_script = __lazy(function () {
6078
6068
  function BashCompletion_optsForRequestCmd($0, $1) {
6079
6069
  switch(Data_String_isPrefixOf($1, '--dry')) {
6080
6070
  case 1: return {a1: '--dry', a2: {h: 0}};
6081
- case 0: return BashCompletion_n__5276_11675_slugsOrLoginsOrLabels($1, $0);
6071
+ case 0: return BashCompletion_n__5303_13978_slugsOrLoginsOrLabels($1, $0);
6082
6072
  }
6083
6073
  }
6084
6074
 
@@ -6290,7 +6280,12 @@ function BashCompletion_cmdOpts($0, $1, $2) {
6290
6280
  case 'quick': {
6291
6281
  switch(Data_String_isPrefixOf($1, '--')) {
6292
6282
  case 1: return {a1: {a1: '--bugfix', a2: {h: 0}}};
6293
- case 0: return {a1: {h: 0}};
6283
+ case 0: {
6284
+ switch(Data_String_isPrefixOf($1, '--bugfix')) {
6285
+ case 1: return {a1: {a1: '--bugfix', a2: {h: 0}}};
6286
+ case 0: return {a1: {h: 0}};
6287
+ }
6288
+ }
6294
6289
  }
6295
6290
  }
6296
6291
  default: return {h: 0};
@@ -6306,7 +6301,12 @@ function BashCompletion_cmdOpts($0, $1, $2) {
6306
6301
  case 'quick': {
6307
6302
  switch(Data_String_isPrefixOf($1, '--')) {
6308
6303
  case 1: return {a1: {a1: '--bugfix', a2: {h: 0}}};
6309
- case 0: return {a1: {h: 0}};
6304
+ case 0: {
6305
+ switch(Data_String_isPrefixOf($1, '--bugfix')) {
6306
+ case 1: return {a1: {a1: '--bugfix', a2: {h: 0}}};
6307
+ case 0: return {a1: {h: 0}};
6308
+ }
6309
+ }
6310
6310
  }
6311
6311
  }
6312
6312
  default: return {h: 0};
@@ -6319,7 +6319,12 @@ function BashCompletion_cmdOpts($0, $1, $2) {
6319
6319
  case 'quick': {
6320
6320
  switch(Data_String_isPrefixOf($1, '--')) {
6321
6321
  case 1: return {a1: {a1: '--bugfix', a2: {h: 0}}};
6322
- case 0: return {a1: {h: 0}};
6322
+ case 0: {
6323
+ switch(Data_String_isPrefixOf($1, '--bugfix')) {
6324
+ case 1: return {a1: {a1: '--bugfix', a2: {h: 0}}};
6325
+ case 0: return {a1: {h: 0}};
6326
+ }
6327
+ }
6323
6328
  }
6324
6329
  }
6325
6330
  default: return {h: 0};
@@ -6465,7 +6470,7 @@ function BashCompletion_cmdOpts($0, $1, $2) {
6465
6470
  }
6466
6471
  default: {
6467
6472
  switch($2) {
6468
- case 'harmony': return {a1: Prelude_Types_List_filterAppend({h: 0}, $ca => Data_String_isPrefixOf($1, $ca), BashCompletion_allRootCmds())};
6473
+ case 'harmony': return {a1: Prelude_Types_List_filterAppend({h: 0}, $df => Data_String_isPrefixOf($1, $df), BashCompletion_allRootCmds())};
6469
6474
  default: {
6470
6475
  switch($0) {
6471
6476
  case 'sync': return {a1: {h: 0}};
@@ -6480,7 +6485,7 @@ function BashCompletion_cmdOpts($0, $1, $2) {
6480
6485
  case 'help': return {a1: BashCompletion_allRootCmds()};
6481
6486
  default: {
6482
6487
  switch($2) {
6483
- case 'help': return {a1: Prelude_Types_List_filterAppend({h: 0}, $df => Data_String_isPrefixOf($1, $df), BashCompletion_allRootCmds())};
6488
+ case 'help': return {a1: Prelude_Types_List_filterAppend({h: 0}, $f4 => Data_String_isPrefixOf($1, $f4), BashCompletion_allRootCmds())};
6484
6489
  default: return {h: 0};
6485
6490
  }
6486
6491
  }
@@ -6488,7 +6493,7 @@ function BashCompletion_cmdOpts($0, $1, $2) {
6488
6493
  }
6489
6494
  default: {
6490
6495
  switch($2) {
6491
- case 'help': return {a1: Prelude_Types_List_filterAppend({h: 0}, $ea => Data_String_isPrefixOf($1, $ea), BashCompletion_allRootCmds())};
6496
+ case 'help': return {a1: Prelude_Types_List_filterAppend({h: 0}, $ff => Data_String_isPrefixOf($1, $ff), BashCompletion_allRootCmds())};
6492
6497
  default: return {h: 0};
6493
6498
  }
6494
6499
  }
@@ -6504,7 +6509,12 @@ function BashCompletion_cmdOpts($0, $1, $2) {
6504
6509
  case 'quick': {
6505
6510
  switch(Data_String_isPrefixOf($1, '--')) {
6506
6511
  case 1: return {a1: {a1: '--bugfix', a2: {h: 0}}};
6507
- case 0: return {a1: {h: 0}};
6512
+ case 0: {
6513
+ switch(Data_String_isPrefixOf($1, '--bugfix')) {
6514
+ case 1: return {a1: {a1: '--bugfix', a2: {h: 0}}};
6515
+ case 0: return {a1: {h: 0}};
6516
+ }
6517
+ }
6508
6518
  }
6509
6519
  }
6510
6520
  default: return {h: 0};
@@ -6520,7 +6530,12 @@ function BashCompletion_cmdOpts($0, $1, $2) {
6520
6530
  case 'quick': {
6521
6531
  switch(Data_String_isPrefixOf($1, '--')) {
6522
6532
  case 1: return {a1: {a1: '--bugfix', a2: {h: 0}}};
6523
- case 0: return {a1: {h: 0}};
6533
+ case 0: {
6534
+ switch(Data_String_isPrefixOf($1, '--bugfix')) {
6535
+ case 1: return {a1: {a1: '--bugfix', a2: {h: 0}}};
6536
+ case 0: return {a1: {h: 0}};
6537
+ }
6538
+ }
6524
6539
  }
6525
6540
  }
6526
6541
  default: return {h: 0};
@@ -6533,7 +6548,12 @@ function BashCompletion_cmdOpts($0, $1, $2) {
6533
6548
  case 'quick': {
6534
6549
  switch(Data_String_isPrefixOf($1, '--')) {
6535
6550
  case 1: return {a1: {a1: '--bugfix', a2: {h: 0}}};
6536
- case 0: return {a1: {h: 0}};
6551
+ case 0: {
6552
+ switch(Data_String_isPrefixOf($1, '--bugfix')) {
6553
+ case 1: return {a1: {a1: '--bugfix', a2: {h: 0}}};
6554
+ case 0: return {a1: {h: 0}};
6555
+ }
6556
+ }
6537
6557
  }
6538
6558
  }
6539
6559
  default: return {h: 0};
@@ -6684,7 +6704,7 @@ const BashCompletion_allRootCmds = __lazy(function () {
6684
6704
  });
6685
6705
 
6686
6706
  /* FFI.Git.case block in unpushedCommits */
6687
- function FFI_Git_case__unpushedCommits_10643($0, $1, $2) {
6707
+ function FFI_Git_case__unpushedCommits_12925($0, $1, $2) {
6688
6708
  switch($1) {
6689
6709
  case '': {
6690
6710
  switch($2.h) {
@@ -6697,7 +6717,7 @@ function FFI_Git_case__unpushedCommits_10643($0, $1, $2) {
6697
6717
  }
6698
6718
 
6699
6719
  /* FFI.Git.case block in stagedChanges */
6700
- function FFI_Git_case__stagedChanges_10578($0, $1, $2) {
6720
+ function FFI_Git_case__stagedChanges_12860($0, $1, $2) {
6701
6721
  switch($1) {
6702
6722
  case '': {
6703
6723
  switch($2.h) {
@@ -6710,7 +6730,7 @@ function FFI_Git_case__stagedChanges_10578($0, $1, $2) {
6710
6730
  }
6711
6731
 
6712
6732
  /* FFI.Git.case block in uncommittedChanges */
6713
- function FFI_Git_case__uncommittedChanges_10513($0, $1, $2) {
6733
+ function FFI_Git_case__uncommittedChanges_12795($0, $1, $2) {
6714
6734
  switch($1) {
6715
6735
  case '': {
6716
6736
  switch($2.h) {
@@ -6723,7 +6743,7 @@ function FFI_Git_case__uncommittedChanges_10513($0, $1, $2) {
6723
6743
  }
6724
6744
 
6725
6745
  /* FFI.Git.case block in remoteTrackingBranch */
6726
- function FFI_Git_case__remoteTrackingBranch_10448($0, $1, $2) {
6746
+ function FFI_Git_case__remoteTrackingBranch_12730($0, $1, $2) {
6727
6747
  switch($1) {
6728
6748
  case '': {
6729
6749
  switch($2.h) {
@@ -6742,17 +6762,17 @@ function FFI_Git_userEmail($0, $1, $2) {
6742
6762
 
6743
6763
  /* FFI.Git.unpushedCommits : Git => Promise' (Maybe String) */
6744
6764
  function FFI_Git_unpushedCommits($0, $1, $2) {
6745
- 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_10643($0, str, Data_String_strM(str)), $14, $15), $1, $2);
6765
+ 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_12925($0, str, Data_String_strM(str)), $14, $15), $1, $2);
6746
6766
  }
6747
6767
 
6748
6768
  /* FFI.Git.uncommittedChanges : Git => Promise' (Maybe String) */
6749
6769
  function FFI_Git_uncommittedChanges($0, $1, $2) {
6750
- 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_10513($0, str, Data_String_strM(str)), $14, $15), $1, $2);
6770
+ 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_12795($0, str, Data_String_strM(str)), $14, $15), $1, $2);
6751
6771
  }
6752
6772
 
6753
6773
  /* FFI.Git.stagedChanges : Git => Promise' (Maybe String) */
6754
6774
  function FFI_Git_stagedChanges($0, $1, $2) {
6755
- 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_10578($0, str, Data_String_strM(str)), $14, $15), $1, $2);
6775
+ 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_12860($0, str, Data_String_strM(str)), $14, $15), $1, $2);
6756
6776
  }
6757
6777
 
6758
6778
  /* FFI.Git.rootDir : Git => Promise' String */
@@ -6767,7 +6787,7 @@ function FFI_Git_remoteURI($0, $1, $2, $3) {
6767
6787
 
6768
6788
  /* FFI.Git.remoteTrackingBranch : Git => Promise' (Maybe String) */
6769
6789
  function FFI_Git_remoteTrackingBranch($0, $1, $2) {
6770
- 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_10448($0, str, Data_String_strM(str)), $14, $15), $1, $2);
6790
+ 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_12730($0, str, Data_String_strM(str)), $14, $15), $1, $2);
6771
6791
  }
6772
6792
 
6773
6793
  /* FFI.Git.pushNewBranch : Git => String -> String -> Promise' () */
@@ -6937,13 +6957,13 @@ function Data_Promise_bind($0, $1, $2, $3) {
6937
6957
  return $4($3);
6938
6958
  }
6939
6959
 
6940
- /* Data.Config.9652:7042:personalAccessToken */
6941
- function Data_Config_n__9652_7042_personalAccessToken($0) {
6960
+ /* Data.Config.9658:7042:personalAccessToken */
6961
+ function Data_Config_n__9658_7042_personalAccessToken($0) {
6942
6962
  return Prelude_Types_maybe(() => 'Not set (will use $GITHUB_PAT or $GH_TOKEN environment variable)', () => $4 => Data_Config_show_Show_x28Hiddenx20x24ax29($4), $0.a14);
6943
6963
  }
6944
6964
 
6945
- /* Data.Config.10208:7588:parseConfigJson */
6946
- function Data_Config_n__10208_7588_parseConfigJson($0, $1) {
6965
+ /* Data.Config.10214:7588:parseConfigJson */
6966
+ function Data_Config_n__10214_7588_parseConfigJson($0, $1) {
6947
6967
  switch($1.h) {
6948
6968
  case 6: /* JObject */ {
6949
6969
  const $20 = $21 => {
@@ -7011,7 +7031,7 @@ function Data_Config_ParseBranchStrategy_show_Show_ParseBranchStrategy($0) {
7011
7031
 
7012
7032
  /* Data.Config.show */
7013
7033
  function Data_Config_show_Show_Config($0) {
7014
- return Data_String_fastUnlines({a1: Prelude_Types_foldMap_Foldable_List(csegen_51()(), $9 => $9, {a1: ' updatedAt: ', a2: {a1: Prelude_Show_show_Show_Bits32($0.a1), a2: {h: 0}}}), a2: {a1: Prelude_Types_foldMap_Foldable_List(csegen_51()(), $19 => $19, {a1: ' theme: ', a2: {a1: Data_Theme_show_Show_Theme($0.a15), a2: {h: 0}}}), a2: {a1: Prelude_Types_foldMap_Foldable_List(csegen_51()(), $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_51()(), $39 => $39, {a1: ' repo: ', a2: {a1: Prelude_Show_show_Show_String($0.a3), a2: {h: 0}}}), a2: {a1: Prelude_Types_foldMap_Foldable_List(csegen_51()(), $49 => $49, {a1: ' defaultRemote: ', a2: {a1: Prelude_Show_show_Show_String($0.a4), a2: {h: 0}}}), a2: {a1: Prelude_Types_foldMap_Foldable_List(csegen_51()(), $59 => $59, {a1: ' mainBranch: ', a2: {a1: Prelude_Show_show_Show_String($0.a5), a2: {h: 0}}}), a2: {a1: Prelude_Types_foldMap_Foldable_List(csegen_51()(), $69 => $69, {a1: ' requestTeams: ', a2: {a1: Prelude_Show_show_Show_Bool($0.a6), a2: {h: 0}}}), a2: {a1: Prelude_Types_foldMap_Foldable_List(csegen_51()(), $79 => $79, {a1: ' requestUsers: ', a2: {a1: Prelude_Show_show_Show_Bool($0.a7), a2: {h: 0}}}), a2: {a1: Prelude_Types_foldMap_Foldable_List(csegen_51()(), $89 => $89, {a1: 'commentOnRequest: ', a2: {a1: Data_Config_CommentStrategy_show_Show_CommentStrategy($0.a8), a2: {h: 0}}}), a2: {a1: Prelude_Types_foldMap_Foldable_List(csegen_51()(), $99 => $99, {a1: ' branchParsing: ', a2: {a1: Data_Config_ParseBranchStrategy_show_Show_ParseBranchStrategy($0.a9), a2: {h: 0}}}), a2: {a1: Prelude_Types_foldMap_Foldable_List(csegen_51()(), $a9 => $a9, {a1: ' teamSlugs: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_53(), $0.a10), a2: {h: 0}}}), a2: {a1: Prelude_Types_foldMap_Foldable_List(csegen_51()(), $bb => $bb, {a1: ' repoLabels: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_53(), $0.a11), a2: {h: 0}}}), a2: {a1: Prelude_Types_foldMap_Foldable_List(csegen_51()(), $cd => $cd, {a1: ' orgMembers: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_53(), $0.a12), a2: {h: 0}}}), a2: {a1: Prelude_Types_foldMap_Foldable_List(csegen_51()(), $df => $df, {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.a13), a2: {h: 0}}}), a2: {a1: Prelude_Types_foldMap_Foldable_List(csegen_51()(), $f7 => $f7, {a1: ' githubPAT: ', a2: {a1: Data_Config_n__9652_7042_personalAccessToken($0), a2: {h: 0}}}), a2: {h: 0}}}}}}}}}}}}}}}});
7034
+ return Data_String_fastUnlines({a1: Prelude_Types_foldMap_Foldable_List(csegen_51()(), $9 => $9, {a1: ' updatedAt: ', a2: {a1: Prelude_Show_show_Show_Bits32($0.a1), a2: {h: 0}}}), a2: {a1: Prelude_Types_foldMap_Foldable_List(csegen_51()(), $19 => $19, {a1: ' theme: ', a2: {a1: Data_Theme_show_Show_Theme($0.a15), a2: {h: 0}}}), a2: {a1: Prelude_Types_foldMap_Foldable_List(csegen_51()(), $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_51()(), $39 => $39, {a1: ' repo: ', a2: {a1: Prelude_Show_show_Show_String($0.a3), a2: {h: 0}}}), a2: {a1: Prelude_Types_foldMap_Foldable_List(csegen_51()(), $49 => $49, {a1: ' defaultRemote: ', a2: {a1: Prelude_Show_show_Show_String($0.a4), a2: {h: 0}}}), a2: {a1: Prelude_Types_foldMap_Foldable_List(csegen_51()(), $59 => $59, {a1: ' mainBranch: ', a2: {a1: Prelude_Show_show_Show_String($0.a5), a2: {h: 0}}}), a2: {a1: Prelude_Types_foldMap_Foldable_List(csegen_51()(), $69 => $69, {a1: ' requestTeams: ', a2: {a1: Prelude_Show_show_Show_Bool($0.a6), a2: {h: 0}}}), a2: {a1: Prelude_Types_foldMap_Foldable_List(csegen_51()(), $79 => $79, {a1: ' requestUsers: ', a2: {a1: Prelude_Show_show_Show_Bool($0.a7), a2: {h: 0}}}), a2: {a1: Prelude_Types_foldMap_Foldable_List(csegen_51()(), $89 => $89, {a1: 'commentOnRequest: ', a2: {a1: Data_Config_CommentStrategy_show_Show_CommentStrategy($0.a8), a2: {h: 0}}}), a2: {a1: Prelude_Types_foldMap_Foldable_List(csegen_51()(), $99 => $99, {a1: ' branchParsing: ', a2: {a1: Data_Config_ParseBranchStrategy_show_Show_ParseBranchStrategy($0.a9), a2: {h: 0}}}), a2: {a1: Prelude_Types_foldMap_Foldable_List(csegen_51()(), $a9 => $a9, {a1: ' teamSlugs: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_53(), $0.a10), a2: {h: 0}}}), a2: {a1: Prelude_Types_foldMap_Foldable_List(csegen_51()(), $bb => $bb, {a1: ' repoLabels: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_53(), $0.a11), a2: {h: 0}}}), a2: {a1: Prelude_Types_foldMap_Foldable_List(csegen_51()(), $cd => $cd, {a1: ' orgMembers: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_53(), $0.a12), a2: {h: 0}}}), a2: {a1: Prelude_Types_foldMap_Foldable_List(csegen_51()(), $df => $df, {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.a13), a2: {h: 0}}}), a2: {a1: Prelude_Types_foldMap_Foldable_List(csegen_51()(), $f7 => $f7, {a1: ' githubPAT: ', a2: {a1: Data_Config_n__9658_7042_personalAccessToken($0), a2: {h: 0}}}), a2: {h: 0}}}}}}}}}}}}}}}});
7015
7035
  }
7016
7036
 
7017
7037
  /* Data.Config.CommentStrategy.show */
@@ -7098,7 +7118,7 @@ function Data_Config_propHelpx27($0) {
7098
7118
 
7099
7119
  /* Data.Config.parseConfig : Ephemeral -> String -> Either String Config */
7100
7120
  function Data_Config_parseConfig($0, $1) {
7101
- return Prelude_Interfaces_x3ex3dx3e(csegen_227(), csegen_228(), $8 => Data_Config_n__10208_7588_parseConfigJson($0, $8), $1);
7121
+ return Prelude_Interfaces_x3ex3dx3e(csegen_227(), csegen_228(), $8 => Data_Config_n__10214_7588_parseConfigJson($0, $8), $1);
7102
7122
  }
7103
7123
 
7104
7124
  /* Data.Config.CommentStrategy.parseCommentConfig : String -> Maybe CommentStrategy */
@@ -7155,8 +7175,8 @@ function Data_Config_boolToCommentConfig($0) {
7155
7175
  }
7156
7176
  }
7157
7177
 
7158
- /* Language.JSON.Accessors.6297:18297:lookup' */
7159
- function Language_JSON_Accessors_n__6297_18297_lookupx27($0, $1, $2, $3, $4) {
7178
+ /* Language.JSON.Accessors.6303:18297:lookup' */
7179
+ function Language_JSON_Accessors_n__6303_18297_lookupx27($0, $1, $2, $3, $4) {
7160
7180
  return Data_Either_maybeToEither(() => Prelude_Types_foldMap_Foldable_List(csegen_51()(), $c => $c, {a1: 'Missing required key: ', a2: {a1: $3, a2: {a1: '.', a2: {h: 0}}}}), Data_List_lookup(csegen_40(), $3, $4));
7161
7181
  }
7162
7182
 
@@ -7212,7 +7232,7 @@ function Language_JSON_Accessors_lookupAll($0, $1) {
7212
7232
  switch($0.h) {
7213
7233
  case 0: /* nil */ return {h: 1 /* Right */, a1: {h: 0}};
7214
7234
  case undefined: /* cons */ {
7215
- const $4 = Language_JSON_Accessors_n__6297_18297_lookupx27($0.a1, $0.a2, $1, $0.a1, $1);
7235
+ const $4 = Language_JSON_Accessors_n__6303_18297_lookupx27($0.a1, $0.a2, $1, $0.a1, $1);
7216
7236
  switch($4.h) {
7217
7237
  case 1: /* Right */ {
7218
7238
  const $b = Language_JSON_Accessors_lookupAll($0.a2, $1);
@@ -7263,7 +7283,7 @@ function Language_JSON_Accessors_access($0, $1, $2, $3) {
7263
7283
  }
7264
7284
 
7265
7285
  /* JSON.Parser.case block in case block in parseJSON */
7266
- function JSON_Parser_case__casex20blockx20inx20parseJSON_20997($0, $1, $2, $3) {
7286
+ function JSON_Parser_case__casex20blockx20inx20parseJSON_23279($0, $1, $2, $3) {
7267
7287
  switch($3.h) {
7268
7288
  case 1: /* Fail0 */ return {h: 0 /* Left */, a1: Text_ParseError_toParseError($1, $0, $3.a1)};
7269
7289
  case 0: /* Succ0 */ {
@@ -7291,9 +7311,9 @@ function JSON_Parser_case__casex20blockx20inx20parseJSON_20997($0, $1, $2, $3) {
7291
7311
  }
7292
7312
 
7293
7313
  /* JSON.Parser.case block in parseJSON */
7294
- function JSON_Parser_case__parseJSON_20977($0, $1, $2) {
7314
+ function JSON_Parser_case__parseJSON_23259($0, $1, $2) {
7295
7315
  switch($2.h) {
7296
- case 1: /* Right */ return JSON_Parser_case__casex20blockx20inx20parseJSON_20997($0, $1, $2.a1, JSON_Parser_value($2.a1));
7316
+ case 1: /* Right */ return JSON_Parser_case__casex20blockx20inx20parseJSON_23279($0, $1, $2.a1, JSON_Parser_value($2.a1));
7297
7317
  case 0: /* Left */ return {h: 0 /* Left */, a1: Text_ParseError_toParseError($1, $0, $2.a1)};
7298
7318
  }
7299
7319
  }
@@ -7556,7 +7576,7 @@ function JSON_Parser_showImpl($0) {
7556
7576
 
7557
7577
  /* JSON.Parser.parseJSON : Origin -> String -> Either (ParseError Void) JSON */
7558
7578
  function JSON_Parser_parseJSON($0, $1) {
7559
- return JSON_Parser_case__parseJSON_20977($1, $0, JSON_Parser_lexJSON($1));
7579
+ return JSON_Parser_case__parseJSON_23259($1, $0, JSON_Parser_lexJSON($1));
7560
7580
  }
7561
7581
 
7562
7582
  /* JSON.Parser.numberToken : SnocList Char -> JSToken */
@@ -8464,37 +8484,37 @@ function FFI_Term_termCols($0) {
8464
8484
  }
8465
8485
  }
8466
8486
 
8467
- /* FFI.GitHub.6763:18487:unexpectedPayload */
8468
- function FFI_GitHub_n__6763_18487_unexpectedPayload($0, $1) {
8487
+ /* FFI.GitHub.6769:18487:unexpectedPayload */
8488
+ function FFI_GitHub_n__6769_18487_unexpectedPayload($0, $1) {
8469
8489
  return FFI_GitHub_internalError(Prelude_Types_foldMap_Foldable_List(csegen_51()(), $9 => $9, {a1: 'Unexpected error JSON: ', a2: {a1: $0, a2: {h: 0}}}));
8470
8490
  }
8471
8491
 
8472
- /* FFI.GitHub.6763:18486:parse */
8473
- function FFI_GitHub_n__6763_18486_parse($0, $1) {
8492
+ /* FFI.GitHub.6769:18486:parse */
8493
+ function FFI_GitHub_n__6769_18486_parse($0, $1) {
8474
8494
  switch($1.h) {
8475
8495
  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}}))));
8476
8496
  default: return {h: 0 /* Left */, a1: 'Expected an Object containing error and status keys'};
8477
8497
  }
8478
8498
  }
8479
8499
 
8480
- /* FFI.GitHub.8248:20015:errString */
8481
- function FFI_GitHub_n__8248_20015_errString($0, $1) {
8500
+ /* FFI.GitHub.8254:20015:errString */
8501
+ function FFI_GitHub_n__8254_20015_errString($0, $1) {
8482
8502
  switch($1.h) {
8483
8503
  case 0: /* nothing */ return 'You can only use teams with repositories belonging to GitHub organizations';
8484
8504
  case undefined: /* just */ return $1.a1;
8485
8505
  }
8486
8506
  }
8487
8507
 
8488
- /* FFI.GitHub.7159:18911:errString */
8489
- function FFI_GitHub_n__7159_18911_errString($0, $1) {
8508
+ /* FFI.GitHub.7165:18911:errString */
8509
+ function FFI_GitHub_n__7165_18911_errString($0, $1) {
8490
8510
  switch($1.h) {
8491
8511
  case 0: /* nothing */ return 'You can only list teams for repositories belonging to GitHub organizations';
8492
8512
  case undefined: /* just */ return $1.a1;
8493
8513
  }
8494
8514
  }
8495
8515
 
8496
- /* FFI.GitHub.6896:18620:errMsg */
8497
- function FFI_GitHub_n__6896_18620_errMsg($0) {
8516
+ /* FFI.GitHub.6902:18620:errMsg */
8517
+ function FFI_GitHub_n__6902_18620_errMsg($0) {
8498
8518
  return Prelude_Types_either(() => csegen_318()(), () => csegen_318()(), $0);
8499
8519
  }
8500
8520
 
@@ -8538,7 +8558,7 @@ function FFI_GitHub_parseError($0) {
8538
8558
  let $2;
8539
8559
  switch($3.h) {
8540
8560
  case 0: /* Left */ {
8541
- $2 = {h: 0 /* Left */, a1: FFI_GitHub_n__6763_18487_unexpectedPayload($0, $3.a1)};
8561
+ $2 = {h: 0 /* Left */, a1: FFI_GitHub_n__6769_18487_unexpectedPayload($0, $3.a1)};
8542
8562
  break;
8543
8563
  }
8544
8564
  case 1: /* Right */ {
@@ -8547,7 +8567,7 @@ function FFI_GitHub_parseError($0) {
8547
8567
  }
8548
8568
  }
8549
8569
  const $c = json => {
8550
- const $d = FFI_GitHub_n__6763_18486_parse($0, json);
8570
+ const $d = FFI_GitHub_n__6769_18486_parse($0, json);
8551
8571
  switch($d.h) {
8552
8572
  case 0: /* Left */ return {h: 0 /* Left */, a1: FFI_GitHub_internalError($d.a1)};
8553
8573
  case 1: /* Right */ return {h: 1 /* Right */, a1: $d.a1};
@@ -8639,7 +8659,7 @@ function FFI_GitHub_internalError($0) {
8639
8659
 
8640
8660
  /* FFI.GitHub.ignoreStatus : Promise String a -> Promise String a */
8641
8661
  function FFI_GitHub_ignoreStatus($0, $1, $2) {
8642
- return Data_Promise_mapError($5 => FFI_GitHub_n__6896_18620_errMsg(FFI_GitHub_parseError($5)), $0, $1, $2);
8662
+ return Data_Promise_mapError($5 => FFI_GitHub_n__6902_18620_errMsg(FFI_GitHub_parseError($5)), $0, $1, $2);
8643
8663
  }
8644
8664
 
8645
8665
  /* FFI.GitHub.getUser : Octokit => String -> Promise String User */
@@ -8669,12 +8689,12 @@ function FFI_GitHub_getIssue($0, $1, $2, $3) {
8669
8689
 
8670
8690
  /* FFI.GitHub.forceListTeams : Octokit => String -> Promise' (List String) */
8671
8691
  function FFI_GitHub_forceListTeams($0, $1, $2, $3) {
8672
- return Data_Promise_mapError($6 => FFI_GitHub_n__7159_18911_errString($0, $6), $b => $c => FFI_GitHub_listTeams($0, $1, $b, $c), $2, $3);
8692
+ return Data_Promise_mapError($6 => FFI_GitHub_n__7165_18911_errString($0, $6), $b => $c => FFI_GitHub_listTeams($0, $1, $b, $c), $2, $3);
8673
8693
  }
8674
8694
 
8675
8695
  /* FFI.GitHub.forceListTeamMembers : Octokit => String -> String -> Promise' (List String) */
8676
8696
  function FFI_GitHub_forceListTeamMembers($0, $1, $2, $3, $4) {
8677
- return Data_Promise_mapError($7 => FFI_GitHub_n__8248_20015_errString($0, $7), $c => $d => FFI_GitHub_listTeamMembers($0, $1, $2, $c, $d), $3, $4);
8697
+ return Data_Promise_mapError($7 => FFI_GitHub_n__8254_20015_errString($0, $7), $c => $d => FFI_GitHub_listTeamMembers($0, $1, $2, $c, $d), $3, $4);
8678
8698
  }
8679
8699
 
8680
8700
  /* FFI.GitHub.createPR : Octokit => {default False _ : Bool} ->
@@ -8750,8 +8770,8 @@ function Data_Review_isAuthor($0, $1) {
8750
8770
  return Prelude_EqOrd_x3dx3d_Eq_String($1.a2, $0);
8751
8771
  }
8752
8772
 
8753
- /* Data.Date.4986:11703:parseNat */
8754
- function Data_Date_n__4986_11703_parseNat($0, $1, $2) {
8773
+ /* Data.Date.4986:11849:parseNat */
8774
+ function Data_Date_n__4986_11849_parseNat($0, $1, $2) {
8755
8775
  switch($2) {
8756
8776
  case '0': return {a1: 0n};
8757
8777
  case '1': return {a1: 1n};
@@ -8767,12 +8787,12 @@ function Data_Date_n__4986_11703_parseNat($0, $1, $2) {
8767
8787
  }
8768
8788
  }
8769
8789
 
8770
- /* Data.Date.5103:11821:guardSuccess */
8771
- function Data_Date_n__5103_11821_guardSuccess($0) {
8790
+ /* Data.Date.5103:11967:guardSuccess */
8791
+ function Data_Date_n__5103_11967_guardSuccess($0) {
8772
8792
  switch($0.h) {
8773
8793
  case undefined: /* cons */ {
8774
8794
  switch($0.a1.h) {
8775
- case 3: /* 5103:11810:Day */ {
8795
+ case 3: /* 5103:11956:Day */ {
8776
8796
  switch($0.a2.h) {
8777
8797
  case undefined: /* cons */ {
8778
8798
  switch($0.a2.a2.h) {
@@ -8790,28 +8810,28 @@ function Data_Date_n__5103_11821_guardSuccess($0) {
8790
8810
  }
8791
8811
  }
8792
8812
 
8793
- /* Data.Date.5103:11820:go */
8794
- function Data_Date_n__5103_11820_go($0, $1) {
8813
+ /* Data.Date.5103:11966:go */
8814
+ function Data_Date_n__5103_11966_go($0, $1) {
8795
8815
  switch($0.a1.h) {
8796
- case 4: /* 5103:11811:Fail */ return {a1: {h: 4 /* 5103:11811:Fail */}, a2: undefined};
8797
- case 0: /* 5103:11818:Start */ {
8816
+ case 4: /* 5103:11957:Fail */ return {a1: {h: 4 /* 5103:11957:Fail */}, a2: undefined};
8817
+ case 0: /* 5103:11964:Start */ {
8798
8818
  switch(Prelude_Types_isDigit($1)) {
8799
- case 1: return {a1: {h: 1 /* 5103:11813:P */, a1: 0}, a2: {a1: $1, a2: {h: 0}}};
8800
- case 0: return {a1: {h: 4 /* 5103:11811:Fail */}, a2: undefined};
8819
+ case 1: return {a1: {h: 1 /* 5103:11959:P */, a1: 0}, a2: {a1: $1, a2: {h: 0}}};
8820
+ case 0: return {a1: {h: 4 /* 5103:11957:Fail */}, a2: undefined};
8801
8821
  }
8802
8822
  }
8803
- case 1: /* 5103:11813:P */ {
8823
+ case 1: /* 5103:11959:P */ {
8804
8824
  switch($0.a1.a1) {
8805
8825
  case 0: {
8806
8826
  switch($1) {
8807
8827
  case '-': {
8808
8828
  const $12 = Data_Date_parsePositiveReversed($0.a2);
8809
8829
  switch($12.h) {
8810
- case 0: /* nothing */ return {a1: {h: 4 /* 5103:11811:Fail */}, a2: undefined};
8811
- case undefined: /* just */ return {a1: {h: 2 /* 5103:11817:S */, a1: 0}, a2: $12.a1};
8830
+ case 0: /* nothing */ return {a1: {h: 4 /* 5103:11957:Fail */}, a2: undefined};
8831
+ case undefined: /* just */ return {a1: {h: 2 /* 5103:11963:S */, a1: 0}, a2: $12.a1};
8812
8832
  }
8813
8833
  }
8814
- default: return {a1: {h: 1 /* 5103:11813:P */, a1: 0}, a2: {a1: $1, a2: $0.a2}};
8834
+ default: return {a1: {h: 1 /* 5103:11959:P */, a1: 0}, a2: {a1: $1, a2: $0.a2}};
8815
8835
  }
8816
8836
  }
8817
8837
  case 1: {
@@ -8819,32 +8839,32 @@ function Data_Date_n__5103_11820_go($0, $1) {
8819
8839
  case '-': {
8820
8840
  const $21 = Data_Date_parsePositiveReversed($0.a2.a2);
8821
8841
  switch($21.h) {
8822
- case 0: /* nothing */ return {a1: {h: 4 /* 5103:11811:Fail */}, a2: undefined};
8823
- case undefined: /* just */ return {a1: {h: 2 /* 5103:11817:S */, a1: 1}, a2: {a1: $0.a2.a1, a2: $21.a1}};
8842
+ case 0: /* nothing */ return {a1: {h: 4 /* 5103:11957:Fail */}, a2: undefined};
8843
+ case undefined: /* just */ return {a1: {h: 2 /* 5103:11963:S */, a1: 1}, a2: {a1: $0.a2.a1, a2: $21.a1}};
8824
8844
  }
8825
8845
  }
8826
- default: return {a1: {h: 1 /* 5103:11813:P */, a1: 1}, a2: {a1: $0.a2.a1, a2: {a1: $1, a2: $0.a2.a2}}};
8846
+ default: return {a1: {h: 1 /* 5103:11959:P */, a1: 1}, a2: {a1: $0.a2.a1, a2: {a1: $1, a2: $0.a2.a2}}};
8827
8847
  }
8828
8848
  }
8829
8849
  }
8830
8850
  }
8831
- case 2: /* 5103:11817:S */ {
8851
+ case 2: /* 5103:11963:S */ {
8832
8852
  switch($0.a1.a1) {
8833
8853
  case 0: {
8834
8854
  switch(Prelude_Types_isDigit($1)) {
8835
- case 1: return {a1: {h: 1 /* 5103:11813:P */, a1: 1}, a2: {a1: $0.a2, a2: {a1: $1, a2: {h: 0}}}};
8836
- case 0: return {a1: {h: 4 /* 5103:11811:Fail */}, a2: undefined};
8855
+ case 1: return {a1: {h: 1 /* 5103:11959:P */, a1: 1}, a2: {a1: $0.a2, a2: {a1: $1, a2: {h: 0}}}};
8856
+ case 0: return {a1: {h: 4 /* 5103:11957:Fail */}, a2: undefined};
8837
8857
  }
8838
8858
  }
8839
8859
  case 1: {
8840
8860
  switch(Prelude_Types_isDigit($1)) {
8841
- case 1: return {a1: {h: 3 /* 5103:11810:Day */}, a2: {a1: $0.a2.a1, a2: {a1: $0.a2.a2, a2: {a1: $1, a2: {h: 0}}}}};
8842
- case 0: return {a1: {h: 4 /* 5103:11811:Fail */}, a2: undefined};
8861
+ case 1: return {a1: {h: 3 /* 5103:11956:Day */}, a2: {a1: $0.a2.a1, a2: {a1: $0.a2.a2, a2: {a1: $1, a2: {h: 0}}}}};
8862
+ case 0: return {a1: {h: 4 /* 5103:11957:Fail */}, a2: undefined};
8843
8863
  }
8844
8864
  }
8845
8865
  }
8846
8866
  }
8847
- case 3: /* 5103:11810:Day */ return {a1: {h: 3 /* 5103:11810:Day */}, a2: {a1: $0.a2.a1, a2: {a1: $0.a2.a2.a1, a2: {a1: $1, a2: $0.a2.a2.a2}}}};
8867
+ case 3: /* 5103:11956:Day */ return {a1: {h: 3 /* 5103:11956:Day */}, a2: {a1: $0.a2.a1, a2: {a1: $0.a2.a2.a1, a2: {a1: $1, a2: $0.a2.a2.a2}}}};
8848
8868
  }
8849
8869
  }
8850
8870
 
@@ -8924,7 +8944,7 @@ function Data_Date_showYearAndMonth($0) {
8924
8944
  function Data_Date_parsePositiveReversed($0) {
8925
8945
  switch($0.h) {
8926
8946
  case 0: /* nil */ return {a1: 0n};
8927
- case undefined: /* cons */ return Prelude_Types_x3ex3ex3d_Monad_Maybe(Data_Date_n__4986_11703_parseNat($0.a1, $0.a2, $0.a1), n => Prelude_Types_x3ex3ex3d_Monad_Maybe(Data_Date_parsePositiveReversed($0.a2), $f => ({a1: (n+($f*10n))})));
8947
+ case undefined: /* cons */ return Prelude_Types_x3ex3ex3d_Monad_Maybe(Data_Date_n__4986_11849_parseNat($0.a1, $0.a2, $0.a1), n => Prelude_Types_x3ex3ex3d_Monad_Maybe(Data_Date_parsePositiveReversed($0.a2), $f => ({a1: (n+($f*10n))})));
8928
8948
  }
8929
8949
  }
8930
8950
 
@@ -8937,7 +8957,7 @@ function Data_Date_parseDateTimeString($0) {
8937
8957
 
8938
8958
  /* Data.Date.parseDateString : String -> Maybe Date */
8939
8959
  function Data_Date_parseDateString($0) {
8940
- return Data_Date_n__5103_11821_guardSuccess(Prelude_Types_foldl_Foldable_List($5 => $6 => Data_Date_n__5103_11820_go($5, $6), {a1: {h: 0 /* 5103:11818:Start */}, a2: undefined}, Prelude_Types_fastUnpack($0)));
8960
+ return Data_Date_n__5103_11967_guardSuccess(Prelude_Types_foldl_Foldable_List($5 => $6 => Data_Date_n__5103_11966_go($5, $6), {a1: {h: 0 /* 5103:11964:Start */}, a2: undefined}, Prelude_Types_fastUnpack($0)));
8941
8961
  }
8942
8962
 
8943
8963
  /* Data.Date.pad : Nat -> String */
@@ -8963,7 +8983,31 @@ function Data_Issue_parseIssueString($0) {
8963
8983
 
8964
8984
  /* Data.Issue.parseIssue : JSON -> Either String Issue */
8965
8985
  function Data_Issue_parseIssue($0) {
8966
- return Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_object($0), issue => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_lookupAll({a1: 'issue_number', a2: {a1: 'title', a2: {a1: 'body', a2: {a1: 'author', a2: {a1: 'created_at', a2: {a1: 'assignee', a2: {h: 0}}}}}}}, issue), $18 => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_integer($18.a1), number => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_string($18.a2.a1), title => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_string($18.a2.a2.a1), body => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_string($18.a2.a2.a2.a1), author => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Prelude_Basics_flip(csegen_223(), $3a => Data_Issue_parseDateTime($3a), Language_JSON_Accessors_string($18.a2.a2.a2.a2.a1)), createdAt => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_optional($45 => Language_JSON_Accessors_string($45), $18.a2.a2.a2.a2.a2.a1), assignee => ({h: 1 /* Right */, a1: {a1: number, a2: title, a3: body, a4: createdAt, a5: author, a6: assignee}})))))))));
8986
+ const $5 = issue => {
8987
+ const $17 = $18 => {
8988
+ const $24 = number => {
8989
+ const $29 = title => {
8990
+ const $2c = Language_JSON_Accessors_optional($2f => Language_JSON_Accessors_string($2f), $18.a2.a2.a1);
8991
+ let $2b;
8992
+ switch($2c.h) {
8993
+ case 0: /* Left */ {
8994
+ $2b = {h: 0 /* Left */, a1: $2c.a1};
8995
+ break;
8996
+ }
8997
+ case 1: /* Right */ {
8998
+ $2b = {h: 1 /* Right */, a1: Prelude_Types_maybe(() => '', () => $38 => $38, $2c.a1)};
8999
+ break;
9000
+ }
9001
+ }
9002
+ return Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29($2b, body => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_string($18.a2.a2.a2.a1), author => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Prelude_Basics_flip(csegen_223(), $46 => Data_Issue_parseDateTime($46), Language_JSON_Accessors_string($18.a2.a2.a2.a2.a1)), createdAt => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_optional($51 => Language_JSON_Accessors_string($51), $18.a2.a2.a2.a2.a2.a1), assignee => ({h: 1 /* Right */, a1: {a1: number, a2: title, a3: body, a4: createdAt, a5: author, a6: assignee}})))));
9003
+ };
9004
+ return Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_string($18.a2.a1), $29);
9005
+ };
9006
+ return Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_integer($18.a1), $24);
9007
+ };
9008
+ return Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_lookupAll({a1: 'issue_number', a2: {a1: 'title', a2: {a1: 'body', a2: {a1: 'author', a2: {a1: 'created_at', a2: {a1: 'assignee', a2: {h: 0}}}}}}}, issue), $17);
9009
+ };
9010
+ return Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_object($0), $5);
8967
9011
  }
8968
9012
 
8969
9013
  /* Data.Issue.parseDateTime : String -> Either String Date */
@@ -9120,44 +9164,44 @@ function Config_case__parseGitHubURIx2cparseSuffix_1582($0, $1, $2) {
9120
9164
  return Prelude_Types_x3ex3ex3d_Monad_Maybe({a1: Data_String_split(csegen_359(), $2.a1)}, $b);
9121
9165
  }
9122
9166
 
9123
- /* Config.9588:2540:themePrompt */
9124
- function Config_n__9588_2540_themePrompt($0, $1, $2, $3, $4, $5) {
9125
- const $6 = Config_n__9588_2536_enterForDefaultStr($0, $1, $2, $3, $4, 'dark');
9126
- return $5.a1.a2(undefined)(undefined)($5.a2(undefined)($1c => Prelude_IO_prim__putStr((Prelude_Types_foldMap_Foldable_List(csegen_51()(), $25 => $25, {a1: 'Would you like harmony configured for a \'dark\' or \'light\' terminal background', a2: {a1: $6, a2: {a1: '?', a2: {h: 0}}}})+'\n'), $1c)))($30 => Config_n__9588_2537_offerRetry($0, $1, $2, $3, $4, $5, '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, $5.a1.a1.a1(undefined)(undefined)($46 => Data_Theme_parseString(Util_Prompting_orIfEmpty({a1: 'dark'}, Data_String_trim($46))))($5.a2(undefined)($55 => Prelude_IO_prim__getStr($55)))));
9167
+ /* Config.9599:2540:themePrompt */
9168
+ function Config_n__9599_2540_themePrompt($0, $1, $2, $3, $4, $5) {
9169
+ const $6 = Config_n__9599_2536_enterForDefaultStr($0, $1, $2, $3, $4, 'dark');
9170
+ return $5.a1.a2(undefined)(undefined)($5.a2(undefined)($1c => Prelude_IO_prim__putStr((Prelude_Types_foldMap_Foldable_List(csegen_51()(), $25 => $25, {a1: 'Would you like harmony configured for a \'dark\' or \'light\' terminal background', a2: {a1: $6, a2: {a1: '?', a2: {h: 0}}}})+'\n'), $1c)))($30 => Config_n__9599_2537_offerRetry($0, $1, $2, $3, $4, $5, '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, $5.a1.a1.a1(undefined)(undefined)($46 => Data_Theme_parseString(Util_Prompting_orIfEmpty({a1: 'dark'}, Data_String_trim($46))))($5.a2(undefined)($55 => Prelude_IO_prim__getStr($55)))));
9127
9171
  }
9128
9172
 
9129
- /* Config.9588:2539:repo */
9130
- function Config_n__9588_2539_repo($0, $1, $2, $3, $4, $5) {
9173
+ /* Config.9599:2539:repo */
9174
+ function Config_n__9599_2539_repo($0, $1, $2, $3, $4, $5) {
9131
9175
  return Prelude_Types_map_Functor_Maybe(csegen_318()(), $5);
9132
9176
  }
9133
9177
 
9134
- /* Config.8655:1562:parseSuffix */
9135
- function Config_n__8655_1562_parseSuffix($0, $1) {
9178
+ /* Config.8666:1562:parseSuffix */
9179
+ function Config_n__8666_1562_parseSuffix($0, $1) {
9136
9180
  return Config_case__parseGitHubURIx2cparseSuffix_1582($0, $1, Data_String_break$($8 => Prelude_EqOrd_x3dx3d_Eq_Char($8, '.'), $1));
9137
9181
  }
9138
9182
 
9139
- /* Config.8655:1561:parseSSH */
9140
- function Config_n__8655_1561_parseSSH($0, $1) {
9141
- return Prelude_Interfaces_x3ex3dx3e(csegen_14(), $6 => Config_dropPrefixx27('git@github.com:', $6), $b => Config_n__8655_1562_parseSuffix($0, $b), $1);
9183
+ /* Config.8666:1561:parseSSH */
9184
+ function Config_n__8666_1561_parseSSH($0, $1) {
9185
+ return Prelude_Interfaces_x3ex3dx3e(csegen_14(), $6 => Config_dropPrefixx27('git@github.com:', $6), $b => Config_n__8666_1562_parseSuffix($0, $b), $1);
9142
9186
  }
9143
9187
 
9144
- /* Config.8655:1560:parseHTTPS */
9145
- function Config_n__8655_1560_parseHTTPS($0, $1) {
9146
- return Prelude_Interfaces_x3ex3dx3e(csegen_14(), $6 => Config_dropPrefixx27('https://github/com/', $6), $b => Config_n__8655_1562_parseSuffix($0, $b), $1);
9188
+ /* Config.8666:1560:parseHTTPS */
9189
+ function Config_n__8666_1560_parseHTTPS($0, $1) {
9190
+ return Prelude_Interfaces_x3ex3dx3e(csegen_14(), $6 => Config_dropPrefixx27('https://github/com/', $6), $b => Config_n__8666_1562_parseSuffix($0, $b), $1);
9147
9191
  }
9148
9192
 
9149
- /* Config.9588:2538:org */
9150
- function Config_n__9588_2538_org($0, $1, $2, $3, $4, $5) {
9193
+ /* Config.9599:2538:org */
9194
+ function Config_n__9599_2538_org($0, $1, $2, $3, $4, $5) {
9151
9195
  return Prelude_Types_map_Functor_Maybe(csegen_365()(), $5);
9152
9196
  }
9153
9197
 
9154
- /* Config.8366:1281:oneDayAgo */
9155
- function Config_n__8366_1281_oneDayAgo($0, $1, $2) {
9198
+ /* Config.8377:1281:oneDayAgo */
9199
+ function Config_n__8377_1281_oneDayAgo($0, $1, $2) {
9156
9200
  return $2.a1.a2(undefined)(undefined)(System_time($2))(now => $2.a1.a1.a2(undefined)(Number(_truncUBigInt32((now-86400n)))));
9157
9201
  }
9158
9202
 
9159
- /* Config.9588:2537:offerRetry */
9160
- function Config_n__9588_2537_offerRetry($0, $1, $2, $3, $4, $5, $6, $7, $8, $9) {
9203
+ /* Config.9599:2537:offerRetry */
9204
+ function Config_n__9599_2537_offerRetry($0, $1, $2, $3, $4, $5, $6, $7, $8, $9) {
9161
9205
  const $13 = $14 => {
9162
9206
  switch($14.h) {
9163
9207
  case 0: /* nothing */ {
@@ -9178,34 +9222,34 @@ function Config_n__9588_2537_offerRetry($0, $1, $2, $3, $4, $5, $6, $7, $8, $9)
9178
9222
  return $5.a1.a2(undefined)(undefined)($9)($13);
9179
9223
  }
9180
9224
 
9181
- /* Config.9491:2423:help */
9182
- function Config_n__9491_2423_help($0, $1) {
9225
+ /* Config.9502:2423:help */
9226
+ function Config_n__9502_2423_help($0, $1) {
9183
9227
  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_51()(), $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}}})));
9184
9228
  }
9185
9229
 
9186
- /* Config.9588:2536:enterForDefaultStr */
9187
- function Config_n__9588_2536_enterForDefaultStr($0, $1, $2, $3, $4, $5) {
9230
+ /* Config.9599:2536:enterForDefaultStr */
9231
+ function Config_n__9599_2536_enterForDefaultStr($0, $1, $2, $3, $4, $5) {
9188
9232
  return Prelude_Types_foldMap_Foldable_List(csegen_51()(), $b => $b, {a1: ' (ENTER for default: ', a2: {a1: $5, a2: {a1: ')', a2: {h: 0}}}});
9189
9233
  }
9190
9234
 
9191
- /* Config.8608:1513:drop' */
9192
- function Config_n__8608_1513_dropx27($0, $1) {
9235
+ /* Config.8619:1513:drop' */
9236
+ function Config_n__8619_1513_dropx27($0, $1) {
9193
9237
  return Config_with__dropPrefixx27x2cdropx27_1521($0, $1, Data_List_PrefixSuffix_dropPrefix($8 => $9 => Decidable_Equality_decEq_DecEq_Char($8, $9), Prelude_Types_fastUnpack($0), $1));
9194
9238
  }
9195
9239
 
9196
- /* Config.9588:2535:defaultStr */
9197
- function Config_n__9588_2535_defaultStr($0, $1, $2, $3, $4, $5, $6) {
9198
- return Data_Maybe_fromMaybe(() => '', Prelude_Types_map_Functor_Maybe($c => Config_n__9588_2536_enterForDefaultStr($0, $1, $2, $3, $4, $5($c)), $6));
9240
+ /* Config.9599:2535:defaultStr */
9241
+ function Config_n__9599_2535_defaultStr($0, $1, $2, $3, $4, $5, $6) {
9242
+ return Data_Maybe_fromMaybe(() => '', Prelude_Types_map_Functor_Maybe($c => Config_n__9599_2536_enterForDefaultStr($0, $1, $2, $3, $4, $5($c)), $6));
9199
9243
  }
9200
9244
 
9201
- /* Config.9588:2534:commentConfigPrompt */
9202
- function Config_n__9588_2534_commentConfigPrompt($0, $1, $2, $3, $4, $5) {
9203
- const $6 = Config_n__9588_2536_enterForDefaultStr($0, $1, $2, $3, $4, 'name');
9204
- return $5.a1.a2(undefined)(undefined)($5.a2(undefined)($1c => Prelude_IO_prim__putStr((Prelude_Types_foldMap_Foldable_List(csegen_51()(), $25 => $25, {a1: 'What kind of comment would you like Harmony to leave when it requests reviewers? [none/name/at-mention]', a2: {a1: $6, a2: {h: 0}}})+'\n'), $1c)))($2e => Config_n__9588_2537_offerRetry($0, $1, $2, $3, $4, $5, 'The comment strategy must be \'none\', \'name\', or \'at-mention\'. Which would you prefer?', 'Could not parse the input as a valid option; will use \'name\' for now.', () => 1, $5.a1.a1.a1(undefined)(undefined)($44 => Data_Config_CommentStrategy_parseCommentConfig(Util_Prompting_orIfEmpty({a1: 'name'}, Data_String_trim($44))))($5.a2(undefined)($53 => Prelude_IO_prim__getStr($53)))));
9245
+ /* Config.9599:2534:commentConfigPrompt */
9246
+ function Config_n__9599_2534_commentConfigPrompt($0, $1, $2, $3, $4, $5) {
9247
+ const $6 = Config_n__9599_2536_enterForDefaultStr($0, $1, $2, $3, $4, 'name');
9248
+ return $5.a1.a2(undefined)(undefined)($5.a2(undefined)($1c => Prelude_IO_prim__putStr((Prelude_Types_foldMap_Foldable_List(csegen_51()(), $25 => $25, {a1: 'What kind of comment would you like Harmony to leave when it requests reviewers? [none/name/at-mention]', a2: {a1: $6, a2: {h: 0}}})+'\n'), $1c)))($2e => Config_n__9599_2537_offerRetry($0, $1, $2, $3, $4, $5, 'The comment strategy must be \'none\', \'name\', or \'at-mention\'. Which would you prefer?', 'Could not parse the input as a valid option; will use \'name\' for now.', () => 1, $5.a1.a1.a1(undefined)(undefined)($44 => Data_Config_CommentStrategy_parseCommentConfig(Util_Prompting_orIfEmpty({a1: 'name'}, Data_String_trim($44))))($5.a2(undefined)($53 => Prelude_IO_prim__getStr($53)))));
9205
9249
  }
9206
9250
 
9207
- /* Config.8497:1406:checkRequestSettings */
9208
- function Config_n__8497_1406_checkRequestSettings($0, $1) {
9251
+ /* Config.8508:1406:checkRequestSettings */
9252
+ function Config_n__8508_1406_checkRequestSettings($0, $1) {
9209
9253
  let $2;
9210
9254
  switch($1.a6) {
9211
9255
  case 1: {
@@ -9223,10 +9267,10 @@ function Config_n__8497_1406_checkRequestSettings($0, $1) {
9223
9267
  }
9224
9268
  }
9225
9269
 
9226
- /* Config.9588:2533:branchParsingPrompt */
9227
- function Config_n__9588_2533_branchParsingPrompt($0, $1, $2, $3, $4, $5) {
9228
- const $6 = Config_n__9588_2536_enterForDefaultStr($0, $1, $2, $3, $4, 'none');
9229
- return $5.a1.a2(undefined)(undefined)($5.a2(undefined)($1c => Prelude_IO_prim__putStr((Prelude_Types_foldMap_Foldable_List(csegen_51()(), $25 => $25, {a1: 'Would you like harmony to parse branch names for \'jira\' slugs or \'github\' issue numbers to use as part of new PR title or body', a2: {a1: $6, a2: {a1: '?', a2: {h: 0}}}})+'\n'), $1c)))($30 => Config_n__9588_2537_offerRetry($0, $1, $2, $3, $4, $5, 'Branch parsing must be \'none\', \'jira\', or \'github\'. Which would you prefer?', 'Could not parse the input as a valid option; will use \'none\' for now.', () => 0, $5.a1.a1.a1(undefined)(undefined)($46 => Data_Config_ParseBranchStrategy_parseBranchConfig(Util_Prompting_orIfEmpty({a1: 'none'}, Data_String_trim($46))))($5.a2(undefined)($55 => Prelude_IO_prim__getStr($55)))));
9270
+ /* Config.9599:2533:branchParsingPrompt */
9271
+ function Config_n__9599_2533_branchParsingPrompt($0, $1, $2, $3, $4, $5) {
9272
+ const $6 = Config_n__9599_2536_enterForDefaultStr($0, $1, $2, $3, $4, 'none');
9273
+ return $5.a1.a2(undefined)(undefined)($5.a2(undefined)($1c => Prelude_IO_prim__putStr((Prelude_Types_foldMap_Foldable_List(csegen_51()(), $25 => $25, {a1: 'Would you like harmony to parse branch names for \'jira\' slugs or \'github\' issue numbers to use as part of new PR title or body', a2: {a1: $6, a2: {a1: '?', a2: {h: 0}}}})+'\n'), $1c)))($30 => Config_n__9599_2537_offerRetry($0, $1, $2, $3, $4, $5, 'Branch parsing must be \'none\', \'jira\', or \'github\'. Which would you prefer?', 'Could not parse the input as a valid option; will use \'none\' for now.', () => 0, $5.a1.a1.a1(undefined)(undefined)($46 => Data_Config_ParseBranchStrategy_parseBranchConfig(Util_Prompting_orIfEmpty({a1: 'none'}, Data_String_trim($46))))($5.a2(undefined)($55 => Prelude_IO_prim__getStr($55)))));
9230
9274
  }
9231
9275
 
9232
9276
  /* Config.show */
@@ -9261,7 +9305,7 @@ function Config_syncIfOld($0, $1, $2, $3) {
9261
9305
  case 0: return $1b => Data_Promise_pure_Applicative_x28Promisex20x24ex29($1, $e, $1b);
9262
9306
  }
9263
9307
  };
9264
- return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(Config_n__8366_1281_oneDayAgo($0, $1, csegen_74()()), $c, $2, $3);
9308
+ return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(Config_n__8377_1281_oneDayAgo($0, $1, csegen_74()()), $c, $2, $3);
9265
9309
  }
9266
9310
 
9267
9311
  /* Config.syncConfig : Config => Octokit => Bool -> Promise' Config */
@@ -9284,7 +9328,7 @@ function Config_syncConfig($0, $1, $2, $3, $4) {
9284
9328
 
9285
9329
  /* Config.settablePropsWithHelp : Config => String */
9286
9330
  function Config_settablePropsWithHelp($0) {
9287
- return Util_renderString($0, Text_PrettyPrint_Prettyprinter_Doc_vsep(Prelude_Types_List_mapAppend({h: 0}, $9 => Config_n__9491_2423_help($0, $9), Data_Config_settablePropNamesAndHelp())));
9331
+ return Util_renderString($0, Text_PrettyPrint_Prettyprinter_Doc_vsep(Prelude_Types_List_mapAppend({h: 0}, $9 => Config_n__9502_2423_help($0, $9), Data_Config_settablePropNamesAndHelp())));
9288
9332
  }
9289
9333
 
9290
9334
  /* Config.setConfig : Config => String -> String -> Promise' Config */
@@ -9333,7 +9377,7 @@ function Config_preferOriginRemote($0) {
9333
9377
 
9334
9378
  /* Config.parseGitHubURI : String -> Maybe GitRemote */
9335
9379
  function Config_parseGitHubURI($0) {
9336
- return Prelude_Types_x3cx7cx3e_Alternative_Maybe(Config_n__8655_1560_parseHTTPS($0, $0), () => Config_n__8655_1561_parseSSH($0, $0));
9380
+ return Prelude_Types_x3cx7cx3e_Alternative_Maybe(Config_n__8666_1560_parseHTTPS($0, $0), () => Config_n__8666_1561_parseSSH($0, $0));
9337
9381
  }
9338
9382
 
9339
9383
  /* Config.parseBool : String -> Maybe Bool */
@@ -9444,14 +9488,14 @@ function Config_findConfig($0, $1, $2) {
9444
9488
 
9445
9489
  /* Config.dropPrefix' : String -> String -> Maybe String */
9446
9490
  function Config_dropPrefixx27($0, $1) {
9447
- return Prelude_Types_map_Functor_Maybe($4 => Prelude_Types_fastPack($4), Config_n__8608_1513_dropx27($0, Prelude_Types_fastUnpack($1)));
9491
+ return Prelude_Types_map_Functor_Maybe($4 => Prelude_Types_fastPack($4), Config_n__8619_1513_dropx27($0, Prelude_Types_fastUnpack($1)));
9448
9492
  }
9449
9493
 
9450
9494
  /* Config.createConfig : Git => Maybe String -> Bool -> Nat -> Maybe String -> Promise' Config */
9451
9495
  function Config_createConfig($0, $1, $2, $3, $4, $5, $6) {
9452
9496
  const $25 = $26 => $27 => $28 => {
9453
9497
  const $2d = $2e => {
9454
- const $30 = Config_n__9588_2536_enterForDefaultStr($0, $4, $3, $2, $1, 'unset');
9498
+ const $30 = Config_n__9599_2536_enterForDefaultStr($0, $4, $3, $2, $1, 'unset');
9455
9499
  const $2f = () => $38 => $39 => {
9456
9500
  const $63 = $64 => $65 => $66 => {
9457
9501
  const $68 = $69 => $6a => {
@@ -9470,17 +9514,17 @@ function Config_createConfig($0, $1, $2, $3, $4, $5, $6) {
9470
9514
  const $9e = remoteGuess => $9f => $a0 => {
9471
9515
  const $bd = defaultOrgAndRepo => $be => $bf => {
9472
9516
  const $c4 = $c5 => {
9473
- const $c7 = Config_n__9588_2535_defaultStr($0, $4, $3, $2, $1, csegen_365()(), defaultOrgAndRepo);
9517
+ const $c7 = Config_n__9599_2535_defaultStr($0, $4, $3, $2, $1, csegen_365()(), defaultOrgAndRepo);
9474
9518
  const $c6 = () => $d2 => $d3 => {
9475
9519
  const $f1 = $f2 => $f3 => $f4 => {
9476
9520
  const $10d = org => $10e => $10f => {
9477
9521
  const $114 = $115 => {
9478
- const $117 = Config_n__9588_2535_defaultStr($0, $4, $3, $2, $1, csegen_318()(), defaultOrgAndRepo);
9522
+ const $117 = Config_n__9599_2535_defaultStr($0, $4, $3, $2, $1, csegen_318()(), defaultOrgAndRepo);
9479
9523
  const $116 = () => $122 => $123 => {
9480
9524
  const $141 = $142 => $143 => $144 => {
9481
9525
  const $15d = repo => $15e => $15f => {
9482
9526
  const $164 = $165 => {
9483
- const $167 = Config_n__9588_2536_enterForDefaultStr($0, $4, $3, $2, $1, remoteGuess);
9527
+ const $167 = Config_n__9599_2536_enterForDefaultStr($0, $4, $3, $2, $1, remoteGuess);
9484
9528
  const $166 = () => $16f => $170 => {
9485
9529
  const $18e = $18f => $190 => $191 => {
9486
9530
  const $1a4 = defaultRemote => $1a5 => $1a6 => {
@@ -9524,7 +9568,7 @@ function Config_createConfig($0, $1, $2, $3, $4, $5, $6) {
9524
9568
  };
9525
9569
  return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(csegen_404()(), $213, $20d, $20e);
9526
9570
  };
9527
- return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(Config_n__9588_2540_themePrompt($0, $4, $3, $2, $1, csegen_74()()), $20c, $1ff, $200);
9571
+ return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(Config_n__9599_2540_themePrompt($0, $4, $3, $2, $1, csegen_74()()), $20c, $1ff, $200);
9528
9572
  };
9529
9573
  return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(csegen_404()(), $1fd, $1f7, $1f8);
9530
9574
  };
@@ -9536,11 +9580,11 @@ function Config_createConfig($0, $1, $2, $3, $4, $5, $6) {
9536
9580
  };
9537
9581
  return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(csegen_404()(), $1d7, $1d1, $1d2);
9538
9582
  };
9539
- return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(Config_n__9588_2533_branchParsingPrompt($0, $4, $3, $2, $1, csegen_74()()), $1d0, $1c3, $1c4);
9583
+ return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(Config_n__9599_2533_branchParsingPrompt($0, $4, $3, $2, $1, csegen_74()()), $1d0, $1c3, $1c4);
9540
9584
  };
9541
9585
  return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(csegen_404()(), $1c1, $1bb, $1bc);
9542
9586
  };
9543
- return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(Config_n__9588_2534_commentConfigPrompt($0, $4, $3, $2, $1, csegen_74()()), $1ba, $1ad, $1ae);
9587
+ return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(Config_n__9599_2534_commentConfigPrompt($0, $4, $3, $2, $1, csegen_74()()), $1ba, $1ad, $1ae);
9544
9588
  };
9545
9589
  return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(csegen_404()(), $1ab, $1a5, $1a6);
9546
9590
  };
@@ -9552,7 +9596,7 @@ function Config_createConfig($0, $1, $2, $3, $4, $5, $6) {
9552
9596
  };
9553
9597
  return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(csegen_404()(), $164, $15e, $15f);
9554
9598
  };
9555
- return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($147 => $148 => Data_Promise_map_Functor_x28Promisex20x24ex29($14b => Util_Prompting_orIfEmpty(Config_n__9588_2539_repo($0, $4, $3, $2, $1, defaultOrgAndRepo), Data_String_trim($14b)), csegen_406()(), $147, $148), $15d, $143, $144);
9599
+ return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($147 => $148 => Data_Promise_map_Functor_x28Promisex20x24ex29($14b => Util_Prompting_orIfEmpty(Config_n__9599_2539_repo($0, $4, $3, $2, $1, defaultOrgAndRepo), Data_String_trim($14b)), csegen_406()(), $147, $148), $15d, $143, $144);
9556
9600
  };
9557
9601
  return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($126 => $127 => $128 => Data_Promise_liftIO_HasIO_x28Promisex20x24ex29($12b => Prelude_IO_prim__putStr((Prelude_Types_foldMap_Foldable_List(csegen_51()(), $134 => $134, {a1: 'What repository would you like to use harmony for', a2: {a1: $117, a2: {a1: '?', a2: {h: 0}}}})+'\n'), $12b), $126, $127, $128), $141, $122, $123);
9558
9602
  };
@@ -9560,7 +9604,7 @@ function Config_createConfig($0, $1, $2, $3, $4, $5, $6) {
9560
9604
  };
9561
9605
  return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(csegen_404()(), $114, $10e, $10f);
9562
9606
  };
9563
- return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($f7 => $f8 => Data_Promise_map_Functor_x28Promisex20x24ex29($fb => Util_Prompting_orIfEmpty(Config_n__9588_2538_org($0, $4, $3, $2, $1, defaultOrgAndRepo), Data_String_trim($fb)), csegen_406()(), $f7, $f8), $10d, $f3, $f4);
9607
+ return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($f7 => $f8 => Data_Promise_map_Functor_x28Promisex20x24ex29($fb => Util_Prompting_orIfEmpty(Config_n__9599_2538_org($0, $4, $3, $2, $1, defaultOrgAndRepo), Data_String_trim($fb)), csegen_406()(), $f7, $f8), $10d, $f3, $f4);
9564
9608
  };
9565
9609
  return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($d6 => $d7 => $d8 => Data_Promise_liftIO_HasIO_x28Promisex20x24ex29($db => Prelude_IO_prim__putStr((Prelude_Types_foldMap_Foldable_List(csegen_51()(), $e4 => $e4, {a1: 'What GitHub org would you like to use harmony for', a2: {a1: $c7, a2: {a1: '?', a2: {h: 0}}}})+'\n'), $db), $d6, $d7, $d8), $f1, $d2, $d3);
9566
9610
  };
@@ -9590,7 +9634,7 @@ function Config_createConfig($0, $1, $2, $3, $4, $5, $6) {
9590
9634
 
9591
9635
  /* Config.checkConfigConsistency : Config -> Either (Doc AnsiStyle) () */
9592
9636
  function Config_checkConfigConsistency($0) {
9593
- return Config_n__8497_1406_checkRequestSettings($0, $0);
9637
+ return Config_n__8508_1406_checkRequestSettings($0, $0);
9594
9638
  }
9595
9639
 
9596
9640
  /* Config.addIgnoredPRs : Config -> List Integer -> Promise' Config */
@@ -9599,7 +9643,7 @@ function Config_addIgnoredPRs($0, $1, $2, $3) {
9599
9643
  }
9600
9644
 
9601
9645
  /* Data.List.PrefixSuffix.with block in with block in dropPrefix */
9602
- function Data_List_PrefixSuffix_with__withx20blockx20inx20dropPrefix_3637($0, $1, $2, $3, $4, $5) {
9646
+ function Data_List_PrefixSuffix_with__withx20blockx20inx20dropPrefix_5919($0, $1, $2, $3, $4, $5) {
9603
9647
  switch($4.h) {
9604
9648
  case 1: /* No */ return {h: 1 /* No */, a1: $8 => $4.a1({a1: $8.a1, a2: Builtin_snd(Data_List_PrefixSuffix_prefixSuffixConsInjective($8.a2))})};
9605
9649
  case 0: /* Yes */ return {h: 0 /* Yes */, a1: {a1: $4.a1.a1, a2: {a1: {a1: $5, a2: $3}, a2: $4.a1.a1}}};
@@ -9607,10 +9651,10 @@ function Data_List_PrefixSuffix_with__withx20blockx20inx20dropPrefix_3637($0, $1
9607
9651
  }
9608
9652
 
9609
9653
  /* Data.List.PrefixSuffix.with block in dropPrefix */
9610
- function Data_List_PrefixSuffix_with__dropPrefix_3600($0, $1, $2, $3, $4, $5, $6) {
9654
+ function Data_List_PrefixSuffix_with__dropPrefix_5882($0, $1, $2, $3, $4, $5, $6) {
9611
9655
  switch($4.h) {
9612
9656
  case 1: /* No */ return {h: 1 /* No */, a1: $9 => Data_List_PrefixSuffix_prefixDifferentVoid($4.a1, $9)};
9613
- case 0: /* Yes */ return Data_List_PrefixSuffix_with__withx20blockx20inx20dropPrefix_3637(undefined, $1, $6, $5, Data_List_PrefixSuffix_dropPrefix($1, $5, $6), $2);
9657
+ case 0: /* Yes */ return Data_List_PrefixSuffix_with__withx20blockx20inx20dropPrefix_5919(undefined, $1, $6, $5, Data_List_PrefixSuffix_dropPrefix($1, $5, $6), $2);
9614
9658
  }
9615
9659
  }
9616
9660
 
@@ -9634,7 +9678,7 @@ function Data_List_PrefixSuffix_dropPrefix($0, $1, $2) {
9634
9678
  case undefined: /* cons */ {
9635
9679
  switch($2.h) {
9636
9680
  case 0: /* nil */ return {h: 1 /* No */, a1: $b => Prelude_Uninhabited_void$()};
9637
- case undefined: /* cons */ return Data_List_PrefixSuffix_with__dropPrefix_3600(undefined, $0, $1.a1, $2.a1, $0($1.a1)($2.a1), $1.a2, $2.a2);
9681
+ case undefined: /* cons */ return Data_List_PrefixSuffix_with__dropPrefix_5882(undefined, $0, $1.a1, $2.a1, $0($1.a1)($2.a1), $1.a2, $2.a2);
9638
9682
  }
9639
9683
  }
9640
9684
  }
@@ -9647,7 +9691,7 @@ function AppVersion_printVersion($0) {
9647
9691
 
9648
9692
  /* AppVersion.appVersion : String */
9649
9693
  const AppVersion_appVersion = __lazy(function () {
9650
- return '5.7.0';
9694
+ return '5.8.0';
9651
9695
  });
9652
9696
 
9653
9697
  /* Commands.Help.subcommandHelp' : String -> Doc AnsiStyle */
@@ -9661,7 +9705,7 @@ function Commands_Help_subcommandHelpx27($0) {
9661
9705
  case 'graph': return Commands_Help_subcommand($0, {a1: Commands_Help_argument(0, '-c/--completed'), a2: {a1: Commands_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}});
9662
9706
  case 'help': return Commands_Help_subcommand($0, {a1: Commands_Help_argument(0, '<subcommand>'), a2: {h: 0}}, {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('Print help'), a2: {h: 0}});
9663
9707
  case 'version': return Commands_Help_subcommand($0, {h: 0}, {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('Print version'), a2: {h: 0}});
9664
- case 'quick': return Commands_Help_subcommand($0, {a1: Commands_Help_argument(0, '--bugfix'), a2: {h: 0}}, {a1: Text_PrettyPrint_Prettyprinter_Doc_hcat({a1: Text_PrettyPrint_Prettyprinter_Util_reflow('Quickly spin up new work with a GitHub issue and associated feature branch. If you have harmony configured to parse GitHub issue numbers ('), a2: {a1: Commands_Help_shell('harmony config branchParsing github'), a2: {a1: Text_PrettyPrint_Prettyprinter_Util_reflow(') then any PR created from the new branch will automatically link to the new ticket in its description.'), a2: {h: 0}}}}), a2: {a1: Text_PrettyPrint_Prettyprinter_Util_reflow(Prelude_Types_foldMap_Foldable_List(csegen_51()(), $13c => $13c, {a1: 'By default the branch will have the \'feature\' prefix. If the\n--bugfix flag is specified, the \'bugfix\' prefix will be used.', a2: {h: 0}})), a2: {h: 0}}});
9708
+ case 'quick': return Commands_Help_subcommand($0, {a1: Commands_Help_argument(0, '--bugfix'), a2: {a1: Commands_Help_argument(0, '<title>'), a2: csegen_422()}}, {a1: Text_PrettyPrint_Prettyprinter_Doc_hcat({a1: Text_PrettyPrint_Prettyprinter_Util_reflow('Quickly spin up new work with a GitHub issue and associated feature branch. If you have harmony configured to parse GitHub issue numbers ('), a2: {a1: Commands_Help_shell('harmony config branchParsing github'), a2: {a1: Text_PrettyPrint_Prettyprinter_Util_reflow(') then any PR created from the new branch will automatically link to the new ticket in its description.'), a2: {h: 0}}}}), a2: {a1: Text_PrettyPrint_Prettyprinter_Util_reflow(Prelude_Types_foldMap_Foldable_List(csegen_51()(), $142 => $142, {a1: 'By default the branch will have the \'feature\' prefix. If the\n--bugfix flag is specified, the \'bugfix\' prefix will be used.', a2: {h: 0}})), a2: {a1: Text_PrettyPrint_Prettyprinter_Util_reflow(Prelude_Types_foldMap_Foldable_List(csegen_51()(), $14f => $14f, {a1: 'All additional arguments other than --bugfix will be used as the issue\ntitle. If you don\'t give any arguments then you will be prompted to enter\nthe issue title interactively. You will also be prompted for the issue\ndescription.', a2: {h: 0}})), a2: {h: 0}}}});
9665
9709
  case 'sync': return Commands_Help_subcommand($0, {h: 0}, {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('Synchronize local config with information from GitHub.'), a2: {h: 0}});
9666
9710
  case 'branch': return Commands_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}});
9667
9711
  case 'whoami': return Commands_Help_subcommand($0, {h: 0}, {a1: Text_PrettyPrint_Prettyprinter_Util_reflow('Print information about the configured and authenticated user.'), a2: {h: 0}});
@@ -9669,7 +9713,7 @@ function Commands_Help_subcommandHelpx27($0) {
9669
9713
  case 'list': return Commands_Help_subcommand($0, {a1: Commands_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}});
9670
9714
  case 'health': return Commands_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}});
9671
9715
  case 'rq': return Commands_Help_subcommand($0, {h: 0}, {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('Alias for \'request\' command.'), a2: {h: 0}});
9672
- default: return Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(Prelude_Types_foldMap_Foldable_List(csegen_51()(), $185 => $185, {a1: 'Unreconized command: ', a2: {a1: $0, a2: {h: 0}}}));
9716
+ default: return Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(Prelude_Types_foldMap_Foldable_List(csegen_51()(), $198 => $198, {a1: 'Unreconized command: ', a2: {a1: $0, a2: {h: 0}}}));
9673
9717
  }
9674
9718
  }
9675
9719
 
@@ -9775,7 +9819,7 @@ function Text_PrettyPrint_Prettyprinter_Util_reflow($0) {
9775
9819
  }
9776
9820
 
9777
9821
  /* Commands.case block in parseContributeArgs,parseSkipArg */
9778
- function Commands_case__parseContributeArgsx2cparseSkipArg_20199($0, $1, $2) {
9822
+ function Commands_case__parseContributeArgsx2cparseSkipArg_22481($0, $1, $2) {
9779
9823
  switch($2.h) {
9780
9824
  case undefined: /* cons */ {
9781
9825
  switch($2.a1) {
@@ -9788,7 +9832,7 @@ function Commands_case__parseContributeArgsx2cparseSkipArg_20199($0, $1, $2) {
9788
9832
  }
9789
9833
 
9790
9834
  /* Commands.case block in case block in graph */
9791
- function Commands_case__casex20blockx20inx20graph_19933($0, $1, $2, $3, $4, $5, $6, $7, $8) {
9835
+ function Commands_case__casex20blockx20inx20graph_22215($0, $1, $2, $3, $4, $5, $6, $7, $8) {
9792
9836
  return $9 => {
9793
9837
  const $c = $d => $e => {
9794
9838
  switch(Data_Maybe_isJust($3)) {
@@ -9801,17 +9845,17 @@ function Commands_case__casex20blockx20inx20graph_19933($0, $1, $2, $3, $4, $5,
9801
9845
  }
9802
9846
 
9803
9847
  /* Commands.case block in graph */
9804
- function Commands_case__graph_19889($0, $1, $2, $3, $4, $5) {
9848
+ function Commands_case__graph_22171($0, $1, $2, $3, $4, $5) {
9805
9849
  return $6 => {
9806
9850
  switch($4.h) {
9807
- 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(Commands_PullRequest_listPartitionedPRs($2, $0, 4n, 100n), prs => $1e => Commands_case__casex20blockx20inx20graph_19933($0, $1, $2, $3, $4.a1, teamMemberLogins, prs, Commands_PullRequest_rf__allReviewers(prs), $1e), $14, $15), $5, $6);
9851
+ 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(Commands_PullRequest_listPartitionedPRs($2, $0, 4n, 100n), prs => $1e => Commands_case__casex20blockx20inx20graph_22215($0, $1, $2, $3, $4.a1, teamMemberLogins, prs, Commands_PullRequest_rf__allReviewers(prs), $1e), $14, $15), $5, $6);
9808
9852
  case 0: /* nothing */ return Data_Promise_reject('The graph command expects the name of a GitHub Team as an argument.', $5, $6);
9809
9853
  }
9810
9854
  };
9811
9855
  }
9812
9856
 
9813
9857
  /* Commands.case block in request */
9814
- function Commands_case__request_19159($0, $1, $2, $3, $4, $5) {
9858
+ function Commands_case__request_21441($0, $1, $2, $3, $4, $5) {
9815
9859
  return $7 => $9 => {
9816
9860
  let $a;
9817
9861
  switch(Prelude_Types_null_Foldable_List($5.a1)) {
@@ -9867,40 +9911,40 @@ function Commands_case__request_19159($0, $1, $2, $3, $4, $5) {
9867
9911
  }
9868
9912
 
9869
9913
  /* Commands.case block in case block in request,partitionedArgs */
9870
- function Commands_case__casex20blockx20inx20requestx2cpartitionedArgs_19079($0, $1, $2, $3, $4, $5, $6, $7) {
9871
- const $9 = Prelude_Interfaces_mapHom(csegen_604(), $f => Prelude_Types_List_mapAppend({h: 0}, $13 => Data_String_Extra_drop(1n, $13), $f))({a1: $5, a2: $7.a1});
9914
+ function Commands_case__casex20blockx20inx20requestx2cpartitionedArgs_21361($0, $1, $2, $3, $4, $5, $6, $7) {
9915
+ const $9 = Prelude_Interfaces_mapHom(csegen_608(), $f => Prelude_Types_List_mapAppend({h: 0}, $13 => Data_String_Extra_drop(1n, $13), $f))({a1: $5, a2: $7.a1});
9872
9916
  return {a1: $9.a1, a2: {a1: $7.a2, a2: $9.a2}};
9873
9917
  }
9874
9918
 
9875
9919
  /* Commands.case block in request,partitionedArgs */
9876
- function Commands_case__requestx2cpartitionedArgs_19056($0, $1, $2, $3, $4, $5) {
9877
- return Commands_case__casex20blockx20inx20requestx2cpartitionedArgs_19079($0, $1, $2, $3, $4, $5.a1, $5.a2, Data_List_partition($12 => BashCompletion_isHashPrefix($12), $5.a2));
9920
+ function Commands_case__requestx2cpartitionedArgs_21338($0, $1, $2, $3, $4, $5) {
9921
+ return Commands_case__casex20blockx20inx20requestx2cpartitionedArgs_21361($0, $1, $2, $3, $4, $5.a1, $5.a2, Data_List_partition($12 => BashCompletion_isHashPrefix($12), $5.a2));
9878
9922
  }
9879
9923
 
9880
- /* Commands.8939:18213:recombineIntoArgs */
9881
- function Commands_n__8939_18213_recombineIntoArgs($0, $1) {
9924
+ /* Commands.8950:20495:recombineIntoArgs */
9925
+ function Commands_n__8950_20495_recombineIntoArgs($0, $1) {
9882
9926
  switch($1.h) {
9883
9927
  case 0: /* nil */ return {a1: {h: 0}, a2: {h: 0}};
9884
9928
  case undefined: /* cons */ {
9885
9929
  switch($1.a1) {
9886
9930
  case '-i': {
9887
9931
  switch($1.a2.h) {
9888
- case 0: /* nil */ return csegen_608();
9932
+ case 0: /* nil */ return csegen_612();
9889
9933
  case undefined: /* cons */ {
9890
- const $8 = Commands_n__8939_18211_parseIntoOpt($0, $1.a2.a1);
9934
+ const $8 = Commands_n__8950_20493_parseIntoOpt($0, $1.a2.a1);
9891
9935
  switch($8.h) {
9892
9936
  case undefined: /* just */ {
9893
- const $c = Commands_n__8939_18213_recombineIntoArgs($0, $1.a2.a2);
9937
+ const $c = Commands_n__8950_20495_recombineIntoArgs($0, $1.a2.a2);
9894
9938
  return {a1: {a1: $8.a1, a2: $c.a1}, a2: $c.a2};
9895
9939
  }
9896
9940
  case 0: /* nothing */ {
9897
- const $14 = Commands_n__8939_18213_recombineIntoArgs($0, $1.a2.a2);
9941
+ const $14 = Commands_n__8950_20495_recombineIntoArgs($0, $1.a2.a2);
9898
9942
  return {a1: $14.a1, a2: {a1: '-i', a2: {a1: $1.a2.a1, a2: $14.a2}}};
9899
9943
  }
9900
9944
  }
9901
9945
  }
9902
9946
  default: {
9903
- const $1e = Commands_n__8939_18213_recombineIntoArgs($0, $1.a2);
9947
+ const $1e = Commands_n__8950_20495_recombineIntoArgs($0, $1.a2);
9904
9948
  return {a1: $1e.a1, a2: {a1: $1.a1, a2: $1e.a2}};
9905
9949
  }
9906
9950
  }
@@ -9909,26 +9953,26 @@ function Commands_n__8939_18213_recombineIntoArgs($0, $1) {
9909
9953
  switch($1.a2.h) {
9910
9954
  case 0: /* nil */ return {a1: {h: 0}, a2: {a1: '--into', a2: {h: 0}}};
9911
9955
  case undefined: /* cons */ {
9912
- const $2b = Commands_n__8939_18211_parseIntoOpt($0, $1.a2.a1);
9956
+ const $2b = Commands_n__8950_20493_parseIntoOpt($0, $1.a2.a1);
9913
9957
  switch($2b.h) {
9914
9958
  case undefined: /* just */ {
9915
- const $2f = Commands_n__8939_18213_recombineIntoArgs($0, $1.a2.a2);
9959
+ const $2f = Commands_n__8950_20495_recombineIntoArgs($0, $1.a2.a2);
9916
9960
  return {a1: {a1: $2b.a1, a2: $2f.a1}, a2: $2f.a2};
9917
9961
  }
9918
9962
  case 0: /* nothing */ {
9919
- const $37 = Commands_n__8939_18213_recombineIntoArgs($0, $1.a2.a2);
9963
+ const $37 = Commands_n__8950_20495_recombineIntoArgs($0, $1.a2.a2);
9920
9964
  return {a1: $37.a1, a2: {a1: '--into', a2: {a1: $1.a2.a1, a2: $37.a2}}};
9921
9965
  }
9922
9966
  }
9923
9967
  }
9924
9968
  default: {
9925
- const $41 = Commands_n__8939_18213_recombineIntoArgs($0, $1.a2);
9969
+ const $41 = Commands_n__8950_20495_recombineIntoArgs($0, $1.a2);
9926
9970
  return {a1: $41.a1, a2: {a1: $1.a1, a2: $41.a2}};
9927
9971
  }
9928
9972
  }
9929
9973
  }
9930
9974
  default: {
9931
- const $49 = Commands_n__8939_18213_recombineIntoArgs($0, $1.a2);
9975
+ const $49 = Commands_n__8950_20495_recombineIntoArgs($0, $1.a2);
9932
9976
  return {a1: $49.a1, a2: {a1: $1.a1, a2: $49.a2}};
9933
9977
  }
9934
9978
  }
@@ -9936,30 +9980,30 @@ function Commands_n__8939_18213_recombineIntoArgs($0, $1) {
9936
9980
  }
9937
9981
  }
9938
9982
 
9939
- /* Commands.10991:20153:recombineIgnoreArgs */
9940
- function Commands_n__10991_20153_recombineIgnoreArgs($0, $1) {
9983
+ /* Commands.11002:22435:recombineIgnoreArgs */
9984
+ function Commands_n__11002_22435_recombineIgnoreArgs($0, $1) {
9941
9985
  switch($1.h) {
9942
9986
  case 0: /* nil */ return {a1: {h: 0}, a2: {h: 0}};
9943
9987
  case undefined: /* cons */ {
9944
9988
  switch($1.a1) {
9945
9989
  case '-i': {
9946
9990
  switch($1.a2.h) {
9947
- case 0: /* nil */ return csegen_608();
9991
+ case 0: /* nil */ return csegen_612();
9948
9992
  case undefined: /* cons */ {
9949
- const $8 = Commands_n__10991_20150_parseIgnoreOpt($0, $1.a2.a1);
9993
+ const $8 = Commands_n__11002_22432_parseIgnoreOpt($0, $1.a2.a1);
9950
9994
  switch($8.h) {
9951
9995
  case undefined: /* just */ {
9952
- const $c = Commands_n__10991_20153_recombineIgnoreArgs($0, $1.a2.a2);
9996
+ const $c = Commands_n__11002_22435_recombineIgnoreArgs($0, $1.a2.a2);
9953
9997
  return {a1: {a1: $8.a1, a2: $c.a1}, a2: $c.a2};
9954
9998
  }
9955
9999
  case 0: /* nothing */ {
9956
- const $14 = Commands_n__10991_20153_recombineIgnoreArgs($0, $1.a2.a2);
10000
+ const $14 = Commands_n__11002_22435_recombineIgnoreArgs($0, $1.a2.a2);
9957
10001
  return {a1: $14.a1, a2: {a1: '-i', a2: {a1: $1.a2.a1, a2: $14.a2}}};
9958
10002
  }
9959
10003
  }
9960
10004
  }
9961
10005
  default: {
9962
- const $1e = Commands_n__10991_20153_recombineIgnoreArgs($0, $1.a2);
10006
+ const $1e = Commands_n__11002_22435_recombineIgnoreArgs($0, $1.a2);
9963
10007
  return {a1: $1e.a1, a2: {a1: $1.a1, a2: $1e.a2}};
9964
10008
  }
9965
10009
  }
@@ -9968,26 +10012,26 @@ function Commands_n__10991_20153_recombineIgnoreArgs($0, $1) {
9968
10012
  switch($1.a2.h) {
9969
10013
  case 0: /* nil */ return {a1: {h: 0}, a2: {a1: '--ignore', a2: {h: 0}}};
9970
10014
  case undefined: /* cons */ {
9971
- const $2b = Commands_n__10991_20150_parseIgnoreOpt($0, $1.a2.a1);
10015
+ const $2b = Commands_n__11002_22432_parseIgnoreOpt($0, $1.a2.a1);
9972
10016
  switch($2b.h) {
9973
10017
  case undefined: /* just */ {
9974
- const $2f = Commands_n__10991_20153_recombineIgnoreArgs($0, $1.a2.a2);
10018
+ const $2f = Commands_n__11002_22435_recombineIgnoreArgs($0, $1.a2.a2);
9975
10019
  return {a1: {a1: $2b.a1, a2: $2f.a1}, a2: $2f.a2};
9976
10020
  }
9977
10021
  case 0: /* nothing */ {
9978
- const $37 = Commands_n__10991_20153_recombineIgnoreArgs($0, $1.a2.a2);
10022
+ const $37 = Commands_n__11002_22435_recombineIgnoreArgs($0, $1.a2.a2);
9979
10023
  return {a1: $37.a1, a2: {a1: '--ignore', a2: {a1: $1.a2.a1, a2: $37.a2}}};
9980
10024
  }
9981
10025
  }
9982
10026
  }
9983
10027
  default: {
9984
- const $41 = Commands_n__10991_20153_recombineIgnoreArgs($0, $1.a2);
10028
+ const $41 = Commands_n__11002_22435_recombineIgnoreArgs($0, $1.a2);
9985
10029
  return {a1: $41.a1, a2: {a1: $1.a1, a2: $41.a2}};
9986
10030
  }
9987
10031
  }
9988
10032
  }
9989
10033
  default: {
9990
- const $49 = Commands_n__10991_20153_recombineIgnoreArgs($0, $1.a2);
10034
+ const $49 = Commands_n__11002_22435_recombineIgnoreArgs($0, $1.a2);
9991
10035
  return {a1: $49.a1, a2: {a1: $1.a1, a2: $49.a2}};
9992
10036
  }
9993
10037
  }
@@ -9995,23 +10039,23 @@ function Commands_n__10991_20153_recombineIgnoreArgs($0, $1) {
9995
10039
  }
9996
10040
  }
9997
10041
 
9998
- /* Commands.10205:19397:putNameLn */
9999
- function Commands_n__10205_19397_putNameLn($0, $1, $2, $3) {
10042
+ /* Commands.10216:21679:putNameLn */
10043
+ function Commands_n__10216_21679_putNameLn($0, $1, $2, $3) {
10000
10044
  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}}}});
10001
10045
  }
10002
10046
 
10003
- /* Commands.8677:17949:putLabels */
10004
- function Commands_n__8677_17949_putLabels($0, $1, $2, $3, $4) {
10005
- 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__8677_17948_putLabel($0, $1, $2, $3, $f), $4)));
10047
+ /* Commands.8688:20231:putLabels */
10048
+ function Commands_n__8688_20231_putLabels($0, $1, $2, $3, $4) {
10049
+ 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__8688_20230_putLabel($0, $1, $2, $3, $f), $4)));
10006
10050
  }
10007
10051
 
10008
- /* Commands.8677:17948:putLabel */
10009
- function Commands_n__8677_17948_putLabel($0, $1, $2, $3, $4) {
10052
+ /* Commands.8688:20230:putLabel */
10053
+ function Commands_n__8688_20230_putLabel($0, $1, $2, $3, $4) {
10010
10054
  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)));
10011
10055
  }
10012
10056
 
10013
- /* Commands.11343:20514:printDetails */
10014
- function Commands_n__11343_20514_printDetails($0, $1, $2, $3, $4) {
10057
+ /* Commands.11354:22796:printDetails */
10058
+ function Commands_n__11354_22796_printDetails($0, $1, $2, $3, $4) {
10015
10059
  const $5 = Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_italic(), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String($4.a8));
10016
10060
  const $d = Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(' \u{251c} title: '), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String($4.a2));
10017
10061
  const $16 = Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(' \u{251c} created:'), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(Data_Date_show_Show_Date($4.a3)));
@@ -10020,8 +10064,8 @@ function Commands_n__11343_20514_printDetails($0, $1, $2, $3, $4) {
10020
10064
  return Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: $5, a2: {a1: $d, a2: {a1: $16, a2: {a1: $21, a2: {a1: $2f, a2: {h: 0}}}}}});
10021
10065
  }
10022
10066
 
10023
- /* Commands.11343:20513:pickOne */
10024
- function Commands_n__11343_20513_pickOne($0, $1, $2, $3, $4, $5, $6, $7, $8) {
10067
+ /* Commands.11354:22795:pickOne */
10068
+ function Commands_n__11354_22795_pickOne($0, $1, $2, $3, $4, $5, $6, $7, $8) {
10025
10069
  const $9 = Data_List_headx27(Data_List_drop($5, Prelude_Types_List_tailRecAppend($7, $8)));
10026
10070
  return $12 => $13 => {
10027
10071
  switch($9.h) {
@@ -10035,7 +10079,7 @@ function Commands_n__11343_20513_pickOne($0, $1, $2, $3, $4, $5, $6, $7, $8) {
10035
10079
  break;
10036
10080
  }
10037
10081
  case 0: /* nothing */ {
10038
- $1a = csegen_613();
10082
+ $1a = csegen_617();
10039
10083
  break;
10040
10084
  }
10041
10085
  }
@@ -10045,23 +10089,23 @@ function Commands_n__11343_20513_pickOne($0, $1, $2, $3, $4, $5, $6, $7, $8) {
10045
10089
  };
10046
10090
  }
10047
10091
 
10048
- /* Commands.9805:19044:partitionedArgs */
10049
- function Commands_n__9805_19044_partitionedArgs($0, $1, $2, $3, $4) {
10050
- return Commands_case__requestx2cpartitionedArgs_19056($0, $1, $2, $3, $4, Data_List_partition($e => Data_String_isPrefixOf('+', $e), $4));
10092
+ /* Commands.9816:21326:partitionedArgs */
10093
+ function Commands_n__9816_21326_partitionedArgs($0, $1, $2, $3, $4) {
10094
+ return Commands_case__requestx2cpartitionedArgs_21338($0, $1, $2, $3, $4, Data_List_partition($e => Data_String_isPrefixOf('+', $e), $4));
10051
10095
  }
10052
10096
 
10053
- /* Commands.10373:19585:parseTeamArg */
10054
- function Commands_n__10373_19585_parseTeamArg($0, $1) {
10097
+ /* Commands.10384:21867:parseTeamArg */
10098
+ function Commands_n__10384_21867_parseTeamArg($0, $1) {
10055
10099
  return {a1: {a1: $1}};
10056
10100
  }
10057
10101
 
10058
- /* Commands.10991:20152:parseSkipArg */
10059
- function Commands_n__10991_20152_parseSkipArg($0, $1) {
10060
- return Commands_case__parseContributeArgsx2cparseSkipArg_20199($0, $1, Data_String_strM($1));
10102
+ /* Commands.11002:22434:parseSkipArg */
10103
+ function Commands_n__11002_22434_parseSkipArg($0, $1) {
10104
+ return Commands_case__parseContributeArgsx2cparseSkipArg_22481($0, $1, Data_String_strM($1));
10061
10105
  }
10062
10106
 
10063
- /* Commands.10991:20151:parseListFlag */
10064
- function Commands_n__10991_20151_parseListFlag($0, $1) {
10107
+ /* Commands.11002:22433:parseListFlag */
10108
+ function Commands_n__11002_22433_parseListFlag($0, $1) {
10065
10109
  switch($1) {
10066
10110
  case '-l': return {a1: {h: 0 /* List */}};
10067
10111
  case '--list': return {a1: {h: 0 /* List */}};
@@ -10069,8 +10113,8 @@ function Commands_n__10991_20151_parseListFlag($0, $1) {
10069
10113
  }
10070
10114
  }
10071
10115
 
10072
- /* Commands.8939:18212:parseLabelArg */
10073
- function Commands_n__8939_18212_parseLabelArg($0, $1) {
10116
+ /* Commands.8950:20494:parseLabelArg */
10117
+ function Commands_n__8950_20494_parseLabelArg($0, $1) {
10074
10118
  const $2 = Data_String_strM($1);
10075
10119
  switch($2.h) {
10076
10120
  case undefined: /* cons */ {
@@ -10083,29 +10127,29 @@ function Commands_n__8939_18212_parseLabelArg($0, $1) {
10083
10127
  }
10084
10128
  }
10085
10129
 
10086
- /* Commands.8939:18211:parseIntoOpt */
10087
- function Commands_n__8939_18211_parseIntoOpt($0, $1) {
10130
+ /* Commands.8950:20493:parseIntoOpt */
10131
+ function Commands_n__8950_20493_parseIntoOpt($0, $1) {
10088
10132
  const $2 = Util_String_nonEmpty($1);
10089
10133
  return Prelude_Types_map_Functor_Maybe($7 => $7, $2);
10090
10134
  }
10091
10135
 
10092
- /* Commands.10991:20150:parseIgnoreOpt */
10093
- function Commands_n__10991_20150_parseIgnoreOpt($0, $1) {
10136
+ /* Commands.11002:22432:parseIgnoreOpt */
10137
+ function Commands_n__11002_22432_parseIgnoreOpt($0, $1) {
10094
10138
  const $2 = Data_String_split(csegen_359(), $1);
10095
10139
  const $7 = Data_List1_last($2);
10096
10140
  return Prelude_Types_map_Functor_Maybe($c => $c, Data_String_parsePositive(csegen_2(), $7));
10097
10141
  }
10098
10142
 
10099
- /* Commands.8939:18210:parseDraftFlag */
10100
- function Commands_n__8939_18210_parseDraftFlag($0, $1) {
10143
+ /* Commands.8950:20492:parseDraftFlag */
10144
+ function Commands_n__8950_20492_parseDraftFlag($0, $1) {
10101
10145
  switch($1) {
10102
10146
  case '--draft': return {a1: {h: 0 /* Draft */}};
10103
10147
  default: return {h: 0};
10104
10148
  }
10105
10149
  }
10106
10150
 
10107
- /* Commands.10373:19584:parseCompletedFlag */
10108
- function Commands_n__10373_19584_parseCompletedFlag($0, $1) {
10151
+ /* Commands.10384:21866:parseCompletedFlag */
10152
+ function Commands_n__10384_21866_parseCompletedFlag($0, $1) {
10109
10153
  switch($1) {
10110
10154
  case '-c': return {a1: {h: 0}};
10111
10155
  case '--completed': return {a1: {h: 0}};
@@ -10113,8 +10157,8 @@ function Commands_n__10373_19584_parseCompletedFlag($0, $1) {
10113
10157
  }
10114
10158
  }
10115
10159
 
10116
- /* Commands.10991:20149:parseCheckoutFlag */
10117
- function Commands_n__10991_20149_parseCheckoutFlag($0, $1) {
10160
+ /* Commands.11002:22431:parseCheckoutFlag */
10161
+ function Commands_n__11002_22431_parseCheckoutFlag($0, $1) {
10118
10162
  switch($1) {
10119
10163
  case '-c': return {a1: {h: 1 /* Checkout */}};
10120
10164
  case '--checkout': return {a1: {h: 1 /* Checkout */}};
@@ -10122,8 +10166,8 @@ function Commands_n__10991_20149_parseCheckoutFlag($0, $1) {
10122
10166
  }
10123
10167
  }
10124
10168
 
10125
- /* Commands.11343:20512:listSome */
10126
- function Commands_n__11343_20512_listSome($0, $1, $2, $3, $4, $5, $6, $7, $8) {
10169
+ /* Commands.11354:22794:listSome */
10170
+ function Commands_n__11354_22794_listSome($0, $1, $2, $3, $4, $5, $6, $7, $8) {
10127
10171
  const $15 = $16 => {
10128
10172
  let $1b;
10129
10173
  switch(Prelude_Types_null_Foldable_List($6)) {
@@ -10136,13 +10180,13 @@ function Commands_n__11343_20512_listSome($0, $1, $2, $3, $4, $5, $6, $7, $8) {
10136
10180
  break;
10137
10181
  }
10138
10182
  }
10139
- return Prelude_Interfaces_when(csegen_66()(), $1b, () => $20 => $21 => Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(csegen_404()(), $27 => $28 => $29 => Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(Util_renderIO($3, csegen_74()(), Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_bold(), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('Your review not requested:'))), $39 => Commands_n__11343_20510_goListSome($0, $1, $2, $3, 0, Data_List_take(5n, $6)), $28, $29), $20, $21));
10183
+ return Prelude_Interfaces_when(csegen_66()(), $1b, () => $20 => $21 => Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(csegen_404()(), $27 => $28 => $29 => Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(Util_renderIO($3, csegen_74()(), Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_bold(), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('Your review not requested:'))), $39 => Commands_n__11354_22792_goListSome($0, $1, $2, $3, 0, Data_List_take(5n, $6)), $28, $29), $20, $21));
10140
10184
  };
10141
- return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(Commands_n__11343_20510_goListSome($0, $1, $2, $3, 1, Data_List_drop($4, $5)), $15, $7, $8);
10185
+ return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(Commands_n__11354_22792_goListSome($0, $1, $2, $3, 1, Data_List_drop($4, $5)), $15, $7, $8);
10142
10186
  }
10143
10187
 
10144
- /* Commands.9365:18641:labelSlugs */
10145
- function Commands_n__9365_18641_labelSlugs($0, $1, $2, $3) {
10188
+ /* Commands.9376:20923:labelSlugs */
10189
+ function Commands_n__9376_20923_labelSlugs($0, $1, $2, $3) {
10146
10190
  const $5 = $6 => $7 => {
10147
10191
  switch($6.h) {
10148
10192
  case 2: /* Label */ return {a1: $6.a1, a2: $7};
@@ -10152,13 +10196,13 @@ function Commands_n__9365_18641_labelSlugs($0, $1, $2, $3) {
10152
10196
  return Prelude_Types_foldr_Foldable_List($5, {h: 0}, $3);
10153
10197
  }
10154
10198
 
10155
- /* Commands.11343:20511:isNotIgnored */
10156
- function Commands_n__11343_20511_isNotIgnored($0, $1, $2, $3, $4, $5) {
10199
+ /* Commands.11354:22793:isNotIgnored */
10200
+ function Commands_n__11354_22793_isNotIgnored($0, $1, $2, $3, $4, $5) {
10157
10201
  return Data_Maybe_isNothing(Data_List_find($a => Prelude_EqOrd_x3dx3d_Eq_Integer($a, $5.a1), $4.a13));
10158
10202
  }
10159
10203
 
10160
- /* Commands.9365:18640:isDraft */
10161
- function Commands_n__9365_18640_isDraft($0, $1, $2, $3) {
10204
+ /* Commands.9376:20922:isDraft */
10205
+ function Commands_n__9376_20922_isDraft($0, $1, $2, $3) {
10162
10206
  const $7 = $8 => {
10163
10207
  switch($8.h) {
10164
10208
  case 0: /* Draft */ return 1;
@@ -10169,8 +10213,8 @@ function Commands_n__9365_18640_isDraft($0, $1, $2, $3) {
10169
10213
  return Data_Maybe_isJust($5);
10170
10214
  }
10171
10215
 
10172
- /* Commands.9365:18639:intoBranch */
10173
- function Commands_n__9365_18639_intoBranch($0, $1, $2, $3) {
10216
+ /* Commands.9376:20921:intoBranch */
10217
+ function Commands_n__9376_20921_intoBranch($0, $1, $2, $3) {
10174
10218
  const $d = $e => {
10175
10219
  switch($e.h) {
10176
10220
  case 1: /* Into */ return {a1: Util_String_value($e.a1)};
@@ -10180,11 +10224,11 @@ function Commands_n__9365_18639_intoBranch($0, $1, $2, $3) {
10180
10224
  return Prelude_Types_foldMap_Foldable_List({a1: $7 => $8 => Prelude_Types_x3cx2bx3e_Semigroup_x28Maybex20x24ax29($7, $8), a2: {h: 0}}, $d, $3);
10181
10225
  }
10182
10226
 
10183
- /* Commands.11343:20510:goListSome */
10184
- function Commands_n__11343_20510_goListSome($0, $1, $2, $3, $4, $5) {
10227
+ /* Commands.11354:22792:goListSome */
10228
+ function Commands_n__11354_22792_goListSome($0, $1, $2, $3, $4, $5) {
10185
10229
  switch($5.h) {
10186
10230
  case undefined: /* cons */ {
10187
- const $7 = Commands_n__11343_20514_printDetails($0, $1, $2, $3, $5.a1);
10231
+ const $7 = Commands_n__11354_22796_printDetails($0, $1, $2, $3, $5.a1);
10188
10232
  let $15;
10189
10233
  switch($4) {
10190
10234
  case 1: {
@@ -10196,15 +10240,28 @@ function Commands_n__11343_20510_goListSome($0, $1, $2, $3, $4, $5) {
10196
10240
  break;
10197
10241
  }
10198
10242
  }
10199
- const $13 = Text_PrettyPrint_Prettyprinter_Doc_indent($15, Prelude_Types_foldl_Foldable_List(acc => next => Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: acc, a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {a1: Commands_n__11343_20514_printDetails($0, $1, $2, $3, next), a2: {h: 0}}}}), $7, $5.a2));
10243
+ const $13 = Text_PrettyPrint_Prettyprinter_Doc_indent($15, Prelude_Types_foldl_Foldable_List(acc => next => Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: acc, a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {a1: Commands_n__11354_22796_printDetails($0, $1, $2, $3, next), a2: {h: 0}}}}), $7, $5.a2));
10200
10244
  return Util_renderIO($3, csegen_74()(), $13);
10201
10245
  }
10202
- case 0: /* nil */ return csegen_613();
10246
+ case 0: /* nil */ return csegen_617();
10203
10247
  }
10204
10248
  }
10205
10249
 
10206
- /* Commands.10205:19396:forkedUser */
10207
- function Commands_n__10205_19396_forkedUser($0, $1, $2, $3) {
10250
+ /* Commands.12468:23815:go */
10251
+ function Commands_n__12468_23815_go($0, $1) {
10252
+ switch($1.h) {
10253
+ case 0: /* nothing */ return $0;
10254
+ default: {
10255
+ switch($0.h) {
10256
+ case 0: /* nothing */ return {a1: $1.a1};
10257
+ case undefined: /* just */ return {a1: Prelude_Types_foldMap_Foldable_List(csegen_51()(), $d => $d, {a1: $0.a1, a2: {a1: ' ', a2: {a1: $1.a1, a2: {h: 0}}}})};
10258
+ }
10259
+ }
10260
+ }
10261
+ }
10262
+
10263
+ /* Commands.10216:21678:forkedUser */
10264
+ function Commands_n__10216_21678_forkedUser($0, $1, $2, $3) {
10208
10265
  return FFI_Concurrency_fork(csegen_74()(), ('user --json '+$3));
10209
10266
  }
10210
10267
 
@@ -10213,6 +10270,11 @@ function Commands_whoami($0, $1, $2, $3, $4) {
10213
10270
  return Commands_User_Me_printInfoOnSelf($0, $2, $1, $3, $4);
10214
10271
  }
10215
10272
 
10273
+ /* Commands.titleArg : List QuickArg -> Maybe String */
10274
+ function Commands_titleArg($0) {
10275
+ return Prelude_Types_foldl_Foldable_List($3 => $4 => Commands_n__12468_23815_go($3, $4), {h: 0}, $0);
10276
+ }
10277
+
10216
10278
  /* Commands.teamNameArg : GraphArg -> Maybe String */
10217
10279
  function Commands_teamNameArg($0) {
10218
10280
  switch($0.h) {
@@ -10237,7 +10299,7 @@ function Commands_skipArg($0) {
10237
10299
  /* Commands.request : Config => Git => Octokit => List String -> {default False _ : Bool} ->
10238
10300
  Promise' () */
10239
10301
  function Commands_request($0, $1, $2, $3, $4) {
10240
- return Commands_case__request_19159($0, $1, $2, $4, $3, Commands_n__9805_19044_partitionedArgs($0, $1, $2, $4, $3));
10302
+ return Commands_case__request_21441($0, $1, $2, $4, $3, Commands_n__9816_21326_partitionedArgs($0, $1, $2, $4, $3));
10241
10303
  }
10242
10304
 
10243
10305
  /* Commands.reflect : Config => Octokit => Promise' () */
@@ -10245,9 +10307,9 @@ function Commands_reflect($0, $1, $2, $3) {
10245
10307
  return Commands_User_Reflect_reflectOnSelf($0, $1, $2, $3);
10246
10308
  }
10247
10309
 
10248
- /* Commands.quick : Config => Git => Octokit => IssueCategory -> Promise' () */
10310
+ /* Commands.quick : Config => Git => Octokit => List QuickArg -> Promise' () */
10249
10311
  function Commands_quick($0, $1, $2, $3, $4, $5) {
10250
- return Commands_Quick_quickStartNewWork($0, $1, $2, $3, $4, $5);
10312
+ return Commands_Quick_quickStartNewWork($0, $1, $2, Commands_issueCategory($3), Commands_titleArg($3), $4, $5);
10251
10313
  }
10252
10314
 
10253
10315
  /* Commands.prUsageError : String */
@@ -10268,7 +10330,7 @@ function Commands_pr($0, $1, $2, $3, $4, $5) {
10268
10330
  };
10269
10331
  const $48 = $49 => $4a => $4b => {
10270
10332
  let $52;
10271
- switch(Prelude_Types_null_Foldable_List(Commands_n__9365_18641_labelSlugs($0, $1, $2, $3))) {
10333
+ switch(Prelude_Types_null_Foldable_List(Commands_n__9376_20923_labelSlugs($0, $1, $2, $3))) {
10272
10334
  case 1: {
10273
10335
  $52 = 0;
10274
10336
  break;
@@ -10278,10 +10340,10 @@ function Commands_pr($0, $1, $2, $3, $4, $5) {
10278
10340
  break;
10279
10341
  }
10280
10342
  }
10281
- const $4d = Prelude_Interfaces_when(csegen_66()(), $52, () => $5c => $5d => Commands_label($0, $1, $2, Commands_n__9365_18641_labelSlugs($0, $1, $2, $3), $5c, $5d));
10343
+ const $4d = Prelude_Interfaces_when(csegen_66()(), $52, () => $5c => $5d => Commands_label($0, $1, $2, Commands_n__9376_20923_labelSlugs($0, $1, $2, $3), $5c, $5d));
10282
10344
  const $6a = $6b => $6c => $6d => {
10283
10345
  const $6f = $70 => {
10284
- const $71 = Commands_n__9365_18639_intoBranch($0, $1, $2, $3);
10346
+ const $71 = Commands_n__9376_20921_intoBranch($0, $1, $2, $3);
10285
10347
  switch($71.h) {
10286
10348
  case undefined: /* just */ {
10287
10349
  return $77 => {
@@ -10296,7 +10358,7 @@ function Commands_pr($0, $1, $2, $3, $4, $5) {
10296
10358
  };
10297
10359
  const $96 = $97 => {
10298
10360
  let $9c;
10299
- switch(Commands_n__9365_18640_isDraft($0, $1, $2, $3)) {
10361
+ switch(Commands_n__9376_20922_isDraft($0, $1, $2, $3)) {
10300
10362
  case 1: {
10301
10363
  switch($2c.a2.a4) {
10302
10364
  case 1: {
@@ -10337,7 +10399,20 @@ function Commands_pr($0, $1, $2, $3, $4, $5) {
10337
10399
  case 1: /* Hypothetical */ return $f4 => Data_Promise_liftIO_HasIO_x28Promisex20x24ex29($f7 => Prelude_IO_prim__putStr(($2c.a1+'\n'), $f7), $2d, $2e, $f4);
10338
10400
  }
10339
10401
  };
10340
- return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($8 => $9 => Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($c => $d => FFI_Git_currentBranch($1, $c, $d), $13 => $14 => $15 => Commands_PullRequest_identifyOrCreatePR($0, $1, $2, Commands_n__9365_18640_isDraft($0, $1, $2, $3), Commands_n__9365_18639_intoBranch($0, $1, $2, $3), $13, $14, $15), $8, $9), $2b, $4, $5);
10402
+ return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($8 => $9 => Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($c => $d => FFI_Git_currentBranch($1, $c, $d), $13 => $14 => $15 => Commands_PullRequest_identifyOrCreatePR($0, $1, $2, Commands_n__9376_20922_isDraft($0, $1, $2, $3), Commands_n__9376_20921_intoBranch($0, $1, $2, $3), $13, $14, $15), $8, $9), $2b, $4, $5);
10403
+ }
10404
+
10405
+ /* Commands.parseQuickArgs : List String -> List QuickArg */
10406
+ function Commands_parseQuickArgs($0) {
10407
+ switch($0.h) {
10408
+ case 0: /* nil */ return {h: 0};
10409
+ case undefined: /* cons */ {
10410
+ switch($0.a1) {
10411
+ case '--bugfix': return {a1: {h: 0}, a2: Commands_parseQuickArgs($0.a2)};
10412
+ default: return {a1: {a1: $0.a1}, a2: Commands_parseQuickArgs($0.a2)};
10413
+ }
10414
+ }
10415
+ }
10341
10416
  }
10342
10417
 
10343
10418
  /* Commands.parsePrArgs : List String -> Either String (List PrArg) */
@@ -10345,9 +10420,9 @@ function Commands_parsePrArgs($0) {
10345
10420
  switch($0.h) {
10346
10421
  case 0: /* nil */ return {h: 1 /* Right */, a1: {h: 0}};
10347
10422
  default: {
10348
- const $3 = Commands_n__8939_18213_recombineIntoArgs($0, $0);
10423
+ const $3 = Commands_n__8950_20495_recombineIntoArgs($0, $0);
10349
10424
  const $7 = Prelude_Types_List_mapAppend({h: 0}, $b => ({h: 1 /* Into */, a1: $b}), $3.a1);
10350
- const $e = Prelude_Types_traverse_Traversable_List(csegen_9(), $13 => Commands_x3cx7cx7cx3e(csegen_628(), $18 => Commands_n__8939_18210_parseDraftFlag($0, $18), $1d => Commands_n__8939_18212_parseLabelArg($0, $1d), $13), $3.a2);
10425
+ const $e = Prelude_Types_traverse_Traversable_List(csegen_9(), $13 => Commands_x3cx7cx7cx3e(csegen_633(), $18 => Commands_n__8950_20492_parseDraftFlag($0, $18), $1d => Commands_n__8950_20494_parseLabelArg($0, $1d), $13), $3.a2);
10351
10426
  return Data_Either_maybeToEither(() => Commands_prUsageError(), Prelude_Types_map_Functor_Maybe($29 => Prelude_Types_List_tailRecAppend($7, $29), $e));
10352
10427
  }
10353
10428
  }
@@ -10363,7 +10438,7 @@ function Commands_parseGraphArgs($0) {
10363
10438
  switch($0.a2.a2.h) {
10364
10439
  case undefined: /* cons */ return {h: 0 /* Left */, a1: 'graph accepts at most one team name and the --completed flag.'};
10365
10440
  default: {
10366
- const $6 = Prelude_Types_traverse_Traversable_List(csegen_9(), $b => Commands_x3cx7cx7cx3e(csegen_628(), $10 => Commands_n__10373_19584_parseCompletedFlag($0, $10), $15 => Commands_n__10373_19585_parseTeamArg($0, $15), $b), $0);
10441
+ const $6 = Prelude_Types_traverse_Traversable_List(csegen_9(), $b => Commands_x3cx7cx7cx3e(csegen_633(), $10 => Commands_n__10384_21866_parseCompletedFlag($0, $10), $15 => Commands_n__10384_21867_parseTeamArg($0, $15), $b), $0);
10367
10442
  switch($6.h) {
10368
10443
  case undefined: /* just */ return {h: 1 /* Right */, a1: $6.a1};
10369
10444
  case 0: /* nothing */ return {h: 0 /* Left */, a1: 'The graph command expects the name of a GitHub Team and optionally --completed as arguments.'};
@@ -10372,7 +10447,7 @@ function Commands_parseGraphArgs($0) {
10372
10447
  }
10373
10448
  }
10374
10449
  default: {
10375
- const $1d = Prelude_Types_traverse_Traversable_List(csegen_9(), $22 => Commands_x3cx7cx7cx3e(csegen_628(), $27 => Commands_n__10373_19584_parseCompletedFlag($0, $27), $2c => Commands_n__10373_19585_parseTeamArg($0, $2c), $22), $0);
10450
+ const $1d = Prelude_Types_traverse_Traversable_List(csegen_9(), $22 => Commands_x3cx7cx7cx3e(csegen_633(), $27 => Commands_n__10384_21866_parseCompletedFlag($0, $27), $2c => Commands_n__10384_21867_parseTeamArg($0, $2c), $22), $0);
10376
10451
  switch($1d.h) {
10377
10452
  case undefined: /* just */ return {h: 1 /* Right */, a1: $1d.a1};
10378
10453
  case 0: /* nothing */ return {h: 0 /* Left */, a1: 'The graph command expects the name of a GitHub Team and optionally --completed as arguments.'};
@@ -10381,7 +10456,7 @@ function Commands_parseGraphArgs($0) {
10381
10456
  }
10382
10457
  }
10383
10458
  default: {
10384
- const $34 = Prelude_Types_traverse_Traversable_List(csegen_9(), $39 => Commands_x3cx7cx7cx3e(csegen_628(), $3e => Commands_n__10373_19584_parseCompletedFlag($0, $3e), $43 => Commands_n__10373_19585_parseTeamArg($0, $43), $39), $0);
10459
+ const $34 = Prelude_Types_traverse_Traversable_List(csegen_9(), $39 => Commands_x3cx7cx7cx3e(csegen_633(), $3e => Commands_n__10384_21866_parseCompletedFlag($0, $3e), $43 => Commands_n__10384_21867_parseTeamArg($0, $43), $39), $0);
10385
10460
  switch($34.h) {
10386
10461
  case undefined: /* just */ return {h: 1 /* Right */, a1: $34.a1};
10387
10462
  case 0: /* nothing */ return {h: 0 /* Left */, a1: 'The graph command expects the name of a GitHub Team and optionally --completed as arguments.'};
@@ -10395,9 +10470,9 @@ function Commands_parseContributeArgs($0) {
10395
10470
  switch($0.h) {
10396
10471
  case 0: /* nil */ return {h: 1 /* Right */, a1: {h: 0}};
10397
10472
  default: {
10398
- const $3 = Commands_n__10991_20153_recombineIgnoreArgs($0, $0);
10473
+ const $3 = Commands_n__11002_22435_recombineIgnoreArgs($0, $0);
10399
10474
  const $7 = Prelude_Types_List_mapAppend({h: 0}, $b => ({h: 2 /* Ignore */, a1: $b}), $3.a1);
10400
- const $e = Prelude_Types_traverse_Traversable_List(csegen_9(), $13 => Commands_x3cx7cx7cx3e(csegen_628(), $18 => Commands_n__10991_20151_parseListFlag($0, $18), $1d => Commands_x3cx7cx7cx3e(csegen_628(), $22 => Commands_n__10991_20152_parseSkipArg($0, $22), $27 => Commands_n__10991_20149_parseCheckoutFlag($0, $27), $1d), $13), $3.a2);
10475
+ const $e = Prelude_Types_traverse_Traversable_List(csegen_9(), $13 => Commands_x3cx7cx7cx3e(csegen_633(), $18 => Commands_n__11002_22433_parseListFlag($0, $18), $1d => Commands_x3cx7cx7cx3e(csegen_633(), $22 => Commands_n__11002_22434_parseSkipArg($0, $22), $27 => Commands_n__11002_22431_parseCheckoutFlag($0, $27), $1d), $13), $3.a2);
10401
10476
  return Data_Either_maybeToEither(() => Commands_contributeUsageError(), Prelude_Types_map_Functor_Maybe($34 => Prelude_Types_List_tailRecAppend($7, $34), $e));
10402
10477
  }
10403
10478
  }
@@ -10405,12 +10480,12 @@ function Commands_parseContributeArgs($0) {
10405
10480
 
10406
10481
  /* Commands.listOrgTeams : Config => Octokit => Promise' () */
10407
10482
  function Commands_listOrgTeams($0, $1, $2, $3) {
10408
- return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($6 => $7 => Data_Promise_map_Functor_x28Promisex20x24ex29(csegen_629(), $c => $d => FFI_GitHub_forceListTeams($1, $0.a2, $c, $d), $6, $7), teamNames => Util_renderIO($0, csegen_74()(), 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);
10483
+ return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($6 => $7 => Data_Promise_map_Functor_x28Promisex20x24ex29(csegen_634(), $c => $d => FFI_GitHub_forceListTeams($1, $0.a2, $c, $d), $6, $7), teamNames => Util_renderIO($0, csegen_74()(), 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);
10409
10484
  }
10410
10485
 
10411
10486
  /* Commands.list : Config => Octokit => String -> Promise' () */
10412
10487
  function Commands_list($0, $1, $2, $3, $4) {
10413
- return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($7 => $8 => Data_Promise_map_Functor_x28Promisex20x24ex29(csegen_629(), $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_67()(), csegen_631(), Prelude_Types_traverse_Traversable_List(csegen_66()(), $29 => Commands_n__10205_19396_forkedUser($1, $2, $0, $29), teamMemberLogins)), teamMembersJson => $31 => $32 => Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(Prelude_Types_traverse_Traversable_List(csegen_66()(), $3a => $3b => Data_Promise_either(Data_User_parseUser($3a), $3b), teamMembersJson), teamMembers => Util_renderIO($0, csegen_74()(), Text_PrettyPrint_Prettyprinter_Doc_vsep(Prelude_Types_List_mapAppend({h: 0}, $4e => Commands_n__10205_19397_putNameLn($1, $2, $0, $4e), teamMembers))), $31, $32), $19, $1a), $3, $4);
10488
+ return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($7 => $8 => Data_Promise_map_Functor_x28Promisex20x24ex29(csegen_634(), $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_67()(), csegen_636(), Prelude_Types_traverse_Traversable_List(csegen_66()(), $29 => Commands_n__10216_21678_forkedUser($1, $2, $0, $29), teamMemberLogins)), teamMembersJson => $31 => $32 => Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(Prelude_Types_traverse_Traversable_List(csegen_66()(), $3a => $3b => Data_Promise_either(Data_User_parseUser($3a), $3b), teamMembersJson), teamMembers => Util_renderIO($0, csegen_74()(), Text_PrettyPrint_Prettyprinter_Doc_vsep(Prelude_Types_List_mapAppend({h: 0}, $4e => Commands_n__10216_21679_putNameLn($1, $2, $0, $4e), teamMembers))), $31, $32), $19, $1a), $3, $4);
10414
10489
  }
10415
10490
 
10416
10491
  /* Commands.label : Config => Git => Octokit => List String -> Promise' () */
@@ -10419,7 +10494,7 @@ function Commands_label($0, $1, $2, $3, $4, $5) {
10419
10494
  switch($22.h) {
10420
10495
  case 0: /* Actual */ {
10421
10496
  const $24 = Prelude_Types_List_mapAppend({h: 0}, $28 => Commands_Label_unslugifyLabel($0.a11, $28), $3);
10422
- return $2e => $2f => Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($32 => $33 => Commands_Label_addLabels($0, $2, $22.a2, $24, $32, $33), allLabels => Util_renderIO($0, csegen_74()(), 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__8677_17949_putLabels($1, $2, $3, $0, $24), 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_51()(), $64 => $64, {a1: 'All labels for PR of ', a2: {a1: $22.a2.a8, a2: {a1: ':', a2: {h: 0}}}})), Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29(Commands_n__8677_17949_putLabels($1, $2, $3, $0, allLabels), Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Text_PrettyPrint_Prettyprinter_Doc_unsafeTextWithoutNewLines('.'), a2: {h: 0}}))), a2: {h: 0}}})), $2e, $2f);
10497
+ return $2e => $2f => Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($32 => $33 => Commands_Label_addLabels($0, $2, $22.a2, $24, $32, $33), allLabels => Util_renderIO($0, csegen_74()(), 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__8688_20231_putLabels($1, $2, $3, $0, $24), 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_51()(), $64 => $64, {a1: 'All labels for PR of ', a2: {a1: $22.a2.a8, a2: {a1: ':', a2: {h: 0}}}})), Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29(Commands_n__8688_20231_putLabels($1, $2, $3, $0, allLabels), Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Text_PrettyPrint_Prettyprinter_Doc_unsafeTextWithoutNewLines('.'), a2: {h: 0}}))), a2: {h: 0}}})), $2e, $2f);
10423
10498
  }
10424
10499
  case 1: /* Hypothetical */ return $80 => $81 => Data_Promise_reject('You cannot label a PR that has not been created yet and you cannot create the PR in this non-TTY shell', $80, $81);
10425
10500
  }
@@ -10427,6 +10502,11 @@ function Commands_label($0, $1, $2, $3, $4, $5) {
10427
10502
  return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($8 => $9 => Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($c => $d => FFI_Git_currentBranch($1, $c, $d), $13 => $14 => $15 => Commands_PullRequest_identifyOrCreatePR($0, $1, $2, 0, {h: 0}, $13, $14, $15), $8, $9), $21, $4, $5);
10428
10503
  }
10429
10504
 
10505
+ /* Commands.issueCategory : List QuickArg -> IssueCategory */
10506
+ function Commands_issueCategory($0) {
10507
+ return Prelude_Types_maybe(() => 1, () => $4 => 0, Data_List_find(csegen_643(), $0));
10508
+ }
10509
+
10430
10510
  /* Commands.health : Config => Octokit => Promise' () */
10431
10511
  function Commands_health($0, $1, $2, $3) {
10432
10512
  return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(Commands_PullRequest_listOpenPRs($0, $1, 4n, 100n), prs => Util_renderIO($0, csegen_74()(), Commands_Graph_healthGraph($0, prs, $0.a2, $0.a3)), $2, $3);
@@ -10434,14 +10514,8 @@ function Commands_health($0, $1, $2, $3) {
10434
10514
 
10435
10515
  /* Commands.graph : Config => Octokit => List GraphArg -> Promise' () */
10436
10516
  function Commands_graph($0, $1, $2) {
10437
- const $5 = $6 => {
10438
- switch($6.h) {
10439
- case 0: /* nothing */ return 1;
10440
- default: return 0;
10441
- }
10442
- };
10443
- const $3 = Data_List_find($5, $2);
10444
- return $9 => Commands_case__graph_19889($1, $2, $0, $3, Data_List_headx27(Prelude_Types_List_mapMaybeAppend({h: 0}, $15 => Commands_teamNameArg($15), $2)), $9);
10517
+ const $3 = Data_List_find(csegen_643(), $2);
10518
+ return $8 => Commands_case__graph_22171($1, $2, $0, $3, Data_List_headx27(Prelude_Types_List_mapMaybeAppend({h: 0}, $14 => Commands_teamNameArg($14), $2)), $8);
10445
10519
  }
10446
10520
 
10447
10521
  /* Commands.contributeUsageError : String */
@@ -10506,17 +10580,17 @@ function Commands_contribute($0, $1, $2, $3, $4, $5) {
10506
10580
  }
10507
10581
  };
10508
10582
  const $72 = Prelude_Types_List_filterAppend({h: 0}, $75, $13);
10509
- const $7c = Prelude_Types_List_filterAppend({h: 0}, $80 => Commands_n__11343_20511_isNotIgnored($1, $2, $3, $0, configx27, $80), $72);
10583
+ const $7c = Prelude_Types_List_filterAppend({h: 0}, $80 => Commands_n__11354_22793_isNotIgnored($1, $2, $3, $0, configx27, $80), $72);
10510
10584
  const $89 = Data_List_partition($8c => Data_PullRequest_isRequestedReviewer(myLogin, $8c), $7c);
10511
- const $91 = Prelude_Interfaces_mapHom(csegen_604(), $97 => Data_List_sortBy(csegen_645(), $97))($89);
10585
+ const $91 = Prelude_Interfaces_mapHom(csegen_608(), $97 => Data_List_sortBy(csegen_650(), $97))($89);
10512
10586
  let $71;
10513
10587
  switch($54.h) {
10514
10588
  case 0: /* nothing */ {
10515
- $71 = () => Commands_n__11343_20513_pickOne($1, $2, $3, $0, configx27, $41, $4e, $91.a1, $91.a2);
10589
+ $71 = () => Commands_n__11354_22795_pickOne($1, $2, $3, $0, configx27, $41, $4e, $91.a1, $91.a2);
10516
10590
  break;
10517
10591
  }
10518
10592
  case undefined: /* just */ {
10519
- $71 = () => $a8 => $a9 => Commands_n__11343_20512_listSome($1, $2, $3, $0, $41, $91.a1, $91.a2, $a8, $a9);
10593
+ $71 = () => $a8 => $a9 => Commands_n__11354_22794_listSome($1, $2, $3, $0, $41, $91.a1, $91.a2, $a8, $a9);
10520
10594
  break;
10521
10595
  }
10522
10596
  }
@@ -10550,8 +10624,8 @@ function Commands_x3cx7cx7cx3e($0, $1, $2, $3) {
10550
10624
  return $0.a3(undefined)($1($3))(() => $2($3));
10551
10625
  }
10552
10626
 
10553
- /* FFI.Concurrency.5712:17953:both */
10554
- function FFI_Concurrency_n__5712_17953_both($0, $1, $2, $3, $4) {
10627
+ /* FFI.Concurrency.5718:20235:both */
10628
+ function FFI_Concurrency_n__5718_20235_both($0, $1, $2, $3, $4) {
10555
10629
  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))));
10556
10630
  }
10557
10631
 
@@ -10594,7 +10668,7 @@ function FFI_Concurrency_fork($0, $1) {
10594
10668
 
10595
10669
  /* FFI.Concurrency.all : HasIO io => Foldable t => t Future -> io Future */
10596
10670
  function FFI_Concurrency_all($0, $1, $2) {
10597
- return $1.a1(undefined)(undefined)($c => $d => FFI_Concurrency_n__5712_17953_both($0, $1, $2, $c, $d))($0.a2(undefined)($1a => FFI_Concurrency_prim__neutral($1a)))($2);
10671
+ return $1.a1(undefined)(undefined)($c => $d => FFI_Concurrency_n__5718_20235_both($0, $1, $2, $c, $d))($0.a2(undefined)($1a => FFI_Concurrency_prim__neutral($1a)))($2);
10598
10672
  }
10599
10673
 
10600
10674
  /* Data.SortedMap.map */
@@ -10634,7 +10708,7 @@ function Data_SortedMap_empty($0) {
10634
10708
 
10635
10709
  /* Data.SortedMap.Dependent.treeToList : Tree n k v o -> List (x : k ** v x) */
10636
10710
  function Data_SortedMap_Dependent_treeToList($0) {
10637
- return Data_SortedMap_Dependent_n__6823_6782_treeToListx27($3 => ({a1: $3, a2: {h: 0}}), $0);
10711
+ return Data_SortedMap_Dependent_n__6828_9064_treeToListx27($3 => ({a1: $3, a2: {h: 0}}), $0);
10638
10712
  }
10639
10713
 
10640
10714
  /* Data.SortedMap.Dependent.treeMap : (a x -> b x) -> Tree n k a o -> Tree n k b o */
@@ -10762,67 +10836,67 @@ function Data_SortedMap_Dependent_empty($0) {
10762
10836
 
10763
10837
  /* Commands.User.Reflect.case block in case block in reflectOnSelf */
10764
10838
  function Commands_User_Reflect_case__casex20blockx20inx20reflectOnSelf_1920($0, $1, $2, $3, $4, $5, $6, $7, $8, $9) {
10765
- const $b = Prelude_Interfaces_mapHom(csegen_604(), $11 => Data_List_headx27(Data_List_sort({a1: {a1: $18 => $19 => Data_Date_x3dx3d_Eq_Date($18, $19), a2: $1e => $1f => Data_Date_x2fx3d_Eq_Date($1e, $1f)}, a2: $24 => $25 => Data_Date_compare_Ord_Date($24, $25), a3: $2a => $2b => Data_Date_x3c_Ord_Date($2a, $2b), a4: $30 => $31 => Data_Date_x3e_Ord_Date($30, $31), a5: $36 => $37 => Data_Date_x3cx3d_Ord_Date($36, $37), a6: $3c => $3d => Data_Date_x3ex3d_Ord_Date($3c, $3d), a7: $42 => $43 => Data_Date_max_Ord_Date($42, $43), a8: $48 => $49 => Data_Date_min_Ord_Date($48, $49)}, Prelude_Types_List_mapAppend({h: 0}, csegen_667(), $11))))({a1: $7, a2: $9.a1});
10839
+ const $b = Prelude_Interfaces_mapHom(csegen_608(), $11 => Data_List_headx27(Data_List_sort({a1: {a1: $18 => $19 => Data_Date_x3dx3d_Eq_Date($18, $19), a2: $1e => $1f => Data_Date_x2fx3d_Eq_Date($1e, $1f)}, a2: $24 => $25 => Data_Date_compare_Ord_Date($24, $25), a3: $2a => $2b => Data_Date_x3c_Ord_Date($2a, $2b), a4: $30 => $31 => Data_Date_x3e_Ord_Date($30, $31), a5: $36 => $37 => Data_Date_x3cx3d_Ord_Date($36, $37), a6: $3c => $3d => Data_Date_x3ex3d_Ord_Date($3c, $3d), a7: $42 => $43 => Data_Date_max_Ord_Date($42, $43), a8: $48 => $49 => Data_Date_min_Ord_Date($48, $49)}, Prelude_Types_List_mapAppend({h: 0}, csegen_672(), $11))))({a1: $7, a2: $9.a1});
10766
10840
  return Util_renderIO($0, csegen_74()(), Commands_User_Reflect_print(Prelude_Types_String_length(Commands_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));
10767
10841
  }
10768
10842
 
10769
- /* Commands.User.Me.7543:2049:ul */
10770
- function Commands_User_Me_n__7543_2049_ul($0, $1, $2, $3, $4) {
10843
+ /* Commands.User.Me.7549:2049:ul */
10844
+ function Commands_User_Me_n__7549_2049_ul($0, $1, $2, $3, $4) {
10771
10845
  return Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_underline(), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String($4));
10772
10846
  }
10773
10847
 
10774
- /* Commands.User.Me.7543:2048:teams */
10775
- function Commands_User_Me_n__7543_2048_teams($0, $1, $2, $3) {
10776
- return Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Commands_User_Me_n__7543_2049_ul($0, $1, $2, $3, 'GitHub Teams:'), a2: Prelude_Types_List_mapAppend({h: 0}, $11 => Commands_User_Me_n__7543_2046_it($0, $1, $2, $3, $11), $0)});
10848
+ /* Commands.User.Me.7549:2048:teams */
10849
+ function Commands_User_Me_n__7549_2048_teams($0, $1, $2, $3) {
10850
+ return Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Commands_User_Me_n__7549_2049_ul($0, $1, $2, $3, 'GitHub Teams:'), a2: Prelude_Types_List_mapAppend({h: 0}, $11 => Commands_User_Me_n__7549_2046_it($0, $1, $2, $3, $11), $0)});
10777
10851
  }
10778
10852
 
10779
- /* Commands.User.Me.7543:2047:login */
10780
- function Commands_User_Me_n__7543_2047_login($0, $1, $2, $3) {
10781
- return Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('GitHub Login:'), Commands_User_Me_n__7543_2043_dataVal($0, $1, $2, $3, $1.a1));
10853
+ /* Commands.User.Me.7549:2047:login */
10854
+ function Commands_User_Me_n__7549_2047_login($0, $1, $2, $3) {
10855
+ return Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('GitHub Login:'), Commands_User_Me_n__7549_2043_dataVal($0, $1, $2, $3, $1.a1));
10782
10856
  }
10783
10857
 
10784
- /* Commands.User.Reflect.6598:1075:ital */
10785
- function Commands_User_Reflect_n__6598_1075_ital($0, $1) {
10858
+ /* Commands.User.Reflect.6604:1075:ital */
10859
+ function Commands_User_Reflect_n__6604_1075_ital($0, $1) {
10786
10860
  return Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_italic(), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String($1));
10787
10861
  }
10788
10862
 
10789
- /* Commands.User.Me.7543:2046:it */
10790
- function Commands_User_Me_n__7543_2046_it($0, $1, $2, $3, $4) {
10863
+ /* Commands.User.Me.7549:2046:it */
10864
+ function Commands_User_Me_n__7549_2046_it($0, $1, $2, $3, $4) {
10791
10865
  return Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_italic(), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String($4));
10792
10866
  }
10793
10867
 
10794
- /* Commands.User.Me.7693:2202:handleUnsetEmail */
10795
- function Commands_User_Me_n__7693_2202_handleUnsetEmail($0, $1, $2, $3) {
10868
+ /* Commands.User.Me.7699:2202:handleUnsetEmail */
10869
+ function Commands_User_Me_n__7699_2202_handleUnsetEmail($0, $1, $2, $3) {
10796
10870
  switch($3) {
10797
10871
  case '': return {h: 0};
10798
10872
  default: return {a1: $3};
10799
10873
  }
10800
10874
  }
10801
10875
 
10802
- /* Commands.User.Me.7543:2045:fullName */
10803
- function Commands_User_Me_n__7543_2045_fullName($0, $1, $2, $3) {
10804
- return Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('GitHub Name:'), Commands_User_Me_n__7543_2043_dataVal($0, $1, $2, $3, $1.a2));
10876
+ /* Commands.User.Me.7549:2045:fullName */
10877
+ function Commands_User_Me_n__7549_2045_fullName($0, $1, $2, $3) {
10878
+ return Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('GitHub Name:'), Commands_User_Me_n__7549_2043_dataVal($0, $1, $2, $3, $1.a2));
10805
10879
  }
10806
10880
 
10807
- /* Commands.User.Me.7543:2044:email */
10808
- function Commands_User_Me_n__7543_2044_email($0, $1, $2, $3) {
10881
+ /* Commands.User.Me.7549:2044:email */
10882
+ function Commands_User_Me_n__7549_2044_email($0, $1, $2, $3) {
10809
10883
  let $8;
10810
10884
  switch($2.h) {
10811
10885
  case undefined: /* just */ {
10812
- $8 = Commands_User_Me_n__7543_2043_dataVal($0, $1, $2, $3, $2.a1);
10886
+ $8 = Commands_User_Me_n__7549_2043_dataVal($0, $1, $2, $3, $2.a1);
10813
10887
  break;
10814
10888
  }
10815
10889
  case 0: /* nothing */ {
10816
- $8 = Commands_User_Me_n__7543_2046_it($0, $1, $2, $3, 'Not set');
10890
+ $8 = Commands_User_Me_n__7549_2046_it($0, $1, $2, $3, 'Not set');
10817
10891
  break;
10818
10892
  }
10819
10893
  }
10820
10894
  return Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('Git Email:'), $8);
10821
10895
  }
10822
10896
 
10823
- /* Commands.User.Me.7543:2043:dataVal */
10824
- function Commands_User_Me_n__7543_2043_dataVal($0, $1, $2, $3, $4) {
10825
- return Theme_theme($3, csegen_670(), Theme_cs({a1: 4, a2: {h: 0}}, {h: 0 /* Left */, a1: undefined}), 8)(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String($4));
10897
+ /* Commands.User.Me.7549:2043:dataVal */
10898
+ function Commands_User_Me_n__7549_2043_dataVal($0, $1, $2, $3, $4) {
10899
+ return Theme_theme($3, csegen_675(), Theme_cs({a1: 4, a2: {h: 0}}, {h: 0 /* Left */, a1: undefined}), 8)(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String($4));
10826
10900
  }
10827
10901
 
10828
10902
  /* Commands.User.Reflect.rightTitle : String */
@@ -10845,11 +10919,11 @@ function Commands_User_Reflect_reflectOnSelf($0, $1, $2, $3) {
10845
10919
  const $c = prs => $d => $e => {
10846
10920
  const $1c = myLogin => $1d => $1e => {
10847
10921
  const $3a = reviews => {
10848
- const $3b = Prelude_Types_map_Functor_Maybe(csegen_673(), Data_List_headx27(Data_List_sortBy($44 => $45 => Prelude_Basics_on(csegen_643(), csegen_673(), $44, $45), reviews)));
10849
- const $4e = Prelude_Interfaces_mapHom(csegen_604(), $54 => Prelude_Types_List_filterAppend({h: 0}, $58 => Prelude_EqOrd_x3dx3d_Eq_String($58.a5, myLogin), $54))(prs);
10850
- return Commands_User_Reflect_case__casex20blockx20inx20reflectOnSelf_1920($0, $1, prs, myLogin, reviews, $3b, prs, $4e.a1, $4e.a2, Prelude_Interfaces_mapHom(csegen_604(), $6f => Prelude_Types_List_filterAppend({h: 0}, $73 => Prelude_Types_foldMap_Foldable_List(csegen_97(), $78 => Prelude_EqOrd_x3dx3d_Eq_String($78, myLogin), $73.a7), $6f))(prs));
10922
+ const $3b = Prelude_Types_map_Functor_Maybe(csegen_678(), Data_List_headx27(Data_List_sortBy($44 => $45 => Prelude_Basics_on(csegen_648(), csegen_678(), $44, $45), reviews)));
10923
+ const $4e = Prelude_Interfaces_mapHom(csegen_608(), $54 => Prelude_Types_List_filterAppend({h: 0}, $58 => Prelude_EqOrd_x3dx3d_Eq_String($58.a5, myLogin), $54))(prs);
10924
+ return Commands_User_Reflect_case__casex20blockx20inx20reflectOnSelf_1920($0, $1, prs, myLogin, reviews, $3b, prs, $4e.a1, $4e.a2, Prelude_Interfaces_mapHom(csegen_608(), $6f => Prelude_Types_List_filterAppend({h: 0}, $73 => Prelude_Types_foldMap_Foldable_List(csegen_97(), $78 => Prelude_EqOrd_x3dx3d_Eq_String($78, myLogin), $73.a7), $6f))(prs));
10851
10925
  };
10852
- return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(Commands_PullRequest_reviewsByUser($0, $1, myLogin, Data_List_take(Commands_User_Reflect_reviewDetailsCount(), Prelude_Types_List_reverse(Data_List_sortBy($2e => $2f => Prelude_Basics_on(csegen_643(), csegen_667(), $2e, $2f), Commands_PullRequest_combined(prs))))), $3a, $1d, $1e);
10926
+ return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(Commands_PullRequest_reviewsByUser($0, $1, myLogin, Data_List_take(Commands_User_Reflect_reviewDetailsCount(), Prelude_Types_List_reverse(Data_List_sortBy($2e => $2f => Prelude_Basics_on(csegen_648(), csegen_672(), $2e, $2f), Commands_PullRequest_combined(prs))))), $3a, $1d, $1e);
10853
10927
  };
10854
10928
  return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($11 => $12 => Data_Promise_map_Functor_x28Promisex20x24ex29(csegen_365()(), FFI_GitHub_getSelf($1), $11, $12), $1c, $d, $e);
10855
10929
  };
@@ -10858,7 +10932,7 @@ function Commands_User_Reflect_reflectOnSelf($0, $1, $2, $3) {
10858
10932
 
10859
10933
  /* Commands.User.Me.printInfoOnSelf : Config => Octokit => Git => Promise' () */
10860
10934
  function Commands_User_Me_printInfoOnSelf($0, $1, $2, $3, $4) {
10861
- return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($7 => $8 => Data_Promise_map_Functor_x28Promisex20x24ex29($b => Commands_User_Me_n__7693_2202_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_629(), $2c => $2d => FFI_GitHub_listMyTeams($1, $2c, $2d), $26, $27), githubTeams => Util_renderIO($0, csegen_74()(), Commands_User_Me_print($0, gitEmail, githubUser, githubTeams)), $22, $23), $1b, $1c), $3, $4);
10935
+ return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($7 => $8 => Data_Promise_map_Functor_x28Promisex20x24ex29($b => Commands_User_Me_n__7699_2202_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_634(), $2c => $2d => FFI_GitHub_listMyTeams($1, $2c, $2d), $26, $27), githubTeams => Util_renderIO($0, csegen_74()(), Commands_User_Me_print($0, gitEmail, githubUser, githubTeams)), $22, $23), $1b, $1c), $3, $4);
10862
10936
  }
10863
10937
 
10864
10938
  /* Commands.User.Reflect.print : Nat -> Nat -> Nat -> Nat -> Nat -> Nat -> Maybe Date -> Maybe Date -> Maybe Date -> Config =>
@@ -10869,7 +10943,7 @@ function Commands_User_Reflect_print($0, $1, $2, $3, $4, $5, $6, $7, $8, $9) {
10869
10943
 
10870
10944
  /* Commands.User.Me.print : Config -> Maybe String -> User -> List String -> Doc AnsiStyle */
10871
10945
  function Commands_User_Me_print($0, $1, $2, $3) {
10872
- return Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {a1: Commands_User_Me_n__7543_2044_email($3, $2, $1, $0), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {a1: Commands_User_Me_n__7543_2045_fullName($3, $2, $1, $0), a2: {a1: Commands_User_Me_n__7543_2047_login($3, $2, $1, $0), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {a1: Commands_User_Me_n__7543_2048_teams($3, $2, $1, $0), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {h: 0}}}}}}}}});
10946
+ return Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {a1: Commands_User_Me_n__7549_2044_email($3, $2, $1, $0), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {a1: Commands_User_Me_n__7549_2045_fullName($3, $2, $1, $0), a2: {a1: Commands_User_Me_n__7549_2047_login($3, $2, $1, $0), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {a1: Commands_User_Me_n__7549_2048_teams($3, $2, $1, $0), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {h: 0}}}}}}}}});
10873
10947
  }
10874
10948
 
10875
10949
  /* Commands.User.Reflect.prCount : Fin 101 */
@@ -10889,7 +10963,7 @@ const Commands_User_Reflect_intro = __lazy(function () {
10889
10963
 
10890
10964
  /* Commands.User.Reflect.header : Nat -> Doc AnsiStyle */
10891
10965
  function Commands_User_Reflect_header($0) {
10892
- return Text_PrettyPrint_Prettyprinter_Doc_indent(Number(_truncBigInt32($0)), Text_PrettyPrint_Prettyprinter_Doc_hsep({a1: Commands_User_Reflect_n__6598_1075_ital($0, Commands_User_Reflect_leftTitle()), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(' '), a2: {a1: Commands_User_Reflect_n__6598_1075_ital($0, Commands_User_Reflect_rightTitle()), a2: {h: 0}}}}));
10966
+ return Text_PrettyPrint_Prettyprinter_Doc_indent(Number(_truncBigInt32($0)), Text_PrettyPrint_Prettyprinter_Doc_hsep({a1: Commands_User_Reflect_n__6604_1075_ital($0, Commands_User_Reflect_leftTitle()), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(' '), a2: {a1: Commands_User_Reflect_n__6604_1075_ital($0, Commands_User_Reflect_rightTitle()), a2: {h: 0}}}}));
10893
10967
  }
10894
10968
 
10895
10969
  /* Commands.User.Reflect.graph : Nat -> Nat -> Nat -> Nat -> Nat -> Nat -> Config => Doc AnsiStyle */
@@ -10907,12 +10981,12 @@ function Commands_User_Reflect_graph($0, $1, $2, $3, $4, $5, $6) {
10907
10981
 
10908
10982
  /* Commands.User.Reflect.details : Nat -> Nat -> Nat -> Nat -> Nat -> Nat -> Maybe Date -> Maybe Date -> Maybe Date -> Doc AnsiStyle */
10909
10983
  function Commands_User_Reflect_details($0, $1, $2, $3, $4, $5, $6, $7, $8) {
10910
- return Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(Commands_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_679(), $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_679(), $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_51()(), $d0 => $d0, {a1: '*review count (not PR count) of most recent ', a2: {a1: Data_Fin_show_Show_x28Finx20x24nx29(Commands_User_Reflect_reviewDetailsCount()), a2: {a1: ' PRs.', a2: {h: 0}}}}))), a2: {h: 0}}}}}}}}}});
10984
+ return Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(Commands_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_684(), $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_684(), $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_51()(), $d0 => $d0, {a1: '*review count (not PR count) of most recent ', a2: {a1: Data_Fin_show_Show_x28Finx20x24nx29(Commands_User_Reflect_reviewDetailsCount()), a2: {a1: ' PRs.', a2: {h: 0}}}}))), a2: {h: 0}}}}}}}}}});
10911
10985
  }
10912
10986
 
10913
10987
  /* Commands.User.Reflect.chart : Nat -> Nat -> Nat -> Nat -> Nat -> Nat -> Config => Nat -> Doc AnsiStyle */
10914
10988
  function Commands_User_Reflect_chart($0, $1, $2, $3, $4, $5, $6, $7) {
10915
- 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(Commands_User_replicatex27($6, csegen_670(), csegen_689(), 4, $1, '\u{b7}'), Commands_User_replicatex27($6, csegen_690(), csegen_690(), 7, $3, '\u{25e6}')), Commands_User_replicatex27($6, csegen_691(), csegen_691(), 5, $2, '<')), Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('|'), Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29(Commands_User_replicatex27($6, csegen_691(), csegen_691(), 5, $5, '>'), Commands_User_replicatex27($6, csegen_670(), csegen_689(), 4, $4, '\u{b7}')))));
10989
+ 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(Commands_User_replicatex27($6, csegen_675(), csegen_694(), 4, $1, '\u{b7}'), Commands_User_replicatex27($6, csegen_695(), csegen_695(), 7, $3, '\u{25e6}')), Commands_User_replicatex27($6, csegen_696(), csegen_696(), 5, $2, '<')), Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('|'), Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29(Commands_User_replicatex27($6, csegen_696(), csegen_696(), 5, $5, '>'), Commands_User_replicatex27($6, csegen_675(), csegen_694(), 4, $4, '\u{b7}')))));
10916
10990
  }
10917
10991
 
10918
10992
  /* Theme.4411:1332:maybeAnnotate */
@@ -11003,95 +11077,95 @@ function Commands_PullRequest_case__githubTitleAndBodyPrefix_2919($0, $1, $2, $3
11003
11077
  return $5 => {
11004
11078
  switch($3.h) {
11005
11079
  case 0: /* nothing */ return Data_Promise_pure_Applicative_x28Promisex20x24ex29({a1: '', a2: ''}, $4, $5);
11006
- case undefined: /* just */ return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($f => $10 => Commands_PullRequest_n__10955_2841_issueDescriptionPrefix($0, $1, $2, $3.a1, $f, $10), $19 => $1a => $1b => Data_Promise_pure_Applicative_x28Promisex20x24ex29({a1: '', a2: ($19+('\n\n'+Commands_PullRequest_n__10955_2843_relatedToPrefix($0, $1, $2, $3.a1)))}, $1a, $1b), $4, $5);
11080
+ case undefined: /* just */ return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($f => $10 => Commands_PullRequest_n__10961_2841_issueDescriptionPrefix($0, $1, $2, $3.a1, $f, $10), $19 => $1a => $1b => Data_Promise_pure_Applicative_x28Promisex20x24ex29({a1: '', a2: ($19+('\n\n'+Commands_PullRequest_n__10961_2843_relatedToPrefix($0, $1, $2, $3.a1)))}, $1a, $1b), $4, $5);
11007
11081
  }
11008
11082
  };
11009
11083
  }
11010
11084
 
11011
- /* Commands.PullRequest.10061:1999:userNotice */
11012
- function Commands_PullRequest_n__10061_1999_userNotice($0, $1, $2, $3, $4, $5, $6) {
11085
+ /* Commands.PullRequest.10067:1999:userNotice */
11086
+ function Commands_PullRequest_n__10067_1999_userNotice($0, $1, $2, $3, $4, $5, $6) {
11013
11087
  switch($6.h) {
11014
11088
  case 0: /* nothing */ {
11015
11089
  switch($2.h) {
11016
11090
  case 0: /* nil */ return 'no users';
11017
- default: return Prelude_Types_foldMap_Foldable_List(csegen_51()(), $e => $e, {a1: Commands_PullRequest_n__10061_1994_csv($0, $1, $2, $3, $4, $5, $2), a2: {h: 0}});
11091
+ default: return Prelude_Types_foldMap_Foldable_List(csegen_51()(), $e => $e, {a1: Commands_PullRequest_n__10067_1994_csv($0, $1, $2, $3, $4, $5, $2), a2: {h: 0}});
11018
11092
  }
11019
11093
  }
11020
- case undefined: /* just */ return Prelude_Types_foldMap_Foldable_List(csegen_51()(), $1f => $1f, {a1: Commands_PullRequest_n__10061_1994_csv($0, $1, $2, $3, $4, $5, {a1: $6.a1, a2: $2}), a2: {h: 0}});
11094
+ case undefined: /* just */ return Prelude_Types_foldMap_Foldable_List(csegen_51()(), $1f => $1f, {a1: Commands_PullRequest_n__10067_1994_csv($0, $1, $2, $3, $4, $5, {a1: $6.a1, a2: $2}), a2: {h: 0}});
11021
11095
  }
11022
11096
  }
11023
11097
 
11024
- /* Commands.PullRequest.10061:1998:teamNotice */
11025
- function Commands_PullRequest_n__10061_1998_teamNotice($0, $1, $2, $3, $4, $5, $6) {
11098
+ /* Commands.PullRequest.10067:1998:teamNotice */
11099
+ function Commands_PullRequest_n__10067_1998_teamNotice($0, $1, $2, $3, $4, $5, $6) {
11026
11100
  switch($6.h) {
11027
11101
  case 0: /* nil */ return '';
11028
11102
  case undefined: /* cons */ {
11029
11103
  switch($6.a2.h) {
11030
- case 0: /* nil */ return Prelude_Types_foldMap_Foldable_List(csegen_51()(), $e => $e, {a1: ' and team ', a2: {a1: Commands_PullRequest_n__10061_1994_csv($0, $1, $2, $3, $4, $5, {a1: $6.a1, a2: {h: 0}}), a2: {h: 0}}});
11031
- default: return Prelude_Types_foldMap_Foldable_List(csegen_51()(), $23 => $23, {a1: ' and teams ', a2: {a1: Commands_PullRequest_n__10061_1994_csv($0, $1, $2, $3, $4, $5, $6), a2: {h: 0}}});
11104
+ case 0: /* nil */ return Prelude_Types_foldMap_Foldable_List(csegen_51()(), $e => $e, {a1: ' and team ', a2: {a1: Commands_PullRequest_n__10067_1994_csv($0, $1, $2, $3, $4, $5, {a1: $6.a1, a2: {h: 0}}), a2: {h: 0}}});
11105
+ default: return Prelude_Types_foldMap_Foldable_List(csegen_51()(), $23 => $23, {a1: ' and teams ', a2: {a1: Commands_PullRequest_n__10067_1994_csv($0, $1, $2, $3, $4, $5, $6), a2: {h: 0}}});
11032
11106
  }
11033
11107
  }
11034
- default: return Prelude_Types_foldMap_Foldable_List(csegen_51()(), $36 => $36, {a1: ' and teams ', a2: {a1: Commands_PullRequest_n__10061_1994_csv($0, $1, $2, $3, $4, $5, $6), a2: {h: 0}}});
11108
+ default: return Prelude_Types_foldMap_Foldable_List(csegen_51()(), $36 => $36, {a1: ' and teams ', a2: {a1: Commands_PullRequest_n__10067_1994_csv($0, $1, $2, $3, $4, $5, $6), a2: {h: 0}}});
11035
11109
  }
11036
11110
  }
11037
11111
 
11038
- /* Commands.PullRequest.10955:2843:relatedToPrefix */
11039
- function Commands_PullRequest_n__10955_2843_relatedToPrefix($0, $1, $2, $3) {
11112
+ /* Commands.PullRequest.10961:2843:relatedToPrefix */
11113
+ function Commands_PullRequest_n__10961_2843_relatedToPrefix($0, $1, $2, $3) {
11040
11114
  return Prelude_Types_foldMap_Foldable_List(csegen_51()(), $9 => $9, {a1: 'Related to #', a2: {a1: $3, a2: {h: 0}}});
11041
11115
  }
11042
11116
 
11043
- /* Commands.PullRequest.11189:3087:prCreationUrl */
11044
- function Commands_PullRequest_n__11189_3087_prCreationUrl($0, $1, $2, $3, $4, $5) {
11117
+ /* Commands.PullRequest.11195:3087:prCreationUrl */
11118
+ function Commands_PullRequest_n__11195_3087_prCreationUrl($0, $1, $2, $3, $4, $5) {
11045
11119
  const $6 = $5.a3;
11046
11120
  const $8 = $5.a2;
11047
11121
  return Prelude_Types_foldMap_Foldable_List(csegen_51()(), $f => $f, {a1: 'https://github.com/', a2: {a1: $8, a2: {a1: '/', a2: {a1: $6, a2: {a1: '/compare/', a2: {a1: $2, a2: {a1: '?expand=1', a2: {h: 0}}}}}}}});
11048
11122
  }
11049
11123
 
11050
- /* Commands.PullRequest.10061:1997:prComment */
11051
- function Commands_PullRequest_n__10061_1997_prComment($0, $1, $2, $3, $4, $5, $6) {
11124
+ /* Commands.PullRequest.10067:1997:prComment */
11125
+ function Commands_PullRequest_n__10067_1997_prComment($0, $1, $2, $3, $4, $5, $6) {
11052
11126
  return Prelude_Types_foldMap_Foldable_List(csegen_51()(), $c => $c, {a1: ':musical_note: Harmoniously requested review from ', a2: {a1: $6, a2: {a1: '.', a2: {h: 0}}}});
11053
11127
  }
11054
11128
 
11055
- /* Commands.PullRequest.10061:1996:namePrComment */
11056
- function Commands_PullRequest_n__10061_1996_namePrComment($0, $1, $2, $3, $4, $5, $6) {
11057
- return Commands_PullRequest_n__10061_1997_prComment($0, $1, $2, $3, $4, $5, Prelude_Types_foldMap_Foldable_List(csegen_51()(), $14 => $14, {a1: $6.a2, a2: {h: 0}}));
11129
+ /* Commands.PullRequest.10067:1996:namePrComment */
11130
+ function Commands_PullRequest_n__10067_1996_namePrComment($0, $1, $2, $3, $4, $5, $6) {
11131
+ return Commands_PullRequest_n__10067_1997_prComment($0, $1, $2, $3, $4, $5, Prelude_Types_foldMap_Foldable_List(csegen_51()(), $14 => $14, {a1: $6.a2, a2: {h: 0}}));
11058
11132
  }
11059
11133
 
11060
- /* Commands.PullRequest.10061:1995:mentionPrComment */
11061
- function Commands_PullRequest_n__10061_1995_mentionPrComment($0, $1, $2, $3, $4, $5, $6) {
11062
- return Commands_PullRequest_n__10061_1997_prComment($0, $1, $2, $3, $4, $5, Prelude_Types_foldMap_Foldable_List(csegen_51()(), $14 => $14, {a1: '@', a2: {a1: $6, a2: {h: 0}}}));
11134
+ /* Commands.PullRequest.10067:1995:mentionPrComment */
11135
+ function Commands_PullRequest_n__10067_1995_mentionPrComment($0, $1, $2, $3, $4, $5, $6) {
11136
+ return Commands_PullRequest_n__10067_1997_prComment($0, $1, $2, $3, $4, $5, Prelude_Types_foldMap_Foldable_List(csegen_51()(), $14 => $14, {a1: '@', a2: {a1: $6, a2: {h: 0}}}));
11063
11137
  }
11064
11138
 
11065
- /* Commands.PullRequest.10955:2842:issueNumber */
11066
- function Commands_PullRequest_n__10955_2842_issueNumber($0, $1, $2) {
11139
+ /* Commands.PullRequest.10961:2842:issueNumber */
11140
+ function Commands_PullRequest_n__10961_2842_issueNumber($0, $1, $2) {
11067
11141
  return Util_Github_parseGithubIssueNumber($1);
11068
11142
  }
11069
11143
 
11070
- /* Commands.PullRequest.10955:2841:issueDescriptionPrefix */
11071
- function Commands_PullRequest_n__10955_2841_issueDescriptionPrefix($0, $1, $2, $3, $4, $5) {
11144
+ /* Commands.PullRequest.10961:2841:issueDescriptionPrefix */
11145
+ function Commands_PullRequest_n__10961_2841_issueDescriptionPrefix($0, $1, $2, $3, $4, $5) {
11072
11146
  return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(FFI_GitHub_getIssue($0, $2.a2, $2.a3, $3), issue => $10 => $11 => Data_Promise_pure_Applicative_x28Promisex20x24ex29(Prelude_Types_foldMap_Foldable_List(csegen_51()(), $19 => $19, {a1: '<!--\n## GitHub Issue\n', a2: {a1: issue.a2, a2: {a1: '\n--\n', a2: {a1: issue.a3, a2: {a1: '\n-->', a2: {h: 0}}}}}}), $10, $11), $4, $5);
11073
11147
  }
11074
11148
 
11075
- /* Commands.PullRequest.11189:3086:inlineDescriptionPrompt */
11076
- function Commands_PullRequest_n__11189_3086_inlineDescriptionPrompt($0, $1, $2, $3, $4, $5) {
11149
+ /* Commands.PullRequest.11195:3086:inlineDescriptionPrompt */
11150
+ function Commands_PullRequest_n__11195_3086_inlineDescriptionPrompt($0, $1, $2, $3, $4, $5) {
11077
11151
  return 'What would you like the description to be (two blank lines to finish)?';
11078
11152
  }
11079
11153
 
11080
- /* Commands.PullRequest.11189:3085:getBaseBranch */
11081
- function Commands_PullRequest_n__11189_3085_getBaseBranch($0, $1, $2, $3, $4, $5, $6, $7) {
11154
+ /* Commands.PullRequest.11195:3085:getBaseBranch */
11155
+ function Commands_PullRequest_n__11195_3085_getBaseBranch($0, $1, $2, $3, $4, $5, $6, $7) {
11082
11156
  switch($3.h) {
11083
11157
  case undefined: /* just */ return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($b => $c => $d => Data_Promise_liftIO_HasIO_x28Promisex20x24ex29($10 => Prelude_IO_prim__putStr((Prelude_Types_foldMap_Foldable_List(csegen_51()(), $19 => $19, {a1: 'Will merge into ', a2: {a1: $3.a1, a2: {a1: '.', a2: {h: 0}}}})+'\n'), $10), $b, $c, $d), $27 => $28 => $29 => Data_Promise_pure_Applicative_x28Promisex20x24ex29($3.a1, $28, $29), $6, $7);
11084
11158
  case 0: /* nothing */ return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($32 => $33 => $34 => Data_Promise_liftIO_HasIO_x28Promisex20x24ex29($37 => Prelude_IO_prim__putStr((Prelude_Types_foldMap_Foldable_List(csegen_51()(), $40 => $40, {a1: 'What branch are you merging into (ENTER for default: ', a2: {a1: $5.a5, a2: {a1: ')?', a2: {h: 0}}}})+'\n'), $37), $32, $33, $34), $4f => $50 => $51 => Data_Promise_map_Functor_x28Promisex20x24ex29($54 => Util_Prompting_orIfEmpty({a1: $5.a5}, Data_String_trim($54)), csegen_406()(), $50, $51), $6, $7);
11085
11159
  }
11086
11160
  }
11087
11161
 
11088
- /* Commands.PullRequest.9823:1725:forkedReviews */
11089
- function Commands_PullRequest_n__9823_1725_forkedReviews($0, $1, $2, $3) {
11162
+ /* Commands.PullRequest.9829:1725:forkedReviews */
11163
+ function Commands_PullRequest_n__9829_1725_forkedReviews($0, $1, $2, $3) {
11090
11164
  return FFI_Concurrency_fork(csegen_74()(), ('reviews --json '+Prelude_Show_show_Show_Integer($3.a1)));
11091
11165
  }
11092
11166
 
11093
- /* Commands.PullRequest.9246:1180:filterString */
11094
- function Commands_PullRequest_n__9246_1180_filterString($0, $1, $2, $3, $4) {
11167
+ /* Commands.PullRequest.9252:1180:filterString */
11168
+ function Commands_PullRequest_n__9252_1180_filterString($0, $1, $2, $3, $4) {
11095
11169
  switch($4.h) {
11096
11170
  case 0: /* nothing */ return 'none';
11097
11171
  case undefined: /* just */ {
@@ -11103,13 +11177,13 @@ function Commands_PullRequest_n__9246_1180_filterString($0, $1, $2, $3, $4) {
11103
11177
  }
11104
11178
  }
11105
11179
 
11106
- /* Commands.PullRequest.10061:1994:csv */
11107
- function Commands_PullRequest_n__10061_1994_csv($0, $1, $2, $3, $4, $5, $6) {
11180
+ /* Commands.PullRequest.10067:1994:csv */
11181
+ function Commands_PullRequest_n__10067_1994_csv($0, $1, $2, $3, $4, $5, $6) {
11108
11182
  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)));
11109
11183
  }
11110
11184
 
11111
- /* Commands.PullRequest.11189:3084:createPR */
11112
- function Commands_PullRequest_n__11189_3084_createPR($0, $1, $2, $3, $4, $5, $6, $7) {
11185
+ /* Commands.PullRequest.11195:3084:createPR */
11186
+ function Commands_PullRequest_n__11195_3084_createPR($0, $1, $2, $3, $4, $5, $6, $7) {
11113
11187
  const $3b = $3c => $3d => $3e => {
11114
11188
  const $4c = $4d => $4e => $4f => {
11115
11189
  switch($4d) {
@@ -11138,11 +11212,11 @@ function Commands_PullRequest_n__11189_3084_createPR($0, $1, $2, $3, $4, $5, $6,
11138
11212
  let $153;
11139
11213
  switch($154.h) {
11140
11214
  case 0: /* nothing */ {
11141
- $153 = Util_Prompting_inlineDescription(csegen_74()(), Commands_PullRequest_n__11189_3086_inlineDescriptionPrompt($0, $1, $2, $3, $4, $5), $10b.a2);
11215
+ $153 = Util_Prompting_inlineDescription(csegen_74()(), Commands_PullRequest_n__11195_3086_inlineDescriptionPrompt($0, $1, $2, $3, $4, $5), $10b.a2);
11142
11216
  break;
11143
11217
  }
11144
11218
  case undefined: /* just */ {
11145
- $153 = $164 => $165 => Data_Promise_map_Functor_x28Promisex20x24ex29(csegen_705(), Util_Prompting_editorDescription(csegen_74()(), $154.a1, {a1: templateFilePath}, $10b.a2), $164, $165);
11219
+ $153 = $164 => $165 => Data_Promise_map_Functor_x28Promisex20x24ex29(csegen_710(), Util_Prompting_editorDescription(csegen_74()(), $154.a1, {a1: templateFilePath}, $10b.a2), $164, $165);
11146
11220
  break;
11147
11221
  }
11148
11222
  }
@@ -11158,7 +11232,7 @@ function Commands_PullRequest_n__11189_3084_createPR($0, $1, $2, $3, $4, $5, $6,
11158
11232
  };
11159
11233
  return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(Commands_PullRequest_getTitleAndBodyPrefix($5, $1, $2), $10a, $102, $103);
11160
11234
  };
11161
- return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($f6 => $f7 => Commands_PullRequest_n__11189_3085_getBaseBranch($0, $1, $2, $3, $4, $5, $f6, $f7), $101, $f2, $f3);
11235
+ return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($f6 => $f7 => Commands_PullRequest_n__11195_3085_getBaseBranch($0, $1, $2, $3, $4, $5, $f6, $f7), $101, $f2, $f3);
11162
11236
  };
11163
11237
  return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($d5 => $d6 => $d7 => Data_Promise_liftIO_HasIO_x28Promisex20x24ex29($da => Prelude_IO_prim__putStr((Prelude_Types_foldMap_Foldable_List(csegen_51()(), $e3 => $e3, {a1: 'Creating a new PR for the current branch (', a2: {a1: $2, a2: {a1: ').', a2: {h: 0}}}})+'\n'), $da), $d5, $d6, $d7), $f0, $d1, $d2);
11164
11238
  };
@@ -11167,32 +11241,32 @@ function Commands_PullRequest_n__11189_3084_createPR($0, $1, $2, $3, $4, $5, $6,
11167
11241
  case 0: return Data_Promise_reject('Not creating a PR (for now)...', $60, $61);
11168
11242
  }
11169
11243
  };
11170
- return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($53 => $54 => Commands_PullRequest_n__11189_3082_continueGivenStagedChanges($0, $1, $2, $3, $4, $5, $53, $54), $5e, $4e, $4f);
11244
+ return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($53 => $54 => Commands_PullRequest_n__11195_3082_continueGivenStagedChanges($0, $1, $2, $3, $4, $5, $53, $54), $5e, $4e, $4f);
11171
11245
  }
11172
11246
  case 0: return Data_Promise_reject('Not creating a PR (for now)...', $4e, $4f);
11173
11247
  }
11174
11248
  };
11175
- return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($41 => $42 => Commands_PullRequest_n__11189_3083_continueGivenUncommittedChanges($0, $1, $2, $3, $4, $5, $41, $42), $4c, $3d, $3e);
11249
+ return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($41 => $42 => Commands_PullRequest_n__11195_3083_continueGivenUncommittedChanges($0, $1, $2, $3, $4, $5, $41, $42), $4c, $3d, $3e);
11176
11250
  };
11177
11251
  return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($a => $b => Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($e => $f => FFI_Git_remoteTrackingBranch($0, $e, $f), $15 => Util_whenNothing(csegen_66()(), $15, $1c => $1d => Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($20 => $21 => $22 => Data_Promise_liftIO_HasIO_x28Promisex20x24ex29($25 => Prelude_IO_prim__putStr('Creating a new remote branch...\n', $25), $20, $21, $22), $2d => $2e => $2f => FFI_Git_pushNewBranch($0, $5.a4, $2, $2e, $2f), $1c, $1d)), $a, $b), $3b, $6, $7);
11178
11252
  }
11179
11253
 
11180
- /* Commands.PullRequest.11189:3083:continueGivenUncommittedChanges */
11181
- function Commands_PullRequest_n__11189_3083_continueGivenUncommittedChanges($0, $1, $2, $3, $4, $5, $6, $7) {
11254
+ /* Commands.PullRequest.11195:3083:continueGivenUncommittedChanges */
11255
+ function Commands_PullRequest_n__11195_3083_continueGivenUncommittedChanges($0, $1, $2, $3, $4, $5, $6, $7) {
11182
11256
  const $10 = $11 => $12 => $13 => {
11183
11257
  switch($11.h) {
11184
- case undefined: /* just */ return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($17 => $18 => $19 => Data_Promise_liftIO_HasIO_x28Promisex20x24ex29($1c => Prelude_IO_prim__putStr('The following files have uncommitted changes:\n', $1c), $17, $18, $19), $24 => $25 => $26 => Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($29 => $2a => $2b => Data_Promise_liftIO_HasIO_x28Promisex20x24ex29($2e => Prelude_IO_prim__putStr(($11.a1+'\n'), $2e), $29, $2a, $2b), csegen_711(), $25, $26), $12, $13);
11258
+ case undefined: /* just */ return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($17 => $18 => $19 => Data_Promise_liftIO_HasIO_x28Promisex20x24ex29($1c => Prelude_IO_prim__putStr('The following files have uncommitted changes:\n', $1c), $17, $18, $19), $24 => $25 => $26 => Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($29 => $2a => $2b => Data_Promise_liftIO_HasIO_x28Promisex20x24ex29($2e => Prelude_IO_prim__putStr(($11.a1+'\n'), $2e), $29, $2a, $2b), csegen_716(), $25, $26), $12, $13);
11185
11259
  case 0: /* nothing */ return Data_Promise_pure_Applicative_x28Promisex20x24ex29(1, $12, $13);
11186
11260
  }
11187
11261
  };
11188
11262
  return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($a => $b => FFI_Git_uncommittedChanges($0, $a, $b), $10, $6, $7);
11189
11263
  }
11190
11264
 
11191
- /* Commands.PullRequest.11189:3082:continueGivenStagedChanges */
11192
- function Commands_PullRequest_n__11189_3082_continueGivenStagedChanges($0, $1, $2, $3, $4, $5, $6, $7) {
11265
+ /* Commands.PullRequest.11195:3082:continueGivenStagedChanges */
11266
+ function Commands_PullRequest_n__11195_3082_continueGivenStagedChanges($0, $1, $2, $3, $4, $5, $6, $7) {
11193
11267
  const $10 = $11 => $12 => $13 => {
11194
11268
  switch($11.h) {
11195
- case undefined: /* just */ return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($17 => $18 => $19 => Data_Promise_liftIO_HasIO_x28Promisex20x24ex29($1c => Prelude_IO_prim__putStr('The following files have staged but uncommitted changes:\n', $1c), $17, $18, $19), $24 => $25 => $26 => Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($29 => $2a => $2b => Data_Promise_liftIO_HasIO_x28Promisex20x24ex29($2e => Prelude_IO_prim__putStr(($11.a1+'\n'), $2e), $29, $2a, $2b), csegen_711(), $25, $26), $12, $13);
11269
+ case undefined: /* just */ return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($17 => $18 => $19 => Data_Promise_liftIO_HasIO_x28Promisex20x24ex29($1c => Prelude_IO_prim__putStr('The following files have staged but uncommitted changes:\n', $1c), $17, $18, $19), $24 => $25 => $26 => Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($29 => $2a => $2b => Data_Promise_liftIO_HasIO_x28Promisex20x24ex29($2e => Prelude_IO_prim__putStr(($11.a1+'\n'), $2e), $29, $2a, $2b), csegen_716(), $25, $26), $12, $13);
11196
11270
  case 0: /* nothing */ return Data_Promise_pure_Applicative_x28Promisex20x24ex29(1, $12, $13);
11197
11271
  }
11198
11272
  };
@@ -11201,12 +11275,12 @@ function Commands_PullRequest_n__11189_3082_continueGivenStagedChanges($0, $1, $
11201
11275
 
11202
11276
  /* Commands.PullRequest.(.allReviewers) : PRHistory -> (List String, List String) */
11203
11277
  function Commands_PullRequest_rf__allReviewers($0) {
11204
- return Prelude_Interfaces_mapHom(csegen_604(), $6 => Prelude_Types_join_Monad_List(Prelude_Types_List_mapAppend({h: 0}, $c => $c.a7, $6)))($0);
11278
+ return Prelude_Interfaces_mapHom(csegen_608(), $6 => Prelude_Types_join_Monad_List(Prelude_Types_List_mapAppend({h: 0}, $c => $c.a7, $6)))($0);
11205
11279
  }
11206
11280
 
11207
11281
  /* Commands.PullRequest.reviewsForPrs : Config => Octokit => List PullRequest -> Promise' (List Review) */
11208
11282
  function Commands_PullRequest_reviewsForPrs($0, $1, $2, $3, $4) {
11209
- return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(Prelude_Basics_flip(csegen_67()(), csegen_631(), Prelude_Types_traverse_Traversable_List(csegen_66()(), $13 => Commands_PullRequest_n__9823_1725_forkedReviews($0, $1, $2, $13), $2)), reviewsJson => $1b => $1c => Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($1f => Data_Promise_either(Prelude_Types_traverse_Traversable_List(csegen_222(), $26 => Language_JSON_Accessors_array($29 => Data_Review_parseReview($29), $26), reviewsJson), $1f), reviews => $30 => $31 => Data_Promise_pure_Applicative_x28Promisex20x24ex29(Prelude_Types_join_Monad_List(reviews), $30, $31), $1b, $1c), $3, $4);
11283
+ return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(Prelude_Basics_flip(csegen_67()(), csegen_636(), Prelude_Types_traverse_Traversable_List(csegen_66()(), $13 => Commands_PullRequest_n__9829_1725_forkedReviews($0, $1, $2, $13), $2)), reviewsJson => $1b => $1c => Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($1f => Data_Promise_either(Prelude_Types_traverse_Traversable_List(csegen_222(), $26 => Language_JSON_Accessors_array($29 => Data_Review_parseReview($29), $26), reviewsJson), $1f), reviews => $30 => $31 => Data_Promise_pure_Applicative_x28Promisex20x24ex29(Prelude_Types_join_Monad_List(reviews), $30, $31), $1b, $1c), $3, $4);
11210
11284
  }
11211
11285
 
11212
11286
  /* Commands.PullRequest.reviewsByUser : Config => Octokit => String -> List PullRequest -> Promise' (List Review) */
@@ -11293,8 +11367,8 @@ function Commands_PullRequest_requestReviewers($0, $1, $2, $3, $4, $5, $6, $7) {
11293
11367
  return $7f => {
11294
11368
  switch($0.a8) {
11295
11369
  case 0: return Data_Promise_pure_Applicative_x28Promisex20x24ex29(undefined, $7d, $7f);
11296
- case 2: return FFI_GitHub_createComment($1, $0.a2, $0.a3, $2.a1, Commands_PullRequest_n__10061_1995_mentionPrComment($1, $5, $4, $3, $2, $0, chosenUser.a1), $7d, $7f);
11297
- case 1: return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(FFI_GitHub_getUser($1, chosenUser.a1), user => $9f => $a0 => FFI_GitHub_createComment($1, $0.a2, $0.a3, $2.a1, Commands_PullRequest_n__10061_1996_namePrComment($1, $5, $4, $3, $2, $0, user), $9f, $a0), $7d, $7f);
11370
+ case 2: return FFI_GitHub_createComment($1, $0.a2, $0.a3, $2.a1, Commands_PullRequest_n__10067_1995_mentionPrComment($1, $5, $4, $3, $2, $0, chosenUser.a1), $7d, $7f);
11371
+ case 1: return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(FFI_GitHub_getUser($1, chosenUser.a1), user => $9f => $a0 => FFI_GitHub_createComment($1, $0.a2, $0.a3, $2.a1, Commands_PullRequest_n__10067_1996_namePrComment($1, $5, $4, $3, $2, $0, user), $9f, $a0), $7d, $7f);
11298
11372
  }
11299
11373
  };
11300
11374
  }
@@ -11318,11 +11392,11 @@ function Commands_PullRequest_requestReviewers($0, $1, $2, $3, $4, $5, $6, $7) {
11318
11392
  let $bf;
11319
11393
  switch($c0) {
11320
11394
  case 1: {
11321
- $bf = () => $c5 => $c6 => $c7 => Data_Promise_liftIO_HasIO_x28Promisex20x24ex29($ca => 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_51()(), $e8 => $e8, {a1: 'Requested review from ', a2: {a1: Commands_PullRequest_n__10061_1998_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_51()(), $101 => $101, {a1: 'for the current branch (', a2: {a1: Data_PullRequest_rf__webURI($0, $2), a2: {a1: ').', a2: {h: 0}}}})), a2: {h: 0}}}}}))+'\n'), $ca), $c5, $c6, $c7);
11395
+ $bf = () => $c5 => $c6 => $c7 => Data_Promise_liftIO_HasIO_x28Promisex20x24ex29($ca => 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_51()(), $e8 => $e8, {a1: 'Requested review from ', a2: {a1: Commands_PullRequest_n__10067_1998_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_51()(), $101 => $101, {a1: 'for the current branch (', a2: {a1: Data_PullRequest_rf__webURI($0, $2), a2: {a1: ').', a2: {h: 0}}}})), a2: {h: 0}}}}}))+'\n'), $ca), $c5, $c6, $c7);
11322
11396
  break;
11323
11397
  }
11324
11398
  case 0: {
11325
- $bf = () => $112 => $113 => $114 => Data_Promise_liftIO_HasIO_x28Promisex20x24ex29($117 => 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_51()(), $128 => $128, {a1: 'Requested review from ', a2: {a1: Commands_PullRequest_n__10061_1999_userNotice($1, $5, $4, $3, $2, $0, chosenUser), a2: {a1: Commands_PullRequest_n__10061_1998_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_51()(), $14b => $14b, {a1: 'for the current branch (', a2: {a1: Data_PullRequest_rf__webURI($0, $2), a2: {a1: ').', a2: {h: 0}}}})), a2: {h: 0}}}))+'\n'), $117), $112, $113, $114);
11399
+ $bf = () => $112 => $113 => $114 => Data_Promise_liftIO_HasIO_x28Promisex20x24ex29($117 => 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_51()(), $128 => $128, {a1: 'Requested review from ', a2: {a1: Commands_PullRequest_n__10067_1999_userNotice($1, $5, $4, $3, $2, $0, chosenUser), a2: {a1: Commands_PullRequest_n__10067_1998_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_51()(), $14b => $14b, {a1: 'for the current branch (', a2: {a1: Data_PullRequest_rf__webURI($0, $2), a2: {a1: ').', a2: {h: 0}}}})), a2: {h: 0}}}))+'\n'), $117), $112, $113, $114);
11326
11400
  break;
11327
11401
  }
11328
11402
  }
@@ -11387,8 +11461,8 @@ function Commands_PullRequest_identifyOrCreatePR($0, $1, $2, $3, $4, $5, $6, $7)
11387
11461
  return $21 => {
11388
11462
  const $2a = $2b => $2c => $2d => {
11389
11463
  switch($2b) {
11390
- case 1: return Data_Promise_map_Functor_x28Promisex20x24ex29($31 => ({h: 0 /* Actual */, a1: 1, a2: $31}), $35 => $36 => Commands_PullRequest_n__11189_3084_createPR($1, $2, $5, $4, $3, $0, $35, $36), $2c, $2d);
11391
- case 0: return Data_Promise_pure_Applicative_x28Promisex20x24ex29({h: 1 /* Hypothetical */, a1: Commands_PullRequest_n__11189_3087_prCreationUrl($1, $2, $5, $4, $3, $0)}, $2c, $2d);
11464
+ case 1: return Data_Promise_map_Functor_x28Promisex20x24ex29($31 => ({h: 0 /* Actual */, a1: 1, a2: $31}), $35 => $36 => Commands_PullRequest_n__11195_3084_createPR($1, $2, $5, $4, $3, $0, $35, $36), $2c, $2d);
11465
+ case 0: return Data_Promise_pure_Applicative_x28Promisex20x24ex29({h: 1 /* Hypothetical */, a1: Commands_PullRequest_n__11195_3087_prCreationUrl($1, $2, $5, $4, $3, $0)}, $2c, $2d);
11392
11466
  }
11393
11467
  };
11394
11468
  return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(System_File_Meta_isTTY(csegen_74()(), System_File_Virtual_stdout()), $2a, $13, $21);
@@ -11402,7 +11476,7 @@ function Commands_PullRequest_identifyOrCreatePR($0, $1, $2, $3, $4, $5, $6, $7)
11402
11476
 
11403
11477
  /* Commands.PullRequest.githubTitleAndBodyPrefix : Config => Octokit => String -> Promise' (String, String) */
11404
11478
  function Commands_PullRequest_githubTitleAndBodyPrefix($0, $1, $2) {
11405
- return $3 => Commands_PullRequest_case__githubTitleAndBodyPrefix_2919($1, $2, $0, Commands_PullRequest_n__10955_2842_issueNumber($1, $2, $0), $3);
11479
+ return $3 => Commands_PullRequest_case__githubTitleAndBodyPrefix_2919($1, $2, $0, Commands_PullRequest_n__10961_2842_issueNumber($1, $2, $0), $3);
11406
11480
  }
11407
11481
 
11408
11482
  /* Commands.PullRequest.getTitleAndBodyPrefix : Config => Octokit => String -> Promise' (String, String) */
@@ -11416,7 +11490,7 @@ function Commands_PullRequest_getTitleAndBodyPrefix($0, $1, $2) {
11416
11490
 
11417
11491
  /* Commands.PullRequest.forkedPRs : Maybe GitHubPRState -> Nat -> Nat -> Nat -> () -> Promise' Future */
11418
11492
  function Commands_PullRequest_forkedPRs($0, $1, $2, $3, $4) {
11419
- return FFI_Concurrency_fork(csegen_74()(), Prelude_Types_foldMap_Foldable_List(csegen_51()(), $f => $f, {a1: 'pulls --json ', a2: {a1: Commands_PullRequest_n__9246_1180_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}}}}}}}));
11493
+ return FFI_Concurrency_fork(csegen_74()(), Prelude_Types_foldMap_Foldable_List(csegen_51()(), $f => $f, {a1: 'pulls --json ', a2: {a1: Commands_PullRequest_n__9252_1180_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}}}}}}}));
11420
11494
  }
11421
11495
 
11422
11496
  /* Commands.PullRequest.empty : PRHistory */
@@ -11538,7 +11612,7 @@ function Util_Github_n__2629_823_go($0, $1) {
11538
11612
 
11539
11613
  /* Util.Github.parseGithubIssueNumber : String -> Maybe String */
11540
11614
  function Util_Github_parseGithubIssueNumber($0) {
11541
- return Prelude_Types_map_Functor_Maybe(csegen_749(), Util_Github_n__2629_825_guardSuccess(Prelude_Types_foldl_Foldable_List($9 => $a => Util_Github_n__2629_823_go($9, $a), {a1: {h: 0 /* 2629:821:Start */}, a2: {h: 0}}, Prelude_Types_fastUnpack($0))));
11615
+ return Prelude_Types_map_Functor_Maybe(csegen_754(), Util_Github_n__2629_825_guardSuccess(Prelude_Types_foldl_Foldable_List($9 => $a => Util_Github_n__2629_823_go($9, $a), {a1: {h: 0 /* 2629:821:Start */}, a2: {h: 0}}, Prelude_Types_fastUnpack($0))));
11542
11616
  }
11543
11617
 
11544
11618
  /* Util.Jira.2629:820:startOver */
@@ -11598,30 +11672,30 @@ function Util_Jira_n__2629_818_go($0, $1) {
11598
11672
 
11599
11673
  /* Util.Jira.parseJiraSlug : String -> Maybe String */
11600
11674
  function Util_Jira_parseJiraSlug($0) {
11601
- return Prelude_Types_map_Functor_Maybe(csegen_749(), Util_Jira_n__2629_819_guardSuccess(Prelude_Types_foldl_Foldable_List($9 => $a => Util_Jira_n__2629_818_go($9, $a), Util_Jira_n__2629_820_startOver(), Prelude_Types_fastUnpack($0))));
11675
+ return Prelude_Types_map_Functor_Maybe(csegen_754(), Util_Jira_n__2629_819_guardSuccess(Prelude_Types_foldl_Foldable_List($9 => $a => Util_Jira_n__2629_818_go($9, $a), Util_Jira_n__2629_820_startOver(), Prelude_Types_fastUnpack($0))));
11602
11676
  }
11603
11677
 
11604
11678
  /* Data.Pagination.with block in metaPages' */
11605
- function Data_Pagination_with__metaPagesx27_7451($0, $1, $2, $3, $4, $5, $6) {
11679
+ function Data_Pagination_with__metaPagesx27_7597($0, $1, $2, $3, $4, $5, $6) {
11606
11680
  const $7 = $8 => Data_Pagination_divNatNZLemma($0, $1, $6);
11607
11681
  return Data_Pagination_pagesHelper(0n, $0, $3, $7(undefined), $5);
11608
11682
  }
11609
11683
 
11610
11684
  /* Data.Pagination.with block in with block in divNatNZLemma */
11611
- function Data_Pagination_with__withx20blockx20inx20divNatNZLemma_7392($0, $1, $2, $3, $4, $5) {
11685
+ function Data_Pagination_with__withx20blockx20inx20divNatNZLemma_7538($0, $1, $2, $3, $4, $5) {
11612
11686
  return Prelude_Uninhabited_void$();
11613
11687
  }
11614
11688
 
11615
11689
  /* Data.Pagination.with block in divNatNZLemma */
11616
- function Data_Pagination_with__divNatNZLemma_7374($0, $1, $2, $3, $4, $5) {
11690
+ function Data_Pagination_with__divNatNZLemma_7520($0, $1, $2, $3, $4, $5) {
11617
11691
  switch($2) {
11618
11692
  case 0: return 1n;
11619
- case 1: return Data_Pagination_with__withx20blockx20inx20divNatNZLemma_7392($1, $0, $5, $c => Data_Nat_LTEImpliesNotGT($5, $c), $3, undefined);
11693
+ case 1: return Data_Pagination_with__withx20blockx20inx20divNatNZLemma_7538($1, $0, $5, $c => Data_Nat_LTEImpliesNotGT($5, $c), $3, undefined);
11620
11694
  }
11621
11695
  }
11622
11696
 
11623
11697
  /* Data.Pagination.with block in pagesHelper */
11624
- function Data_Pagination_with__pagesHelper_7234($0, $1, $2, $3, $4, $5) {
11698
+ function Data_Pagination_with__pagesHelper_7380($0, $1, $2, $3, $4, $5) {
11625
11699
  switch($2.h) {
11626
11700
  case 0: /* Yes */ {
11627
11701
  const $7 = Data_Pagination_lemma($0, $1, $2.a1);
@@ -11632,12 +11706,12 @@ function Data_Pagination_with__pagesHelper_7234($0, $1, $2, $3, $4, $5) {
11632
11706
  }
11633
11707
 
11634
11708
  /* Data.Pagination.with block in nonTerminalPage */
11635
- function Data_Pagination_with__nonTerminalPage_7213($0, $1, $2, $3, $4, $5, $6, $7) {
11709
+ function Data_Pagination_with__nonTerminalPage_7359($0, $1, $2, $3, $4, $5, $6, $7) {
11636
11710
  return {h: 0 /* NonTerminal */, a1: $7, a2: $1, a3: $0, a4: $5, a5: $6, a6: undefined, a7: Data_Pagination_pagesHelper(($7+1n), $0, $1, $6, $5)};
11637
11711
  }
11638
11712
 
11639
11713
  /* Data.Pagination.with block in lemma */
11640
- function Data_Pagination_with__lemma_7116($0, $1, $2, $3, $4) {
11714
+ function Data_Pagination_with__lemma_7262($0, $1, $2, $3, $4) {
11641
11715
  return {a1: ($3.a1+1n), a2: {a1: undefined, a2: 1n}};
11642
11716
  }
11643
11717
 
@@ -11686,21 +11760,21 @@ function Data_Pagination_traversex27($0, $1, $2) {
11686
11760
  /* Data.Pagination.pagesHelper : (page : Nat) -> (remainingItems : Nat) -> (perPage : Nat) -> GT perPage 0 =>
11687
11761
  GT remainingItems 0 => PaginationShape remainingItems perPage page */
11688
11762
  function Data_Pagination_pagesHelper($0, $1, $2, $3, $4) {
11689
- return Data_Pagination_with__pagesHelper_7234($2, $1, Data_Nat_isLT($2, $1), $3, $4, $0);
11763
+ return Data_Pagination_with__pagesHelper_7380($2, $1, Data_Nat_isLT($2, $1), $3, $4, $0);
11690
11764
  }
11691
11765
 
11692
11766
  /* Data.Pagination.nonTerminalPage : (page : Nat) -> (remainingItems : Nat) -> (perPage : Nat) ->
11693
11767
  {auto 0 _ : remainder + perPage = remainingItems} -> GT perPage 0 =>
11694
11768
  GT remainder 0 => PaginationShape remainingItems perPage page */
11695
11769
  function Data_Pagination_nonTerminalPage($0, $1, $2, $3, $4, $5) {
11696
- return Data_Pagination_with__nonTerminalPage_7213($0, $3, $2, undefined, undefined, $5, $4, $1);
11770
+ return Data_Pagination_with__nonTerminalPage_7359($0, $3, $2, undefined, undefined, $5, $4, $1);
11697
11771
  }
11698
11772
 
11699
11773
  /* Data.Pagination.metaPages' : (items : Nat) -> (pages : Nat) -> GT items 0 => {auto 0 pagesOk : GT pages 0} ->
11700
11774
  LTE pages items =>
11701
11775
  PaginationShape items (divNatNZ items pages (gtIsNonZero pagesOk)) 0 */
11702
11776
  function Data_Pagination_metaPagesx27($0, $1, $2, $3) {
11703
- return Data_Pagination_with__metaPagesx27_7451($0, $1, undefined, Data_Nat_divNatNZ($0, $1), undefined, $2, $3);
11777
+ return Data_Pagination_with__metaPagesx27_7597($0, $1, undefined, Data_Nat_divNatNZ($0, $1), undefined, $2, $3);
11704
11778
  }
11705
11779
 
11706
11780
  /* Data.Pagination.metaPages : (items : Nat) -> (perPage : Nat) -> GT items 0 => GT perPage 0 =>
@@ -11724,7 +11798,7 @@ function Data_Pagination_lemma($0, $1, $2) {
11724
11798
  case 0n: _crashExp('Nat case not covered');
11725
11799
  default: {
11726
11800
  const $8 = ($2-1n);
11727
- return Data_Pagination_with__lemma_7116($0, $4, $8, Data_Pagination_lemmax27($0, $4, $8), $1);
11801
+ return Data_Pagination_with__lemma_7262($0, $4, $8, Data_Pagination_lemmax27($0, $4, $8), $1);
11728
11802
  }
11729
11803
  }
11730
11804
  }
@@ -11746,7 +11820,7 @@ function Data_Pagination_divNatNZLemma($0, $1, $2) {
11746
11820
  case 0n: _crashExp('Nat case not covered');
11747
11821
  default: {
11748
11822
  const $a = ($1-1n);
11749
- return Data_Pagination_with__divNatNZLemma_7374($a, $6, Data_Nat_lte(($6+1n), $a), undefined, undefined, $2);
11823
+ return Data_Pagination_with__divNatNZLemma_7520($a, $6, Data_Nat_lte(($6+1n), $a), undefined, undefined, $2);
11750
11824
  }
11751
11825
  }
11752
11826
  }
@@ -11867,14 +11941,14 @@ function Data_List_DeleteBy_deleteByx27($0, $1, $2) {
11867
11941
  }
11868
11942
  }
11869
11943
 
11870
- /* Commands.Quick.5804:5628:issuePrompt */
11871
- function Commands_Quick_n__5804_5628_issuePrompt($0, $1, $2, $3) {
11944
+ /* Commands.Quick.5813:5631:issuePrompt */
11945
+ function Commands_Quick_n__5813_5631_issuePrompt($0, $1, $2, $3, $4) {
11872
11946
  return 'What would you like the issue description to be (two blank lines to finish)?';
11873
11947
  }
11874
11948
 
11875
- /* Commands.Quick.5804:5627:branchPrefix */
11876
- function Commands_Quick_n__5804_5627_branchPrefix($0, $1, $2, $3) {
11877
- return Data_String_toLower(Commands_Quick_show_Show_IssueCategory($2));
11949
+ /* Commands.Quick.5813:5630:branchPrefix */
11950
+ function Commands_Quick_n__5813_5630_branchPrefix($0, $1, $2, $3, $4) {
11951
+ return Data_String_toLower(Commands_Quick_show_Show_IssueCategory($3));
11878
11952
  }
11879
11953
 
11880
11954
  /* Commands.Quick.show */
@@ -11885,40 +11959,43 @@ function Commands_Quick_show_Show_IssueCategory($0) {
11885
11959
  }
11886
11960
  }
11887
11961
 
11888
- /* Commands.Quick.quickStartNewWork : Config => Git => Octokit => IssueCategory -> Promise' () */
11889
- function Commands_Quick_quickStartNewWork($0, $1, $2, $3, $4, $5) {
11890
- const $14 = $15 => $16 => $17 => {
11891
- const $1c = $1d => $1e => $1f => {
11892
- const $2e = $2f => $30 => $31 => {
11893
- const $35 = issueTitle => $36 => $37 => {
11894
- const $3a = Data_Config_rf__editor($0);
11895
- let $39;
11896
- switch($3a.h) {
11897
- case 0: /* nothing */ {
11898
- $39 = Util_Prompting_inlineDescription(csegen_74()(), Commands_Quick_n__5804_5628_issuePrompt($1, $2, $3, $0), '');
11899
- break;
11900
- }
11901
- case undefined: /* just */ {
11902
- $39 = $48 => $49 => Data_Promise_map_Functor_x28Promisex20x24ex29(csegen_705(), Util_Prompting_editorDescription(csegen_74()(), $3a.a1, {h: 0}, ''), $48, $49);
11903
- break;
11904
- }
11962
+ /* Commands.Quick.quickStartNewWork : Config => Git => Octokit => IssueCategory -> Maybe String -> Promise' () */
11963
+ function Commands_Quick_quickStartNewWork($0, $1, $2, $3, $4, $5, $6) {
11964
+ const $15 = $16 => $17 => $18 => {
11965
+ const $1d = $1e => $1f => $20 => {
11966
+ const $22 = $23 => $24 => {
11967
+ switch($4.h) {
11968
+ case undefined: /* just */ return Data_Promise_pure_Applicative_x28Promisex20x24ex29($4.a1, $23, $24);
11969
+ case 0: /* nothing */ return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($2c => $2d => $2e => Data_Promise_liftIO_HasIO_x28Promisex20x24ex29($31 => Prelude_IO_prim__putStr('What would you like the issue title to be?\n', $31), $2c, $2d, $2e), $39 => csegen_766(), $23, $24);
11970
+ }
11971
+ };
11972
+ const $3d = issueTitle => $3e => $3f => {
11973
+ const $42 = Data_Config_rf__editor($0);
11974
+ let $41;
11975
+ switch($42.h) {
11976
+ case 0: /* nothing */ {
11977
+ $41 = Util_Prompting_inlineDescription(csegen_74()(), Commands_Quick_n__5813_5631_issuePrompt($1, $2, $4, $3, $0), '');
11978
+ break;
11905
11979
  }
11906
- const $57 = issueBody => $58 => $59 => {
11907
- const $64 = issue => {
11908
- const $65 = Prelude_Types_foldMap_Foldable_List(csegen_51()(), $6b => $6b, {a1: Commands_Quick_n__5804_5627_branchPrefix($1, $2, $3, $0), a2: {a1: '/', a2: {a1: Prelude_Show_show_Show_Integer(issue.a1), a2: {a1: '/', a2: {h: 0}}}}});
11909
- return $7d => $7e => Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($81 => $82 => $83 => Data_Promise_liftIO_HasIO_x28Promisex20x24ex29($86 => Prelude_IO_prim__putStr('What would you like the branch to be named?\n', $86), $81, $82, $83), $8e => $8f => $90 => Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($93 => $94 => $95 => Data_Promise_liftIO_HasIO_x28Promisex20x24ex29($98 => Prelude_IO_prim__putStr($65, $98), $93, $94, $95), $a0 => $a1 => $a2 => Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(csegen_761(), branchSlug => FFI_Git_checkoutBranch($1, 1, Prelude_Types_foldMap_Foldable_List(csegen_51()(), $b0 => $b0, {a1: $65, a2: {a1: branchSlug, a2: {h: 0}}})), $a1, $a2), $8f, $90), $7d, $7e);
11910
- };
11911
- return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(FFI_GitHub_createIssue($2, $0.a2, $0.a3, issueTitle, issueBody), $64, $58, $59);
11980
+ case undefined: /* just */ {
11981
+ $41 = $51 => $52 => Data_Promise_map_Functor_x28Promisex20x24ex29(csegen_710(), Util_Prompting_editorDescription(csegen_74()(), $42.a1, {h: 0}, ''), $51, $52);
11982
+ break;
11983
+ }
11984
+ }
11985
+ const $60 = issueBody => $61 => $62 => {
11986
+ const $6d = issue => {
11987
+ const $6e = Prelude_Types_foldMap_Foldable_List(csegen_51()(), $74 => $74, {a1: Commands_Quick_n__5813_5630_branchPrefix($1, $2, $4, $3, $0), a2: {a1: '/', a2: {a1: Prelude_Show_show_Show_Integer(issue.a1), a2: {a1: '/', a2: {h: 0}}}}});
11988
+ return $87 => $88 => Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($8b => $8c => $8d => Data_Promise_liftIO_HasIO_x28Promisex20x24ex29($90 => Prelude_IO_prim__putStr('What would you like the branch to be named?\n', $90), $8b, $8c, $8d), $98 => $99 => $9a => Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($9d => $9e => $9f => Data_Promise_liftIO_HasIO_x28Promisex20x24ex29($a2 => Prelude_IO_prim__putStr($6e, $a2), $9d, $9e, $9f), $aa => $ab => $ac => Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(csegen_766(), branchSlug => FFI_Git_checkoutBranch($1, 1, Prelude_Types_foldMap_Foldable_List(csegen_51()(), $ba => $ba, {a1: $6e, a2: {a1: branchSlug, a2: {h: 0}}})), $ab, $ac), $99, $9a), $87, $88);
11912
11989
  };
11913
- return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($39, $57, $36, $37);
11990
+ return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(FFI_GitHub_createIssue($2, $0.a2, $0.a3, issueTitle, issueBody), $6d, $61, $62);
11914
11991
  };
11915
- return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(csegen_761(), $35, $30, $31);
11992
+ return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($41, $60, $3e, $3f);
11916
11993
  };
11917
- return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($22 => $23 => $24 => Data_Promise_liftIO_HasIO_x28Promisex20x24ex29($27 => Prelude_IO_prim__putStr('What would you like the issue title to be?\n', $27), $22, $23, $24), $2e, $1e, $1f);
11994
+ return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($22, $3d, $1f, $20);
11918
11995
  };
11919
- return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(csegen_404()(), $1c, $16, $17);
11996
+ return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(csegen_404()(), $1d, $17, $18);
11920
11997
  };
11921
- return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($8 => $9 => $a => Data_Promise_liftIO_HasIO_x28Promisex20x24ex29($d => Prelude_IO_prim__putStr('Creating a new GitHub issue and branch.\n', $d), $8, $9, $a), $14, $4, $5);
11998
+ return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($9 => $a => $b => Data_Promise_liftIO_HasIO_x28Promisex20x24ex29($e => Prelude_IO_prim__putStr('Creating a new GitHub issue and branch.\n', $e), $9, $a, $b), $15, $5, $6);
11922
11999
  }
11923
12000
 
11924
12001
  /* Commands.Label.unslugifyLabel : List String -> String -> String */
@@ -11937,7 +12014,7 @@ function Commands_Label_addLabels($0, $1, $2, $3, $4, $5) {
11937
12014
 
11938
12015
  /* Commands.Graph.7730:7016:pendingDot */
11939
12016
  function Commands_Graph_n__7730_7016_pendingDot($0, $1, $2, $3, $4, $5, $6, $7) {
11940
- return Theme_theme($7, csegen_691(), csegen_689(), 6)(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('\u{b7}'));
12017
+ return Theme_theme($7, csegen_696(), csegen_694(), 6)(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('\u{b7}'));
11941
12018
  }
11942
12019
 
11943
12020
  /* Commands.Graph.7730:7015:note */
@@ -11947,7 +12024,7 @@ function Commands_Graph_n__7730_7015_note($0, $1, $2, $3, $4, $5, $6, $7, $8) {
11947
12024
 
11948
12025
  /* Commands.Graph.7730:7014:missedDot */
11949
12026
  function Commands_Graph_n__7730_7014_missedDot($0, $1, $2, $3, $4, $5, $6, $7) {
11950
- return Theme_theme($7, csegen_690(), csegen_690(), 7)(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('\u{25e6}'));
12027
+ return Theme_theme($7, csegen_695(), csegen_695(), 7)(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('\u{25e6}'));
11951
12028
  }
11952
12029
 
11953
12030
  /* Commands.Graph.7730:7013:maxValue */
@@ -11976,7 +12053,7 @@ function Commands_Graph_n__7730_7012_header($0, $1, $2, $3, $4, $5, $6, $7) {
11976
12053
  break;
11977
12054
  }
11978
12055
  }
11979
- const $3a = {a1: $3b, a2: {a1: {a1: Text_PrettyPrint_Prettyprinter_Symbols_parens(Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Commands_Graph_n__7730_7014_missedDot($0, $1, $2, $3, $4, $5, $6, $7), Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('overlayed on'), Commands_Graph_n__7730_7016_pendingDot($0, $1, $2, $3, $4, $5, $6, $7))))}, a2: csegen_765()}};
12056
+ const $3a = {a1: $3b, a2: {a1: {a1: Text_PrettyPrint_Prettyprinter_Symbols_parens(Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Commands_Graph_n__7730_7014_missedDot($0, $1, $2, $3, $4, $5, $6, $7), Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('overlayed on'), Commands_Graph_n__7730_7016_pendingDot($0, $1, $2, $3, $4, $5, $6, $7))))}, a2: csegen_771()}};
11980
12057
  const $27 = {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(Commands_Graph_n__7730_7014_missedDot($0, $1, $2, $3, $4, $5, $6, $7)))}, a2: $3a};
11981
12058
  const $14 = {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(Commands_Graph_n__7730_7016_pendingDot($0, $1, $2, $3, $4, $5, $6, $7)))}, a2: $27};
11982
12059
  const $f = {a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('Weighted review workload.')}, a2: $14};
@@ -11987,7 +12064,7 @@ function Commands_Graph_n__7730_7012_header($0, $1, $2, $3, $4, $5, $6, $7) {
11987
12064
 
11988
12065
  /* Commands.Graph.7327:6604:header */
11989
12066
  function Commands_Graph_n__7327_6604_header($0, $1, $2, $3) {
11990
- 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_765()}}}));
12067
+ 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_771()}}}));
11991
12068
  }
11992
12069
 
11993
12070
  /* Commands.Graph.7327:6603:graphable */
@@ -12010,20 +12087,20 @@ function Commands_Graph_n__6760_6183_countInParens($0, $1, $2, $3, $4) {
12010
12087
 
12011
12088
  /* Commands.Graph.7730:7010:completedBox */
12012
12089
  function Commands_Graph_n__7730_7010_completedBox($0, $1, $2, $3, $4, $5, $6, $7) {
12013
- return Theme_theme($7, csegen_670(), csegen_670(), 3)(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('\u{25aa}'));
12090
+ return Theme_theme($7, csegen_675(), csegen_675(), 3)(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('\u{25aa}'));
12014
12091
  }
12015
12092
 
12016
12093
  /* Commands.Graph.6760:6182:coloredLabel */
12017
12094
  function Commands_Graph_n__6760_6182_coloredLabel($0, $1, $2, $3, $4) {
12018
12095
  switch((($4.a2===0n)?1:0)) {
12019
- case 1: return Theme_theme($0, csegen_670(), csegen_670(), 0)($2.a1(undefined)($4.a1));
12096
+ case 1: return Theme_theme($0, csegen_675(), csegen_675(), 0)($2.a1(undefined)($4.a1));
12020
12097
  case 0: {
12021
12098
  switch(Prelude_Types_x3c_Ord_Nat($4.a2, 2n)) {
12022
12099
  case 1: return $2.a1(undefined)($4.a1);
12023
12100
  case 0: {
12024
12101
  switch(Prelude_Types_x3c_Ord_Nat($4.a2, 6n)) {
12025
- case 1: return Theme_theme($0, csegen_691(), csegen_689(), 1)($2.a1(undefined)($4.a1));
12026
- case 0: return Theme_theme($0, csegen_690(), csegen_690(), 2)($2.a1(undefined)($4.a1));
12102
+ case 1: return Theme_theme($0, csegen_696(), csegen_694(), 1)($2.a1(undefined)($4.a1));
12103
+ case 0: return Theme_theme($0, csegen_695(), csegen_695(), 2)($2.a1(undefined)($4.a1));
12027
12104
  }
12028
12105
  }
12029
12106
  }
@@ -12163,9 +12240,9 @@ function Commands_Graph_reviewsGraph($0, $1, $2, $3, $4, $5, $6, $7) {
12163
12240
 
12164
12241
  /* Commands.Graph.healthGraph : Config => List PullRequest -> String -> String -> Doc AnsiStyle */
12165
12242
  function Commands_Graph_healthGraph($0, $1, $2, $3) {
12166
- const $4 = Data_List_groupBy($7 => $8 => Prelude_Basics_on($b => $c => Prelude_Basics_on(csegen_328(), $11 => $11.a2, $b, $c), csegen_644(), $7, $8), Data_List_sortBy(csegen_645(), $1));
12243
+ const $4 = Data_List_groupBy($7 => $8 => Prelude_Basics_on($b => $c => Prelude_Basics_on(csegen_328(), $11 => $11.a2, $b, $c), csegen_649(), $7, $8), Data_List_sortBy(csegen_650(), $1));
12167
12244
  const $1e = Prelude_Types_foldr_Foldable_List(xs => m => Prelude_Types_max_Ord_Nat(Data_List1_length(xs), m), 1n, $4);
12168
- return Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Commands_Graph_n__7327_6604_header($3, $2, $1, $0), a2: {a1: Commands_Graph_graph($0, {a1: $36 => Commands_Graph_totalWidth_Graphable_x28PRsOnDatex20x24dateTyx29($0, $3a => Commands_Graph_length_HasLength_Date($3a), csegen_781(), $36), a2: $41 => maxLabelLength => Commands_Graph_label_Graphable_x28PRsOnDatex20x24dateTyx29($0, $45 => Commands_Graph_length_HasLength_Date($45), csegen_781(), $41, maxLabelLength), a3: $4d => Commands_Graph_labelLength_Graphable_x28PRsOnDatex20x24dateTyx29($0, $51 => Commands_Graph_length_HasLength_Date($51), csegen_781(), $4d), a4: $58 => Commands_Graph_score_Graphable_x28PRsOnDatex20x24dateTyx29($0, $5c => Commands_Graph_length_HasLength_Date($5c), csegen_781(), $58), a5: $63 => Commands_Graph_detractor_Graphable_x28PRsOnDatex20x24dateTyx29($0, $67 => Commands_Graph_length_HasLength_Date($67), csegen_781(), $63), a6: $6e => Commands_Graph_bonus_Graphable_x28PRsOnDatex20x24dateTyx29($0, $72 => Commands_Graph_length_HasLength_Date($72), csegen_781(), $6e)}, $1e, 0n, 0n, Commands_Graph_n__7327_6606_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(Commands_Graph_n__7327_6605_link($3, $2, $1, $0)), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {h: 0}}}}}});
12245
+ return Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Commands_Graph_n__7327_6604_header($3, $2, $1, $0), a2: {a1: Commands_Graph_graph($0, {a1: $36 => Commands_Graph_totalWidth_Graphable_x28PRsOnDatex20x24dateTyx29($0, $3a => Commands_Graph_length_HasLength_Date($3a), csegen_787(), $36), a2: $41 => maxLabelLength => Commands_Graph_label_Graphable_x28PRsOnDatex20x24dateTyx29($0, $45 => Commands_Graph_length_HasLength_Date($45), csegen_787(), $41, maxLabelLength), a3: $4d => Commands_Graph_labelLength_Graphable_x28PRsOnDatex20x24dateTyx29($0, $51 => Commands_Graph_length_HasLength_Date($51), csegen_787(), $4d), a4: $58 => Commands_Graph_score_Graphable_x28PRsOnDatex20x24dateTyx29($0, $5c => Commands_Graph_length_HasLength_Date($5c), csegen_787(), $58), a5: $63 => Commands_Graph_detractor_Graphable_x28PRsOnDatex20x24dateTyx29($0, $67 => Commands_Graph_length_HasLength_Date($67), csegen_787(), $63), a6: $6e => Commands_Graph_bonus_Graphable_x28PRsOnDatex20x24dateTyx29($0, $72 => Commands_Graph_length_HasLength_Date($72), csegen_787(), $6e)}, $1e, 0n, 0n, Commands_Graph_n__7327_6606_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(Commands_Graph_n__7327_6605_link($3, $2, $1, $0)), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {h: 0}}}}}});
12169
12246
  }
12170
12247
 
12171
12248
  /* Commands.Graph.graphOne : Config -> Graphable g => Nat -> Nat -> Nat -> g -> Doc AnsiStyle */
@@ -12188,7 +12265,7 @@ function Commands_Graph_countPadRight($0, $1, $2) {
12188
12265
 
12189
12266
  /* Commands.Graph.bar : Config -> Nat -> Nat -> Nat -> Nat -> Doc AnsiStyle */
12190
12267
  function Commands_Graph_bar($0, $1, $2, $3, $4) {
12191
- return Text_PrettyPrint_Prettyprinter_Doc_indent(Number(_truncBigInt32($1)), Text_PrettyPrint_Prettyprinter_Doc_hcat({a1: Theme_theme($0, csegen_690(), csegen_690(), 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_691(), csegen_689(), 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_670(), csegen_670(), 3)(Text_PrettyPrint_Prettyprinter_Doc_hcat(Data_List_replicateTR({h: 0}, $4, Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_Char('\u{25aa}')))), a2: {h: 0}}}}));
12268
+ return Text_PrettyPrint_Prettyprinter_Doc_indent(Number(_truncBigInt32($1)), Text_PrettyPrint_Prettyprinter_Doc_hcat({a1: Theme_theme($0, csegen_695(), csegen_695(), 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_696(), csegen_694(), 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_675(), csegen_675(), 3)(Text_PrettyPrint_Prettyprinter_Doc_hcat(Data_List_replicateTR({h: 0}, $4, Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_Char('\u{25aa}')))), a2: {h: 0}}}}));
12192
12269
  }
12193
12270
 
12194
12271