@mattpolzin/harmony 5.6.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 +26 -7
  2. package/harmony +850 -720
  3. package/man/harmony.1 +38 -8
  4. package/package.json +1 -1
package/harmony CHANGED
@@ -649,6 +649,7 @@ const digIssue = issue => {
649
649
  author: issue.user.login,
650
650
  created_at: issue.created_at,
651
651
  title: issue.title,
652
+ body: issue.body,
652
653
  assignee: issue.assignee ? issue.assignee.login : null
653
654
  }
654
655
  }
@@ -656,7 +657,7 @@ const digIssues = issueJson =>
656
657
  issueJson.map(digIssue)
657
658
 
658
659
  // Create Issue
659
- // 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?}
660
661
  const okit_create_issue = (octokit, owner, repo, title, body, onSuccess, onFailure) =>
661
662
  idris__okit_unpromisify(
662
663
  octokit.rest.issues.create({ owner, repo, title, body }),
@@ -664,6 +665,15 @@ const okit_create_issue = (octokit, owner, repo, title, body, onSuccess, onFailu
664
665
  onFailure
665
666
  )
666
667
 
668
+ // Get a single Issue
669
+ // Executes callback with stringified JSON {"issue_number": Int, "author": String, "created_at": Date, "title": String, "body": String?, "assignee": String?}
670
+ const okit_get_issue = (octokit, owner, repo, issue_number, onSuccess, onFailure) =>
671
+ idris__okit_unpromisify(
672
+ octokit.rest.issues.get({ owner, repo, issue_number }),
673
+ r => onSuccess(JSON.stringify(digIssue(r.data))),
674
+ onFailure
675
+ )
676
+
667
677
  // list team members
668
678
  const digUserLogins = usersJson =>
669
679
  usersJson.map(u => u.login)
@@ -980,6 +990,7 @@ const FFI_GitHub_prim__getUser = okit_get_user;
980
990
  const FFI_GitHub_prim__getSelf = okit_get_self;
981
991
  const FFI_GitHub_prim__getRepoDefaultBranch = okit_get_repo_default_branch;
982
992
  const FFI_GitHub_prim__getPullRequestGraphQlId = okit_get_pr_graphql_id;
993
+ const FFI_GitHub_prim__getIssue = okit_get_issue;
983
994
  const FFI_GitHub_prim__createPR = okit_create_pr;
984
995
  const FFI_GitHub_prim__createIssue = okit_create_issue;
985
996
  const FFI_GitHub_prim__createComment = okit_create_comment;
@@ -1010,7 +1021,7 @@ function x24tcOpt_1($0) {
1010
1021
  case 0: return {h: 0 /* {TcDone:1} */, a1: $0.a5};
1011
1022
  default: {
1012
1023
  const $17 = {a1: $0.a5.a1.a1, a2: $0.a5.a1.a2, a3: $0.a5.a1.a3};
1013
- const $1b = Data_List_DeleteBy_deleteByx27($1e => $1f => Prelude_Basics_on($0.a1.a1.a1, csegen_751(), $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);
1014
1025
  switch($1b.a1.h) {
1015
1026
  case 0: /* nothing */ {
1016
1027
  switch($0.a8) {
@@ -1025,7 +1036,7 @@ function x24tcOpt_1($0) {
1025
1036
  }
1026
1037
  default: {
1027
1038
  const $64 = {a1: $0.a5.a1.a1, a2: $0.a5.a1.a2, a3: $0.a5.a1.a3};
1028
- const $68 = Data_List_DeleteBy_deleteByx27($6b => $6c => Prelude_Basics_on($0.a1.a1.a1, csegen_751(), $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);
1029
1040
  switch($68.a1.h) {
1030
1041
  case 0: /* nothing */ {
1031
1042
  switch($0.a8) {
@@ -1050,7 +1061,7 @@ function x24tcOpt_1($0) {
1050
1061
  case 0: return {h: 0 /* {TcDone:1} */, a1: $0.a5};
1051
1062
  default: {
1052
1063
  const $b5 = {a1: $0.a5.a1.a1, a2: $0.a5.a1.a2, a3: $0.a5.a1.a3};
1053
- const $b9 = Data_List_DeleteBy_deleteByx27($bc => $bd => Prelude_Basics_on($0.a1.a1.a1, csegen_751(), $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);
1054
1065
  switch($b9.a1.h) {
1055
1066
  case 0: /* nothing */ {
1056
1067
  switch($0.a8) {
@@ -1065,7 +1076,7 @@ function x24tcOpt_1($0) {
1065
1076
  }
1066
1077
  default: {
1067
1078
  const $102 = {a1: $0.a5.a1.a1, a2: $0.a5.a1.a2, a3: $0.a5.a1.a3};
1068
- const $106 = Data_List_DeleteBy_deleteByx27($109 => $10a => Prelude_Basics_on($0.a1.a1.a1, csegen_751(), $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);
1069
1080
  switch($106.a1.h) {
1070
1081
  case 0: /* nothing */ {
1071
1082
  switch($0.a8) {
@@ -1104,8 +1115,8 @@ function x24tcOpt_2($0) {
1104
1115
  }
1105
1116
  }
1106
1117
 
1107
- /* Data.List.7827:8419:splitRec */
1108
- function Data_List_n__7827_8419_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) {
1109
1120
  return __tailRec(x24tcOpt_2, {h: 1 /* {TcContinue2:1} */, a1: $0, a2: $1, a3: $2, a4: $3, a5: $4});
1110
1121
  }
1111
1122
 
@@ -1122,8 +1133,8 @@ function x24tcOpt_3($0) {
1122
1133
  }
1123
1134
  }
1124
1135
 
1125
- /* Prelude.Show.3216:12633:show' */
1126
- function Prelude_Show_n__3216_12633_showx27($0, $1, $2, $3) {
1136
+ /* Prelude.Show.3215:12601:show' */
1137
+ function Prelude_Show_n__3215_12601_showx27($0, $1, $2, $3) {
1127
1138
  return __tailRec(x24tcOpt_3, {h: 1 /* {TcContinue3:1} */, a1: $0, a2: $1, a3: $2, a4: $3});
1128
1139
  }
1129
1140
 
@@ -1328,8 +1339,8 @@ function x24tcOpt_5($0) {
1328
1339
  }
1329
1340
  }
1330
1341
 
1331
- /* Text.PrettyPrint.Prettyprinter.Doc.8979:8927:initialIndentation */
1332
- 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) {
1333
1344
  return __tailRec(x24tcOpt_5, {h: 1 /* {TcContinue5:1} */, a1: $0, a2: $1, a3: $2, a4: $3});
1334
1345
  }
1335
1346
 
@@ -1367,7 +1378,7 @@ function Prelude_Types_compare_Ord_x28Listx20x24ax29($0, $1, $2) {
1367
1378
  }
1368
1379
 
1369
1380
  /* Prelude.Types.case block in compare */
1370
- function Prelude_Types_case__compare_6835($0, $1, $2, $3, $4, $5) {
1381
+ function Prelude_Types_case__compare_6803($0, $1, $2, $3, $4, $5) {
1371
1382
  return __tailRec(x24tcOpt_6, {h: 2 /* {TcContinue6:2} */, a1: $0, a2: $1, a3: $2, a4: $3, a5: $4, a6: $5});
1372
1383
  }
1373
1384
 
@@ -1404,13 +1415,13 @@ function Prelude_Types_x3dx3d_Eq_x28Listx20x24ax29($0, $1, $2) {
1404
1415
  function x24tcOpt_8($0) {
1405
1416
  switch($0.a2.h) {
1406
1417
  case 0: /* Leaf */ return {h: 0 /* {TcDone:8} */, a1: $0.a1({a1: $0.a2.a1, a2: $0.a2.a2})};
1407
- 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};
1408
- 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};
1409
1420
  }
1410
1421
  }
1411
1422
 
1412
- /* Data.SortedMap.Dependent.6823:6782:treeToList' */
1413
- 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) {
1414
1425
  return __tailRec(x24tcOpt_8, {h: 1 /* {TcContinue8:1} */, a1: $0, a2: $1});
1415
1426
  }
1416
1427
 
@@ -1697,7 +1708,7 @@ function JSON_Parser_object($0, $1, $2) {
1697
1708
  }
1698
1709
 
1699
1710
  /* JSON.Parser.case block in object */
1700
- 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) {
1701
1712
  return __tailRec(x24tcOpt_14, {h: 2 /* {TcContinue14:2} */, a1: $0, a2: $1, a3: $2, a4: $3, a5: $4, a6: $5, a7: $6});
1702
1713
  }
1703
1714
 
@@ -1708,14 +1719,14 @@ function x24tcOpt_15($0) {
1708
1719
  case undefined: /* cons */ {
1709
1720
  switch(Prelude_Types_elemBy(csegen_147(), $0.a2, $0.a3.a1)($0.a1)) {
1710
1721
  case 1: return {h: 1 /* {TcContinue15:1} */, a1: $0.a1, a2: $0.a2, a3: $0.a3.a2};
1711
- case 0: return {h: 0 /* {TcDone:15} */, a1: {a1: $0.a3.a1, a2: Data_List_n__4928_5593_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)}};
1712
1723
  }
1713
1724
  }
1714
1725
  }
1715
1726
  }
1716
1727
 
1717
- /* Data.List.4928:5593:nubBy' */
1718
- function Data_List_n__4928_5593_nubByx27($0, $1, $2) {
1728
+ /* Data.List.4934:5733:nubBy' */
1729
+ function Data_List_n__4934_5733_nubByx27($0, $1, $2) {
1719
1730
  return __tailRec(x24tcOpt_15, {h: 1 /* {TcContinue15:1} */, a1: $0, a2: $1, a3: $2});
1720
1731
  }
1721
1732
 
@@ -1745,7 +1756,7 @@ function x24tcOpt_16($0) {
1745
1756
  }
1746
1757
 
1747
1758
  /* Data.String.with block in ltrim */
1748
- function Data_String_with__ltrim_9724($0, $1) {
1759
+ function Data_String_with__ltrim_9864($0, $1) {
1749
1760
  return __tailRec(x24tcOpt_16, {h: 1 /* {TcContinue16:1} */, a1: $0, a2: $1});
1750
1761
  }
1751
1762
 
@@ -1857,16 +1868,16 @@ function x24tcOpt_21($0) {
1857
1868
  case 0: /* nil */ return {h: 0 /* {TcDone:21} */, a1: {a1: Prelude_Types_List_reverse($0.a2), a2: {h: 0}}};
1858
1869
  case undefined: /* cons */ {
1859
1870
  switch($0.a3.a1) {
1860
- case '\n': return {h: 0 /* {TcDone:21} */, a1: {a1: Prelude_Types_List_reverse($0.a2), a2: Data_String_n__3989_9562_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)}};
1861
1872
  case '\r': {
1862
1873
  switch($0.a3.a2.h) {
1863
1874
  case undefined: /* cons */ {
1864
1875
  switch($0.a3.a2.a1) {
1865
- case '\n': return {h: 0 /* {TcDone:21} */, a1: {a1: Prelude_Types_List_reverse($0.a2), a2: Data_String_n__3989_9562_linesHelp($0.a1, {h: 0}, $0.a3.a2.a2)}};
1866
- default: return {h: 0 /* {TcDone:21} */, a1: {a1: Prelude_Types_List_reverse($0.a2), a2: Data_String_n__3989_9562_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)}};
1867
1878
  }
1868
1879
  }
1869
- default: return {h: 0 /* {TcDone:21} */, a1: {a1: Prelude_Types_List_reverse($0.a2), a2: Data_String_n__3989_9562_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)}};
1870
1881
  }
1871
1882
  }
1872
1883
  default: return {h: 1 /* {TcContinue21:1} */, a1: $0.a1, a2: {a1: $0.a3.a1, a2: $0.a2}, a3: $0.a3.a2};
@@ -1881,16 +1892,16 @@ function x24tcOpt_21($0) {
1881
1892
  case 0: /* nil */ return {h: 0 /* {TcDone:21} */, a1: {a1: Prelude_Types_List_reverse($0.a2), a2: {h: 0}}};
1882
1893
  case undefined: /* cons */ {
1883
1894
  switch($0.a3.a1) {
1884
- case '\n': return {h: 0 /* {TcDone:21} */, a1: {a1: Prelude_Types_List_reverse($0.a2), a2: Data_String_n__3989_9562_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)}};
1885
1896
  case '\r': {
1886
1897
  switch($0.a3.a2.h) {
1887
1898
  case undefined: /* cons */ {
1888
1899
  switch($0.a3.a2.a1) {
1889
- case '\n': return {h: 0 /* {TcDone:21} */, a1: {a1: Prelude_Types_List_reverse($0.a2), a2: Data_String_n__3989_9562_linesHelp($0.a1, {h: 0}, $0.a3.a2.a2)}};
1890
- default: return {h: 0 /* {TcDone:21} */, a1: {a1: Prelude_Types_List_reverse($0.a2), a2: Data_String_n__3989_9562_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)}};
1891
1902
  }
1892
1903
  }
1893
- default: return {h: 0 /* {TcDone:21} */, a1: {a1: Prelude_Types_List_reverse($0.a2), a2: Data_String_n__3989_9562_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)}};
1894
1905
  }
1895
1906
  }
1896
1907
  default: return {h: 1 /* {TcContinue21:1} */, a1: $0.a1, a2: {a1: $0.a3.a1, a2: $0.a2}, a3: $0.a3.a2};
@@ -1901,8 +1912,8 @@ function x24tcOpt_21($0) {
1901
1912
  }
1902
1913
  }
1903
1914
 
1904
- /* Data.String.3989:9562:linesHelp */
1905
- function Data_String_n__3989_9562_linesHelp($0, $1, $2) {
1915
+ /* Data.String.3989:9702:linesHelp */
1916
+ function Data_String_n__3989_9702_linesHelp($0, $1, $2) {
1906
1917
  return __tailRec(x24tcOpt_21, {h: 1 /* {TcContinue21:1} */, a1: $0, a2: $1, a3: $2});
1907
1918
  }
1908
1919
 
@@ -1936,14 +1947,14 @@ function Prelude_Types_List_lengthPlus($0, $1) {
1936
1947
  function x24tcOpt_24($0) {
1937
1948
  switch($0.a6.h) {
1938
1949
  case 0: /* Nil */ return {h: 0 /* {TcDone:24} */, a1: {h: 0 /* SEmpty */}};
1939
- 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)}};
1940
1951
  case 1: /* Cons */ {
1941
1952
  switch($0.a6.a2.h) {
1942
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};
1943
- 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)}};
1944
- 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)}};
1945
1956
  case 3: /* Line */ {
1946
- 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);
1947
1958
  let $35;
1948
1959
  switch($2d.h) {
1949
1960
  case 0: /* SEmpty */ {
@@ -1962,21 +1973,21 @@ function x24tcOpt_24($0) {
1962
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}}};
1963
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}};
1964
1975
  case 7: /* Union */ {
1965
- 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});
1966
- 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});
1967
- 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)};
1968
1979
  }
1969
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}};
1970
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}};
1971
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}};
1972
- 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}})}};
1973
1984
  }
1974
1985
  }
1975
1986
  }
1976
1987
  }
1977
1988
 
1978
- /* Text.PrettyPrint.Prettyprinter.Doc.8979:8926:best */
1979
- 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) {
1980
1991
  return __tailRec(x24tcOpt_24, {h: 1 /* {TcContinue24:1} */, a1: $0, a2: $1, a3: $2, a4: $3, a5: $4, a6: $5});
1981
1992
  }
1982
1993
 
@@ -2488,7 +2499,7 @@ function JSON_Parser_array($0, $1, $2) {
2488
2499
  }
2489
2500
 
2490
2501
  /* JSON.Parser.case block in array */
2491
- function JSON_Parser_case__array_20381($0, $1, $2, $3) {
2502
+ function JSON_Parser_case__array_22663($0, $1, $2, $3) {
2492
2503
  return __tailRec(x24tcOpt_47, {h: 2 /* {TcContinue47:2} */, a1: $0, a2: $1, a3: $2, a4: $3});
2493
2504
  }
2494
2505
 
@@ -2816,168 +2827,178 @@ const csegen_328 = __lazy(function () {
2816
2827
  return $0 => $1 => (($0===$1)?1:0);
2817
2828
  });
2818
2829
 
2819
- /* {csegen:345} */
2820
- const csegen_345 = __lazy(function () {
2830
+ /* {csegen:346} */
2831
+ const csegen_346 = __lazy(function () {
2821
2832
  return $0 => Language_JSON_Accessors_array($3 => Data_PullRequest_parsePR($3), $0);
2822
2833
  });
2823
2834
 
2824
- /* {csegen:358} */
2825
- const csegen_358 = __lazy(function () {
2835
+ /* {csegen:359} */
2836
+ const csegen_359 = __lazy(function () {
2826
2837
  return $0 => Prelude_EqOrd_x3dx3d_Eq_Char($0, '/');
2827
2838
  });
2828
2839
 
2829
- /* {csegen:364} */
2830
- const csegen_364 = __lazy(function () {
2840
+ /* {csegen:365} */
2841
+ const csegen_365 = __lazy(function () {
2831
2842
  return () => $0 => $0.a1;
2832
2843
  });
2833
2844
 
2834
- /* {csegen:377} */
2835
- const csegen_377 = __lazy(function () {
2845
+ /* {csegen:378} */
2846
+ const csegen_378 = __lazy(function () {
2836
2847
  return () => $0 => $1 => Data_Promise_map_Functor_x28Promisex20x24ex29($4 => Number(_truncUBigInt32($4)), System_time(csegen_74()()), $0, $1);
2837
2848
  });
2838
2849
 
2839
- /* {csegen:382} */
2840
- const csegen_382 = __lazy(function () {
2850
+ /* {csegen:383} */
2851
+ const csegen_383 = __lazy(function () {
2841
2852
  return $0 => $1 => $2 => $3 => Prelude_Types_map_Functor_Maybe($2, $3);
2842
2853
  });
2843
2854
 
2844
- /* {csegen:403} */
2845
- const csegen_403 = __lazy(function () {
2855
+ /* {csegen:404} */
2856
+ const csegen_404 = __lazy(function () {
2846
2857
  return () => $0 => $1 => $2 => Data_Promise_liftIO_HasIO_x28Promisex20x24ex29($5 => Prelude_IO_prim__putStr('\n', $5), $0, $1, $2);
2847
2858
  });
2848
2859
 
2849
- /* {csegen:405} */
2850
- const csegen_405 = __lazy(function () {
2860
+ /* {csegen:406} */
2861
+ const csegen_406 = __lazy(function () {
2851
2862
  return () => $0 => $1 => $2 => Data_Promise_liftIO_HasIO_x28Promisex20x24ex29($5 => Prelude_IO_prim__getStr($5), $0, $1, $2);
2852
2863
  });
2853
2864
 
2854
- /* {csegen:407} */
2855
- const csegen_407 = __lazy(function () {
2865
+ /* {csegen:408} */
2866
+ const csegen_408 = __lazy(function () {
2856
2867
  return () => $0 => $1 => Data_Promise_pure_Applicative_x28Promisex20x24ex29({h: 0}, $0, $1);
2857
2868
  });
2858
2869
 
2859
- /* {csegen:421} */
2860
- const csegen_421 = __lazy(function () {
2870
+ /* {csegen:422} */
2871
+ const csegen_422 = __lazy(function () {
2861
2872
  return {a1: Commands_Help_argument(0, '...'), a2: {h: 0}};
2862
2873
  });
2863
2874
 
2864
- /* {csegen:426} */
2865
- const csegen_426 = __lazy(function () {
2866
- return {a1: Commands_Help_argument(0, '#<label>'), a2: csegen_421()};
2875
+ /* {csegen:427} */
2876
+ const csegen_427 = __lazy(function () {
2877
+ return {a1: Commands_Help_argument(0, '#<label>'), a2: csegen_422()};
2867
2878
  });
2868
2879
 
2869
- /* {csegen:603} */
2870
- const csegen_603 = __lazy(function () {
2880
+ /* {csegen:608} */
2881
+ const csegen_608 = __lazy(function () {
2871
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)})};
2872
2883
  });
2873
2884
 
2874
- /* {csegen:607} */
2875
- const csegen_607 = __lazy(function () {
2885
+ /* {csegen:612} */
2886
+ const csegen_612 = __lazy(function () {
2876
2887
  return {a1: {h: 0}, a2: {a1: '-i', a2: {h: 0}}};
2877
2888
  });
2878
2889
 
2879
- /* {csegen:612} */
2880
- const csegen_612 = __lazy(function () {
2890
+ /* {csegen:617} */
2891
+ const csegen_617 = __lazy(function () {
2881
2892
  return $0 => $1 => Data_Promise_pure_Applicative_x28Promisex20x24ex29(undefined, $0, $1);
2882
2893
  });
2883
2894
 
2884
- /* {csegen:627} */
2885
- const csegen_627 = __lazy(function () {
2895
+ /* {csegen:633} */
2896
+ const csegen_633 = __lazy(function () {
2886
2897
  return {a1: csegen_9(), a2: a => ({h: 0}), a3: a => $4 => $5 => Prelude_Types_x3cx7cx3e_Alternative_Maybe($4, $5)};
2887
2898
  });
2888
2899
 
2889
- /* {csegen:628} */
2890
- const csegen_628 = __lazy(function () {
2900
+ /* {csegen:634} */
2901
+ const csegen_634 = __lazy(function () {
2891
2902
  return $0 => Data_List_sort(csegen_240(), $0);
2892
2903
  });
2893
2904
 
2894
- /* {csegen:630} */
2895
- const csegen_630 = __lazy(function () {
2905
+ /* {csegen:636} */
2906
+ const csegen_636 = __lazy(function () {
2896
2907
  return $0 => $1 => $2 => FFI_Concurrency_promiseAll(csegen_147(), $0, $1, $2);
2897
2908
  });
2898
2909
 
2899
- /* {csegen:642} */
2900
- const csegen_642 = __lazy(function () {
2901
- return $0 => $1 => Data_Date_compare_Ord_Date($0, $1);
2902
- });
2903
-
2904
2910
  /* {csegen:643} */
2905
2911
  const csegen_643 = __lazy(function () {
2906
- return $0 => $0.a3;
2912
+ return $0 => {
2913
+ switch($0.h) {
2914
+ case 0: /* nothing */ return 1;
2915
+ default: return 0;
2916
+ }
2917
+ };
2907
2918
  });
2908
2919
 
2909
- /* {csegen:644} */
2910
- const csegen_644 = __lazy(function () {
2911
- return $0 => $1 => Prelude_Basics_on(csegen_642(), csegen_643(), $0, $1);
2920
+ /* {csegen:648} */
2921
+ const csegen_648 = __lazy(function () {
2922
+ return $0 => $1 => Data_Date_compare_Ord_Date($0, $1);
2912
2923
  });
2913
2924
 
2914
- /* {csegen:666} */
2915
- const csegen_666 = __lazy(function () {
2925
+ /* {csegen:649} */
2926
+ const csegen_649 = __lazy(function () {
2916
2927
  return $0 => $0.a3;
2917
2928
  });
2918
2929
 
2919
- /* {csegen:669} */
2920
- const csegen_669 = __lazy(function () {
2921
- return Theme_cs({a1: 2, a2: {h: 0}}, {h: 0 /* Left */, a1: undefined});
2930
+ /* {csegen:650} */
2931
+ const csegen_650 = __lazy(function () {
2932
+ return $0 => $1 => Prelude_Basics_on(csegen_648(), csegen_649(), $0, $1);
2922
2933
  });
2923
2934
 
2924
2935
  /* {csegen:672} */
2925
2936
  const csegen_672 = __lazy(function () {
2926
- return $0 => $0.a1;
2937
+ return $0 => $0.a3;
2938
+ });
2939
+
2940
+ /* {csegen:675} */
2941
+ const csegen_675 = __lazy(function () {
2942
+ return Theme_cs({a1: 2, a2: {h: 0}}, {h: 0 /* Left */, a1: undefined});
2927
2943
  });
2928
2944
 
2929
2945
  /* {csegen:678} */
2930
2946
  const csegen_678 = __lazy(function () {
2947
+ return $0 => $0.a1;
2948
+ });
2949
+
2950
+ /* {csegen:684} */
2951
+ const csegen_684 = __lazy(function () {
2931
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}}}));
2932
2953
  });
2933
2954
 
2934
- /* {csegen:688} */
2935
- const csegen_688 = __lazy(function () {
2955
+ /* {csegen:694} */
2956
+ const csegen_694 = __lazy(function () {
2936
2957
  return Theme_cs({a1: 0, a2: {h: 0}}, {h: 0 /* Left */, a1: undefined});
2937
2958
  });
2938
2959
 
2939
- /* {csegen:689} */
2940
- const csegen_689 = __lazy(function () {
2960
+ /* {csegen:695} */
2961
+ const csegen_695 = __lazy(function () {
2941
2962
  return Theme_cs({a1: 1, a2: {h: 0}}, {h: 0 /* Left */, a1: undefined});
2942
2963
  });
2943
2964
 
2944
- /* {csegen:690} */
2945
- const csegen_690 = __lazy(function () {
2965
+ /* {csegen:696} */
2966
+ const csegen_696 = __lazy(function () {
2946
2967
  return Theme_cs({a1: 3, a2: {h: 0}}, {h: 0 /* Left */, a1: undefined});
2947
2968
  });
2948
2969
 
2949
- /* {csegen:695} */
2950
- const csegen_695 = __lazy(function () {
2970
+ /* {csegen:710} */
2971
+ const csegen_710 = __lazy(function () {
2951
2972
  return $0 => Prelude_Types_either(() => $3 => '', () => $5 => $5, $0);
2952
2973
  });
2953
2974
 
2954
- /* {csegen:709} */
2955
- const csegen_709 = __lazy(function () {
2975
+ /* {csegen:716} */
2976
+ const csegen_716 = __lazy(function () {
2956
2977
  return $0 => Util_Prompting_yesNoPrompt(csegen_74()(), 1, 'Would you like to continue creating a Pull Request anyway?');
2957
2978
  });
2958
2979
 
2959
- /* {csegen:746} */
2960
- const csegen_746 = __lazy(function () {
2980
+ /* {csegen:754} */
2981
+ const csegen_754 = __lazy(function () {
2961
2982
  return $0 => Prelude_Types_fastPack(Prelude_Types_List_reverse($0));
2962
2983
  });
2963
2984
 
2964
- /* {csegen:751} */
2965
- const csegen_751 = __lazy(function () {
2985
+ /* {csegen:759} */
2986
+ const csegen_759 = __lazy(function () {
2966
2987
  return $0 => $0.a1;
2967
2988
  });
2968
2989
 
2969
- /* {csegen:758} */
2970
- const csegen_758 = __lazy(function () {
2971
- return $0 => $1 => Data_Promise_map_Functor_x28Promisex20x24ex29($4 => Data_String_trim($4), csegen_405()(), $0, $1);
2990
+ /* {csegen:766} */
2991
+ const csegen_766 = __lazy(function () {
2992
+ return $0 => $1 => Data_Promise_map_Functor_x28Promisex20x24ex29($4 => Data_String_trim($4), csegen_406()(), $0, $1);
2972
2993
  });
2973
2994
 
2974
- /* {csegen:762} */
2975
- const csegen_762 = __lazy(function () {
2995
+ /* {csegen:771} */
2996
+ const csegen_771 = __lazy(function () {
2976
2997
  return {a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc()}, a2: {h: 0}};
2977
2998
  });
2978
2999
 
2979
- /* {csegen:778} */
2980
- const csegen_778 = __lazy(function () {
3000
+ /* {csegen:787} */
3001
+ const csegen_787 = __lazy(function () {
2981
3002
  return {a1: ann => $1 => Commands_Graph_pretty_Pretty_Date($1), a2: ann => $5 => $6 => Commands_Graph_prettyPrec_Pretty_Date($5, $6)};
2982
3003
  });
2983
3004
 
@@ -2986,23 +3007,23 @@ function prim__sub_Integer($0, $1) {
2986
3007
  return ($0-$1);
2987
3008
  }
2988
3009
 
2989
- /* Main.8859:1556:parsePg */
2990
- function Main_n__8859_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) {
2991
3012
  return Data_String_parsePositive(csegen_2(), $6);
2992
3013
  }
2993
3014
 
2994
- /* Main.8859:1555:parseLim */
2995
- function Main_n__8859_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) {
2996
3017
  return Prelude_Interfaces_x3cx3dx3c(csegen_14(), x => Data_Fin_natToFin(x, 101n), $e => Data_String_parsePositive(csegen_2(), $e));
2997
3018
  }
2998
3019
 
2999
- /* Main.8661:1303:ffiOpts */
3000
- function Main_n__8661_1303_ffiOpts($0, $1, $2, $3) {
3020
+ /* Main.8695:1303:ffiOpts */
3021
+ function Main_n__8695_1303_ffiOpts($0, $1, $2, $3) {
3001
3022
  return BashCompletion_ffiOpts($0, $3, $2, $1);
3002
3023
  }
3003
3024
 
3004
- /* Main.8661:1302:configuredOpts */
3005
- function Main_n__8661_1302_configuredOpts($0, $1, $2, $3) {
3025
+ /* Main.8695:1302:configuredOpts */
3026
+ function Main_n__8695_1302_configuredOpts($0, $1, $2, $3) {
3006
3027
  const $13 = $14 => {
3007
3028
  switch($14.h) {
3008
3029
  case 1: /* Right */ return $0.a1.a1.a2(undefined)(BashCompletion_opts($14.a1, $3, $2, $1));
@@ -3247,7 +3268,7 @@ function Main_handleAuthenticatedArgs($0, $1, $2, $3) {
3247
3268
  }
3248
3269
  return Prelude_Types_x3ex3ex3d_Monad_Maybe($b5, filter => ({a1: {a1: filter, a2: {a1: $b2.a1, a2: $b2.a2}}}));
3249
3270
  };
3250
- 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__8859_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__8859_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);
3251
3272
  return $c2 => {
3252
3273
  switch($92.h) {
3253
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);
@@ -3325,79 +3346,59 @@ function Main_handleAuthenticatedArgs($0, $1, $2, $3) {
3325
3346
  }
3326
3347
  };
3327
3348
  }
3328
- case 'quick': {
3329
- switch($3.a2.h) {
3330
- case 0: /* nil */ return $24d => $24e => Commands_quick($0, $1, $2, 1, $24d, $24e);
3331
- case undefined: /* cons */ {
3332
- return $256 => {
3333
- switch($3.a2.a1) {
3334
- case '--bugfix': {
3335
- return $258 => {
3336
- switch($3.a2.a2.h) {
3337
- case 0: /* nil */ return Commands_quick($0, $1, $2, 0, $256, $258);
3338
- 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);
3339
- }
3340
- };
3341
- }
3342
- 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);
3343
- }
3344
- };
3345
- }
3346
- 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);
3347
- }
3348
- }
3349
+ case 'quick': return $24c => $24d => Commands_quick($0, $1, $2, Commands_parseQuickArgs($3.a2), $24c, $24d);
3349
3350
  case 'health': {
3350
- return $2a3 => $2a4 => {
3351
+ return $257 => $258 => {
3351
3352
  switch($3.a2.h) {
3352
- case undefined: /* cons */ return Data_Promise_reject('The health command does not take any arguments.', $2a3, $2a4);
3353
- case 0: /* nil */ return Commands_health($0, $2, $2a3, $2a4);
3354
- 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);
3355
3356
  }
3356
3357
  };
3357
3358
  }
3358
3359
  case 'pr': {
3359
- const $2c4 = Commands_parsePrArgs($3.a2);
3360
- switch($2c4.h) {
3361
- case 1: /* Right */ return $2c7 => $2c8 => Commands_pr($0, $1, $2, $2c4.a1, $2c7, $2c8);
3362
- 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);
3363
3364
  }
3364
3365
  }
3365
3366
  case 'reflect': {
3366
- return $2d5 => $2d6 => {
3367
+ return $289 => $28a => {
3367
3368
  switch($3.a2.h) {
3368
- case 0: /* nil */ return Commands_reflect($0, $2, $2d5, $2d6);
3369
- 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);
3370
3371
  }
3371
3372
  };
3372
3373
  }
3373
3374
  case 'contribute': {
3374
- const $2f2 = Commands_parseContributeArgs($3.a2);
3375
- switch($2f2.h) {
3376
- case 1: /* Right */ return $2f5 => $2f6 => Commands_contribute($0, $1, $2, $2f2.a1, $2f5, $2f6);
3377
- 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);
3378
3379
  }
3379
3380
  }
3380
3381
  case 'list': {
3381
- return $303 => {
3382
+ return $2b7 => {
3382
3383
  switch($3.a2.h) {
3383
- case 0: /* nil */ return $305 => Commands_listOrgTeams($0, $2, $303, $305);
3384
+ case 0: /* nil */ return $2b9 => Commands_listOrgTeams($0, $2, $2b7, $2b9);
3384
3385
  case undefined: /* cons */ {
3385
- return $30b => {
3386
+ return $2bf => {
3386
3387
  switch($3.a2.a2.h) {
3387
- case 0: /* nil */ return Commands_list($0, $2, $3.a2.a1, $303, $30b);
3388
- 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);
3389
3390
  }
3390
3391
  };
3391
3392
  }
3392
- 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);
3393
3394
  }
3394
3395
  };
3395
3396
  }
3396
3397
  case 'graph': {
3397
- const $33e = Commands_parseGraphArgs($3.a2);
3398
- switch($33e.h) {
3399
- case 1: /* Right */ return Commands_graph($0, $2, $33e.a1);
3400
- 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);
3401
3402
  }
3402
3403
  }
3403
3404
  case 'rq': {
@@ -3423,18 +3424,18 @@ function Main_handleAuthenticatedArgs($0, $1, $2, $3) {
3423
3424
  }
3424
3425
  }
3425
3426
  case 'label': {
3426
- return $372 => $373 => {
3427
+ return $326 => $327 => {
3427
3428
  switch($3.a2.h) {
3428
- case 0: /* nil */ return Data_Promise_reject('The label command expects one or more labels as arguments.', $372, $373);
3429
- case undefined: /* cons */ return Commands_label($0, $1, $2, {a1: $3.a2.a1, a2: $3.a2.a2}, $372, $373);
3430
- 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);
3431
3432
  }
3432
3433
  };
3433
3434
  }
3434
- 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);
3435
3436
  }
3436
3437
  }
3437
- 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);
3438
3439
  }
3439
3440
  }
3440
3441
 
@@ -3506,10 +3507,10 @@ function Main_exitError($0, $1) {
3506
3507
  /* Main.bashCompletion : HasIO io => String -> String -> String -> io () */
3507
3508
  function Main_bashCompletion($0, $1, $2, $3) {
3508
3509
  const $4 = BashCompletion_cmdOpts($1, $2, $3);
3509
- const $9 = Prelude_Types_maybe(() => Main_n__8661_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);
3510
3511
  const $26 = $27 => {
3511
3512
  switch($27.h) {
3512
- case 0: /* nothing */ return Main_n__8661_1302_configuredOpts($0, $3, $2, $1);
3513
+ case 0: /* nothing */ return Main_n__8695_1302_configuredOpts($0, $3, $2, $1);
3513
3514
  case undefined: /* just */ return $0.a1.a1.a2(undefined)($27.a1);
3514
3515
  }
3515
3516
  };
@@ -3517,18 +3518,18 @@ function Main_bashCompletion($0, $1, $2, $3) {
3517
3518
  return $0.a1.a2(undefined)(undefined)($1c)($3f => $0.a2(undefined)($45 => Prelude_IO_prim__putStr(Data_String_fastUnlines($3f), $45)));
3518
3519
  }
3519
3520
 
3520
- /* Text.PrettyPrint.Prettyprinter.Render.Terminal.4508:5068:writeOutput */
3521
- 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) {
3522
3523
  return Control_Monad_ST_modifySTRef($1, $7 => ($7+$2), $3);
3523
3524
  }
3524
3525
 
3525
- /* Text.PrettyPrint.Prettyprinter.Render.Terminal.4508:5067:push */
3526
- 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) {
3527
3528
  return Control_Monad_ST_modifySTRef($1, $7 => ({a1: $2, a2: $7}), $3);
3528
3529
  }
3529
3530
 
3530
- /* Text.PrettyPrint.Prettyprinter.Render.Terminal.4508:5066:pop */
3531
- 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) {
3532
3533
  const $9 = $a => $b => {
3533
3534
  switch($a.h) {
3534
3535
  case undefined: /* cons */ return Control_Monad_ST_x3ex3ex3d_Monad_x28STx20x24sx29($f => ($1.value=$a.a2), $15 => $16 => ({a1: $a.a1}), $b);
@@ -3538,8 +3539,8 @@ function Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4508_5066_pop($0, $1,
3538
3539
  return Control_Monad_ST_x3ex3ex3d_Monad_x28STx20x24sx29($5 => ($1.value), $9, $2);
3539
3540
  }
3540
3541
 
3541
- /* Text.PrettyPrint.Prettyprinter.Render.Terminal.4508:5065:peek */
3542
- 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) {
3543
3544
  const $9 = $a => $b => {
3544
3545
  switch($a.h) {
3545
3546
  case undefined: /* cons */ return {a1: $a.a1};
@@ -3549,36 +3550,36 @@ function Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4508_5065_peek($0, $1
3549
3550
  return Control_Monad_ST_x3ex3ex3d_Monad_x28STx20x24sx29($5 => ($1.value), $9, $2);
3550
3551
  }
3551
3552
 
3552
- /* Text.PrettyPrint.Prettyprinter.Render.Terminal.4508:5064:go */
3553
- 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) {
3554
3555
  switch($3.h) {
3555
3556
  case 0: /* SEmpty */ return undefined;
3556
- 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);
3557
- 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);
3558
- 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);
3559
3560
  case 4: /* SAnnPush */ {
3560
3561
  const $4d = $4e => {
3561
3562
  switch($4e.h) {
3562
3563
  case undefined: /* just */ {
3563
3564
  const $50 = Prelude_Types_List_tailRecAppend($3.a1, $4e.a1);
3564
- 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);
3565
3566
  }
3566
3567
  case 0: /* nothing */ return $75 => ($1.value={h: 0});
3567
3568
  }
3568
3569
  };
3569
- 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);
3570
3571
  }
3571
3572
  case 5: /* SAnnPop */ {
3572
3573
  const $82 = _ => $83 => {
3573
3574
  const $8b = $8c => $8d => {
3574
3575
  switch($8c.h) {
3575
- 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);
3576
3577
  case 0: /* nothing */ return ($1.value={h: 0});
3577
3578
  }
3578
3579
  };
3579
- 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);
3580
3581
  };
3581
- 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);
3582
3583
  }
3583
3584
  }
3584
3585
  }
@@ -3608,7 +3609,7 @@ function Text_PrettyPrint_Prettyprinter_Render_Terminal_renderString($0) {
3608
3609
  };
3609
3610
  return Control_Monad_ST_x3ex3ex3d_Monad_x28STx20x24sx29($28 => (styleStackRef.value), $2c, $25);
3610
3611
  };
3611
- 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);
3612
3613
  };
3613
3614
  return Control_Monad_ST_x3ex3ex3d_Monad_x28STx20x24sx29($14 => Control_Monad_ST_newSTRef('', $14), $18, $11);
3614
3615
  };
@@ -3696,9 +3697,9 @@ function Text_PrettyPrint_Prettyprinter_Doc_case__changesUponFlattening_4540($0,
3696
3697
  }
3697
3698
  }
3698
3699
 
3699
- /* Text.PrettyPrint.Prettyprinter.Doc.8979:8928:selectNicer */
3700
- function Text_PrettyPrint_Prettyprinter_Doc_n__8979_8928_selectNicer($0, $1, $2, $3, $4, $5, $6) {
3701
- 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)) {
3702
3703
  case 1: return $5;
3703
3704
  case 0: return $6();
3704
3705
  }
@@ -3861,7 +3862,7 @@ const Text_PrettyPrint_Prettyprinter_Doc_line = __lazy(function () {
3861
3862
 
3862
3863
  /* Text.PrettyPrint.Prettyprinter.Doc.layoutWadlerLeijen : FittingPredicate ann -> PageWidth -> Doc ann -> SimpleDocStream ann */
3863
3864
  function Text_PrettyPrint_Prettyprinter_Doc_layoutWadlerLeijen($0, $1, $2) {
3864
- 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 */}});
3865
3866
  }
3866
3867
 
3867
3868
  /* Text.PrettyPrint.Prettyprinter.Doc.layoutUnbounded : Doc ann -> SimpleDocStream ann */
@@ -4060,7 +4061,7 @@ function Data_String_Extra_drop($0, $1) {
4060
4061
  }
4061
4062
 
4062
4063
  /* Data.String.with block in parsePositive,parsePosTrimmed */
4063
- function Data_String_with__parsePositivex2cparsePosTrimmed_10057($0, $1, $2, $3, $4) {
4064
+ function Data_String_with__parsePositivex2cparsePosTrimmed_10197($0, $1, $2, $3, $4) {
4064
4065
  switch($3) {
4065
4066
  case '': {
4066
4067
  switch($4.h) {
@@ -4115,7 +4116,7 @@ function Data_String_with__parsePositivex2cparsePosTrimmed_10057($0, $1, $2, $3,
4115
4116
  }
4116
4117
 
4117
4118
  /* Data.String.with block in asList */
4118
- function Data_String_with__asList_9700($0, $1) {
4119
+ function Data_String_with__asList_9840($0, $1) {
4119
4120
  switch($0) {
4120
4121
  case '': {
4121
4122
  switch($1.h) {
@@ -4127,17 +4128,17 @@ function Data_String_with__asList_9700($0, $1) {
4127
4128
  }
4128
4129
  }
4129
4130
 
4130
- /* Data.String.3856:9432:unlines' */
4131
- function Data_String_n__3856_9432_unlinesx27($0) {
4131
+ /* Data.String.3856:9572:unlines' */
4132
+ function Data_String_n__3856_9572_unlinesx27($0) {
4132
4133
  switch($0.h) {
4133
4134
  case 0: /* nil */ return {h: 0};
4134
- case undefined: /* cons */ return {a1: $0.a1, a2: {a1: '\n', a2: Data_String_n__3856_9432_unlinesx27($0.a2)}};
4135
+ case undefined: /* cons */ return {a1: $0.a1, a2: {a1: '\n', a2: Data_String_n__3856_9572_unlinesx27($0.a2)}};
4135
4136
  }
4136
4137
  }
4137
4138
 
4138
- /* Data.String.4465:10051:parsePosTrimmed */
4139
- function Data_String_n__4465_10051_parsePosTrimmed($0, $1, $2) {
4140
- return Data_String_with__parsePositivex2cparsePosTrimmed_10057(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));
4141
4142
  }
4142
4143
 
4143
4144
  /* Data.String.trim : String -> String */
@@ -4186,17 +4187,17 @@ function Data_String_replicate($0, $1) {
4186
4187
 
4187
4188
  /* Data.String.parsePositive : Num a => String -> Maybe a */
4188
4189
  function Data_String_parsePositive($0, $1) {
4189
- return Data_String_n__4465_10051_parsePosTrimmed($0, $1, Data_String_trim($1));
4190
+ return Data_String_n__4465_10191_parsePosTrimmed($0, $1, Data_String_trim($1));
4190
4191
  }
4191
4192
 
4192
4193
  /* Data.String.ltrim : String -> String */
4193
4194
  function Data_String_ltrim($0) {
4194
- return Data_String_with__ltrim_9724($0, Data_String_asList($0));
4195
+ return Data_String_with__ltrim_9864($0, Data_String_asList($0));
4195
4196
  }
4196
4197
 
4197
4198
  /* Data.String.lines' : List Char -> List (List Char) */
4198
4199
  function Data_String_linesx27($0) {
4199
- return Data_String_n__3989_9562_linesHelp($0, {h: 0}, $0);
4200
+ return Data_String_n__3989_9702_linesHelp($0, {h: 0}, $0);
4200
4201
  }
4201
4202
 
4202
4203
  /* Data.String.lines : String -> List String */
@@ -4216,7 +4217,7 @@ function Data_String_isPrefixOf($0, $1) {
4216
4217
 
4217
4218
  /* Data.String.fastUnlines : List String -> String */
4218
4219
  function Data_String_fastUnlines($0) {
4219
- return Prelude_Types_fastConcat(Data_String_n__3856_9432_unlinesx27($0));
4220
+ return Prelude_Types_fastConcat(Data_String_n__3856_9572_unlinesx27($0));
4220
4221
  }
4221
4222
 
4222
4223
  /* Data.String.break : (Char -> Bool) -> String -> (String, String) */
@@ -4232,7 +4233,7 @@ function Data_String_break$($0, $1) {
4232
4233
 
4233
4234
  /* Data.String.asList : (str : String) -> AsList str */
4234
4235
  function Data_String_asList($0) {
4235
- return Data_String_with__asList_9700($0, Data_String_strM($0));
4236
+ return Data_String_with__asList_9840($0, Data_String_strM($0));
4236
4237
  }
4237
4238
 
4238
4239
  /* Data.Fin.show */
@@ -4255,6 +4256,30 @@ function Data_Fin_natToFin($0, $1) {
4255
4256
  }
4256
4257
  }
4257
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
+
4258
4283
  /* Prelude.Uninhabited.void : (0 _ : Void) -> a */
4259
4284
  const Prelude_Uninhabited_void$ = __lazy(function () {
4260
4285
  _crashExp('No clauses in Prelude.Uninhabited.void');
@@ -5201,8 +5226,8 @@ function Prelude_Interfaces_x2ax3e($0, $1, $2) {
5201
5226
  return $4($2);
5202
5227
  }
5203
5228
 
5204
- /* Prelude.Show.2434:11912:asciiTab */
5205
- function Prelude_Show_n__2434_11912_asciiTab($0) {
5229
+ /* Prelude.Show.2434:11880:asciiTab */
5230
+ function Prelude_Show_n__2434_11880_asciiTab($0) {
5206
5231
  return {a1: 'NUL', a2: {a1: 'SOH', a2: {a1: 'STX', a2: {a1: 'ETX', a2: {a1: 'EOT', a2: {a1: 'ENQ', a2: {a1: 'ACK', a2: {a1: 'BEL', a2: {a1: 'BS', a2: {a1: 'HT', a2: {a1: 'LF', a2: {a1: 'VT', a2: {a1: 'FF', a2: {a1: 'CR', a2: {a1: 'SO', a2: {a1: 'SI', a2: {a1: 'DLE', a2: {a1: 'DC1', a2: {a1: 'DC2', a2: {a1: 'DC3', a2: {a1: 'DC4', a2: {a1: 'NAK', a2: {a1: 'SYN', a2: {a1: 'ETB', a2: {a1: 'CAN', a2: {a1: 'EM', a2: {a1: 'SUB', a2: {a1: 'ESC', a2: {a1: 'FS', a2: {a1: 'GS', a2: {a1: 'RS', a2: {a1: 'US', a2: {h: 0}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}};
5207
5232
  }
5208
5233
 
@@ -5246,7 +5271,7 @@ function Prelude_Show_show_Show_Bits32($0) {
5246
5271
 
5247
5272
  /* Prelude.Show.show */
5248
5273
  function Prelude_Show_show_Show_x28Listx20x24ax29($0, $1) {
5249
- return ('['+(Prelude_Show_n__3216_12633_showx27($0, $1, '', $1)+']'));
5274
+ return ('['+(Prelude_Show_n__3215_12601_showx27($0, $1, '', $1)+']'));
5250
5275
  }
5251
5276
 
5252
5277
  /* Prelude.Show.showPrec */
@@ -5330,7 +5355,7 @@ function Prelude_Show_showLitChar($0) {
5330
5355
  case '\u{5c}': return $23 => ('\u{5c}\u{5c}'+$23);
5331
5356
  default: {
5332
5357
  return $26 => {
5333
- const $27 = Prelude_Types_getAt(Prelude_Types_prim__integerToNat(BigInt($0.codePointAt(0))), Prelude_Show_n__2434_11912_asciiTab($0));
5358
+ const $27 = Prelude_Types_getAt(Prelude_Types_prim__integerToNat(BigInt($0.codePointAt(0))), Prelude_Show_n__2434_11880_asciiTab($0));
5334
5359
  switch($27.h) {
5335
5360
  case undefined: /* just */ return ('\u{5c}'+($27.a1+$26));
5336
5361
  case 0: /* nothing */ {
@@ -5532,30 +5557,6 @@ function Data_Nat_divx27($0, $1, $2) {
5532
5557
  }
5533
5558
  }
5534
5559
 
5535
- /* Data.Maybe.isNothing : Maybe a -> Bool */
5536
- function Data_Maybe_isNothing($0) {
5537
- switch($0.h) {
5538
- case 0: /* nothing */ return 1;
5539
- case undefined: /* just */ return 0;
5540
- }
5541
- }
5542
-
5543
- /* Data.Maybe.isJust : Maybe a -> Bool */
5544
- function Data_Maybe_isJust($0) {
5545
- switch($0.h) {
5546
- case 0: /* nothing */ return 0;
5547
- case undefined: /* just */ return 1;
5548
- }
5549
- }
5550
-
5551
- /* Data.Maybe.fromMaybe : Lazy a -> Maybe a -> a */
5552
- function Data_Maybe_fromMaybe($0, $1) {
5553
- switch($1.h) {
5554
- case 0: /* nothing */ return $0();
5555
- case undefined: /* just */ return $1.a1;
5556
- }
5557
- }
5558
-
5559
5560
  /* Data.List1.map */
5560
5561
  function Data_List1_map_Functor_List1($0, $1) {
5561
5562
  return {a1: $0($1.a1), a2: Prelude_Types_List_mapAppend({h: 0}, $0, $1.a2)};
@@ -5576,17 +5577,17 @@ function Data_List1_last($0) {
5576
5577
  return Data_List1_n__3044_2644_loop($0.a1, $0.a2, $0.a1, $0.a2);
5577
5578
  }
5578
5579
 
5579
- /* Data.List.7827:8418:split */
5580
- function Data_List_n__7827_8418_split($0, $1, $2) {
5581
- return Data_List_n__7827_8419_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);
5582
5583
  }
5583
5584
 
5584
- /* Data.List.8533:9106:go */
5585
- function Data_List_n__8533_9106_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) {
5586
5587
  switch($4.h) {
5587
5588
  case 0: /* nil */ return {a1: Data_List1_singleton($3), a2: {h: 0}};
5588
5589
  case undefined: /* cons */ {
5589
- const $a = Data_List_n__8533_9106_go($0, $1, $2, $4.a1, $4.a2);
5590
+ const $a = Data_List_n__8493_9196_go($0, $1, $2, $4.a1, $4.a2);
5590
5591
  switch($2($3)($4.a1)) {
5591
5592
  case 1: return {a1: {a1: $3, a2: $a.a1}, a2: $a.a2};
5592
5593
  case 0: return {a1: Data_List1_singleton($3), a2: {a1: $a.a1, a2: $a.a2}};
@@ -5676,13 +5677,13 @@ function Data_List_sortBy($0, $1) {
5676
5677
  switch($1.a2.h) {
5677
5678
  case 0: /* nil */ return {a1: $1.a1, a2: {h: 0}};
5678
5679
  default: {
5679
- const $6 = Data_List_n__7827_8418_split($1, $0, $1);
5680
+ const $6 = Data_List_n__7787_8508_split($1, $0, $1);
5680
5681
  return Data_List_mergeBy($0, Data_List_sortBy($0, $6.a1), Data_List_sortBy($0, $6.a2));
5681
5682
  }
5682
5683
  }
5683
5684
  }
5684
5685
  default: {
5685
- const $15 = Data_List_n__7827_8418_split($1, $0, $1);
5686
+ const $15 = Data_List_n__7787_8508_split($1, $0, $1);
5686
5687
  return Data_List_mergeBy($0, Data_List_sortBy($0, $15.a1), Data_List_sortBy($0, $15.a2));
5687
5688
  }
5688
5689
  }
@@ -5725,7 +5726,7 @@ function Data_List_partition($0, $1) {
5725
5726
 
5726
5727
  /* Data.List.nubBy : (a -> a -> Bool) -> List a -> List a */
5727
5728
  function Data_List_nubBy($0, $1) {
5728
- return Data_List_n__4928_5593_nubByx27({h: 0}, $0, $1);
5729
+ return Data_List_n__4934_5733_nubByx27({h: 0}, $0, $1);
5729
5730
  }
5730
5731
 
5731
5732
  /* Data.List.nub : Eq a => List a -> List a */
@@ -5802,7 +5803,7 @@ function Data_List_groupBy($0, $1) {
5802
5803
  switch($1.h) {
5803
5804
  case 0: /* nil */ return {h: 0};
5804
5805
  case undefined: /* cons */ {
5805
- const $3 = Data_List_n__8533_9106_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);
5806
5807
  return {a1: $3.a1, a2: $3.a2};
5807
5808
  }
5808
5809
  }
@@ -5977,7 +5978,7 @@ const ZshCompletion_script = __lazy(function () {
5977
5978
  });
5978
5979
 
5979
5980
  /* BashCompletion.case block in case block in unhashify */
5980
- function BashCompletion_case__casex20blockx20inx20unhashify_10889($0, $1, $2) {
5981
+ function BashCompletion_case__casex20blockx20inx20unhashify_13171($0, $1, $2) {
5981
5982
  switch($0) {
5982
5983
  case '': {
5983
5984
  switch($2.h) {
@@ -6000,7 +6001,7 @@ function BashCompletion_case__casex20blockx20inx20unhashify_10889($0, $1, $2) {
6000
6001
  }
6001
6002
 
6002
6003
  /* BashCompletion.case block in unhashify */
6003
- function BashCompletion_case__unhashify_10869($0, $1) {
6004
+ function BashCompletion_case__unhashify_13151($0, $1) {
6004
6005
  switch($0) {
6005
6006
  case '': {
6006
6007
  switch($1.h) {
@@ -6010,7 +6011,7 @@ function BashCompletion_case__unhashify_10869($0, $1) {
6010
6011
  case '#': return $1.a2;
6011
6012
  case '\u{5c}': {
6012
6013
  const $6 = ('\u{5c}'+$1.a2);
6013
- 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));
6014
6015
  }
6015
6016
  default: return $0;
6016
6017
  }
@@ -6022,7 +6023,7 @@ function BashCompletion_case__unhashify_10869($0, $1) {
6022
6023
  case '#': return $1.a2;
6023
6024
  case '\u{5c}': {
6024
6025
  const $11 = ('\u{5c}'+$1.a2);
6025
- 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));
6026
6027
  }
6027
6028
  default: return $0;
6028
6029
  }
@@ -6030,8 +6031,8 @@ function BashCompletion_case__unhashify_10869($0, $1) {
6030
6031
  }
6031
6032
  }
6032
6033
 
6033
- /* BashCompletion.5276:11675:slugsOrLoginsOrLabels */
6034
- function BashCompletion_n__5276_11675_slugsOrLoginsOrLabels($0, $1) {
6034
+ /* BashCompletion.5303:13978:slugsOrLoginsOrLabels */
6035
+ function BashCompletion_n__5303_13978_slugsOrLoginsOrLabels($0, $1) {
6035
6036
  switch(Data_String_isPrefixOf('+', $0)) {
6036
6037
  case 1: return Prelude_Types_List_mapAppend({h: 0}, $9 => ('+'+$9), $1.a12);
6037
6038
  case 0: {
@@ -6050,7 +6051,7 @@ function BashCompletion_unslugify($0) {
6050
6051
 
6051
6052
  /* BashCompletion.unhashify : String -> String */
6052
6053
  function BashCompletion_unhashify($0) {
6053
- return BashCompletion_case__unhashify_10869($0, Data_String_strM($0));
6054
+ return BashCompletion_case__unhashify_13151($0, Data_String_strM($0));
6054
6055
  }
6055
6056
 
6056
6057
  /* BashCompletion.slugify : String -> String */
@@ -6067,7 +6068,7 @@ const BashCompletion_script = __lazy(function () {
6067
6068
  function BashCompletion_optsForRequestCmd($0, $1) {
6068
6069
  switch(Data_String_isPrefixOf($1, '--dry')) {
6069
6070
  case 1: return {a1: '--dry', a2: {h: 0}};
6070
- case 0: return BashCompletion_n__5276_11675_slugsOrLoginsOrLabels($1, $0);
6071
+ case 0: return BashCompletion_n__5303_13978_slugsOrLoginsOrLabels($1, $0);
6071
6072
  }
6072
6073
  }
6073
6074
 
@@ -6279,7 +6280,12 @@ function BashCompletion_cmdOpts($0, $1, $2) {
6279
6280
  case 'quick': {
6280
6281
  switch(Data_String_isPrefixOf($1, '--')) {
6281
6282
  case 1: return {a1: {a1: '--bugfix', a2: {h: 0}}};
6282
- 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
+ }
6283
6289
  }
6284
6290
  }
6285
6291
  default: return {h: 0};
@@ -6295,7 +6301,12 @@ function BashCompletion_cmdOpts($0, $1, $2) {
6295
6301
  case 'quick': {
6296
6302
  switch(Data_String_isPrefixOf($1, '--')) {
6297
6303
  case 1: return {a1: {a1: '--bugfix', a2: {h: 0}}};
6298
- 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
+ }
6299
6310
  }
6300
6311
  }
6301
6312
  default: return {h: 0};
@@ -6308,7 +6319,12 @@ function BashCompletion_cmdOpts($0, $1, $2) {
6308
6319
  case 'quick': {
6309
6320
  switch(Data_String_isPrefixOf($1, '--')) {
6310
6321
  case 1: return {a1: {a1: '--bugfix', a2: {h: 0}}};
6311
- 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
+ }
6312
6328
  }
6313
6329
  }
6314
6330
  default: return {h: 0};
@@ -6454,7 +6470,7 @@ function BashCompletion_cmdOpts($0, $1, $2) {
6454
6470
  }
6455
6471
  default: {
6456
6472
  switch($2) {
6457
- 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())};
6458
6474
  default: {
6459
6475
  switch($0) {
6460
6476
  case 'sync': return {a1: {h: 0}};
@@ -6469,7 +6485,7 @@ function BashCompletion_cmdOpts($0, $1, $2) {
6469
6485
  case 'help': return {a1: BashCompletion_allRootCmds()};
6470
6486
  default: {
6471
6487
  switch($2) {
6472
- 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())};
6473
6489
  default: return {h: 0};
6474
6490
  }
6475
6491
  }
@@ -6477,7 +6493,7 @@ function BashCompletion_cmdOpts($0, $1, $2) {
6477
6493
  }
6478
6494
  default: {
6479
6495
  switch($2) {
6480
- 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())};
6481
6497
  default: return {h: 0};
6482
6498
  }
6483
6499
  }
@@ -6493,7 +6509,12 @@ function BashCompletion_cmdOpts($0, $1, $2) {
6493
6509
  case 'quick': {
6494
6510
  switch(Data_String_isPrefixOf($1, '--')) {
6495
6511
  case 1: return {a1: {a1: '--bugfix', a2: {h: 0}}};
6496
- 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
+ }
6497
6518
  }
6498
6519
  }
6499
6520
  default: return {h: 0};
@@ -6509,7 +6530,12 @@ function BashCompletion_cmdOpts($0, $1, $2) {
6509
6530
  case 'quick': {
6510
6531
  switch(Data_String_isPrefixOf($1, '--')) {
6511
6532
  case 1: return {a1: {a1: '--bugfix', a2: {h: 0}}};
6512
- 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
+ }
6513
6539
  }
6514
6540
  }
6515
6541
  default: return {h: 0};
@@ -6522,7 +6548,12 @@ function BashCompletion_cmdOpts($0, $1, $2) {
6522
6548
  case 'quick': {
6523
6549
  switch(Data_String_isPrefixOf($1, '--')) {
6524
6550
  case 1: return {a1: {a1: '--bugfix', a2: {h: 0}}};
6525
- 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
+ }
6526
6557
  }
6527
6558
  }
6528
6559
  default: return {h: 0};
@@ -6673,7 +6704,7 @@ const BashCompletion_allRootCmds = __lazy(function () {
6673
6704
  });
6674
6705
 
6675
6706
  /* FFI.Git.case block in unpushedCommits */
6676
- function FFI_Git_case__unpushedCommits_10643($0, $1, $2) {
6707
+ function FFI_Git_case__unpushedCommits_12925($0, $1, $2) {
6677
6708
  switch($1) {
6678
6709
  case '': {
6679
6710
  switch($2.h) {
@@ -6686,7 +6717,7 @@ function FFI_Git_case__unpushedCommits_10643($0, $1, $2) {
6686
6717
  }
6687
6718
 
6688
6719
  /* FFI.Git.case block in stagedChanges */
6689
- function FFI_Git_case__stagedChanges_10578($0, $1, $2) {
6720
+ function FFI_Git_case__stagedChanges_12860($0, $1, $2) {
6690
6721
  switch($1) {
6691
6722
  case '': {
6692
6723
  switch($2.h) {
@@ -6699,7 +6730,7 @@ function FFI_Git_case__stagedChanges_10578($0, $1, $2) {
6699
6730
  }
6700
6731
 
6701
6732
  /* FFI.Git.case block in uncommittedChanges */
6702
- function FFI_Git_case__uncommittedChanges_10513($0, $1, $2) {
6733
+ function FFI_Git_case__uncommittedChanges_12795($0, $1, $2) {
6703
6734
  switch($1) {
6704
6735
  case '': {
6705
6736
  switch($2.h) {
@@ -6712,7 +6743,7 @@ function FFI_Git_case__uncommittedChanges_10513($0, $1, $2) {
6712
6743
  }
6713
6744
 
6714
6745
  /* FFI.Git.case block in remoteTrackingBranch */
6715
- function FFI_Git_case__remoteTrackingBranch_10448($0, $1, $2) {
6746
+ function FFI_Git_case__remoteTrackingBranch_12730($0, $1, $2) {
6716
6747
  switch($1) {
6717
6748
  case '': {
6718
6749
  switch($2.h) {
@@ -6731,17 +6762,17 @@ function FFI_Git_userEmail($0, $1, $2) {
6731
6762
 
6732
6763
  /* FFI.Git.unpushedCommits : Git => Promise' (Maybe String) */
6733
6764
  function FFI_Git_unpushedCommits($0, $1, $2) {
6734
- 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);
6735
6766
  }
6736
6767
 
6737
6768
  /* FFI.Git.uncommittedChanges : Git => Promise' (Maybe String) */
6738
6769
  function FFI_Git_uncommittedChanges($0, $1, $2) {
6739
- 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);
6740
6771
  }
6741
6772
 
6742
6773
  /* FFI.Git.stagedChanges : Git => Promise' (Maybe String) */
6743
6774
  function FFI_Git_stagedChanges($0, $1, $2) {
6744
- 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);
6745
6776
  }
6746
6777
 
6747
6778
  /* FFI.Git.rootDir : Git => Promise' String */
@@ -6756,7 +6787,7 @@ function FFI_Git_remoteURI($0, $1, $2, $3) {
6756
6787
 
6757
6788
  /* FFI.Git.remoteTrackingBranch : Git => Promise' (Maybe String) */
6758
6789
  function FFI_Git_remoteTrackingBranch($0, $1, $2) {
6759
- 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);
6760
6791
  }
6761
6792
 
6762
6793
  /* FFI.Git.pushNewBranch : Git => String -> String -> Promise' () */
@@ -6926,13 +6957,13 @@ function Data_Promise_bind($0, $1, $2, $3) {
6926
6957
  return $4($3);
6927
6958
  }
6928
6959
 
6929
- /* Data.Config.9652:7042:personalAccessToken */
6930
- function Data_Config_n__9652_7042_personalAccessToken($0) {
6960
+ /* Data.Config.9658:7042:personalAccessToken */
6961
+ function Data_Config_n__9658_7042_personalAccessToken($0) {
6931
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);
6932
6963
  }
6933
6964
 
6934
- /* Data.Config.10208:7588:parseConfigJson */
6935
- 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) {
6936
6967
  switch($1.h) {
6937
6968
  case 6: /* JObject */ {
6938
6969
  const $20 = $21 => {
@@ -7000,7 +7031,7 @@ function Data_Config_ParseBranchStrategy_show_Show_ParseBranchStrategy($0) {
7000
7031
 
7001
7032
  /* Data.Config.show */
7002
7033
  function Data_Config_show_Show_Config($0) {
7003
- 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}}}}}}}}}}}}}}}});
7004
7035
  }
7005
7036
 
7006
7037
  /* Data.Config.CommentStrategy.show */
@@ -7087,7 +7118,7 @@ function Data_Config_propHelpx27($0) {
7087
7118
 
7088
7119
  /* Data.Config.parseConfig : Ephemeral -> String -> Either String Config */
7089
7120
  function Data_Config_parseConfig($0, $1) {
7090
- 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);
7091
7122
  }
7092
7123
 
7093
7124
  /* Data.Config.CommentStrategy.parseCommentConfig : String -> Maybe CommentStrategy */
@@ -7144,8 +7175,8 @@ function Data_Config_boolToCommentConfig($0) {
7144
7175
  }
7145
7176
  }
7146
7177
 
7147
- /* Language.JSON.Accessors.6297:18297:lookup' */
7148
- 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) {
7149
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));
7150
7181
  }
7151
7182
 
@@ -7201,7 +7232,7 @@ function Language_JSON_Accessors_lookupAll($0, $1) {
7201
7232
  switch($0.h) {
7202
7233
  case 0: /* nil */ return {h: 1 /* Right */, a1: {h: 0}};
7203
7234
  case undefined: /* cons */ {
7204
- 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);
7205
7236
  switch($4.h) {
7206
7237
  case 1: /* Right */ {
7207
7238
  const $b = Language_JSON_Accessors_lookupAll($0.a2, $1);
@@ -7252,7 +7283,7 @@ function Language_JSON_Accessors_access($0, $1, $2, $3) {
7252
7283
  }
7253
7284
 
7254
7285
  /* JSON.Parser.case block in case block in parseJSON */
7255
- function JSON_Parser_case__casex20blockx20inx20parseJSON_20997($0, $1, $2, $3) {
7286
+ function JSON_Parser_case__casex20blockx20inx20parseJSON_23279($0, $1, $2, $3) {
7256
7287
  switch($3.h) {
7257
7288
  case 1: /* Fail0 */ return {h: 0 /* Left */, a1: Text_ParseError_toParseError($1, $0, $3.a1)};
7258
7289
  case 0: /* Succ0 */ {
@@ -7280,9 +7311,9 @@ function JSON_Parser_case__casex20blockx20inx20parseJSON_20997($0, $1, $2, $3) {
7280
7311
  }
7281
7312
 
7282
7313
  /* JSON.Parser.case block in parseJSON */
7283
- function JSON_Parser_case__parseJSON_20977($0, $1, $2) {
7314
+ function JSON_Parser_case__parseJSON_23259($0, $1, $2) {
7284
7315
  switch($2.h) {
7285
- 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));
7286
7317
  case 0: /* Left */ return {h: 0 /* Left */, a1: Text_ParseError_toParseError($1, $0, $2.a1)};
7287
7318
  }
7288
7319
  }
@@ -7545,7 +7576,7 @@ function JSON_Parser_showImpl($0) {
7545
7576
 
7546
7577
  /* JSON.Parser.parseJSON : Origin -> String -> Either (ParseError Void) JSON */
7547
7578
  function JSON_Parser_parseJSON($0, $1) {
7548
- 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));
7549
7580
  }
7550
7581
 
7551
7582
  /* JSON.Parser.numberToken : SnocList Char -> JSToken */
@@ -8453,37 +8484,37 @@ function FFI_Term_termCols($0) {
8453
8484
  }
8454
8485
  }
8455
8486
 
8456
- /* FFI.GitHub.6760:18487:unexpectedPayload */
8457
- function FFI_GitHub_n__6760_18487_unexpectedPayload($0, $1) {
8487
+ /* FFI.GitHub.6769:18487:unexpectedPayload */
8488
+ function FFI_GitHub_n__6769_18487_unexpectedPayload($0, $1) {
8458
8489
  return FFI_GitHub_internalError(Prelude_Types_foldMap_Foldable_List(csegen_51()(), $9 => $9, {a1: 'Unexpected error JSON: ', a2: {a1: $0, a2: {h: 0}}}));
8459
8490
  }
8460
8491
 
8461
- /* FFI.GitHub.6760:18486:parse */
8462
- function FFI_GitHub_n__6760_18486_parse($0, $1) {
8492
+ /* FFI.GitHub.6769:18486:parse */
8493
+ function FFI_GitHub_n__6769_18486_parse($0, $1) {
8463
8494
  switch($1.h) {
8464
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}}))));
8465
8496
  default: return {h: 0 /* Left */, a1: 'Expected an Object containing error and status keys'};
8466
8497
  }
8467
8498
  }
8468
8499
 
8469
- /* FFI.GitHub.8194:19964:errString */
8470
- function FFI_GitHub_n__8194_19964_errString($0, $1) {
8500
+ /* FFI.GitHub.8254:20015:errString */
8501
+ function FFI_GitHub_n__8254_20015_errString($0, $1) {
8471
8502
  switch($1.h) {
8472
8503
  case 0: /* nothing */ return 'You can only use teams with repositories belonging to GitHub organizations';
8473
8504
  case undefined: /* just */ return $1.a1;
8474
8505
  }
8475
8506
  }
8476
8507
 
8477
- /* FFI.GitHub.7156:18911:errString */
8478
- function FFI_GitHub_n__7156_18911_errString($0, $1) {
8508
+ /* FFI.GitHub.7165:18911:errString */
8509
+ function FFI_GitHub_n__7165_18911_errString($0, $1) {
8479
8510
  switch($1.h) {
8480
8511
  case 0: /* nothing */ return 'You can only list teams for repositories belonging to GitHub organizations';
8481
8512
  case undefined: /* just */ return $1.a1;
8482
8513
  }
8483
8514
  }
8484
8515
 
8485
- /* FFI.GitHub.6893:18620:errMsg */
8486
- function FFI_GitHub_n__6893_18620_errMsg($0) {
8516
+ /* FFI.GitHub.6902:18620:errMsg */
8517
+ function FFI_GitHub_n__6902_18620_errMsg($0) {
8487
8518
  return Prelude_Types_either(() => csegen_318()(), () => csegen_318()(), $0);
8488
8519
  }
8489
8520
 
@@ -8527,7 +8558,7 @@ function FFI_GitHub_parseError($0) {
8527
8558
  let $2;
8528
8559
  switch($3.h) {
8529
8560
  case 0: /* Left */ {
8530
- $2 = {h: 0 /* Left */, a1: FFI_GitHub_n__6760_18487_unexpectedPayload($0, $3.a1)};
8561
+ $2 = {h: 0 /* Left */, a1: FFI_GitHub_n__6769_18487_unexpectedPayload($0, $3.a1)};
8531
8562
  break;
8532
8563
  }
8533
8564
  case 1: /* Right */ {
@@ -8536,7 +8567,7 @@ function FFI_GitHub_parseError($0) {
8536
8567
  }
8537
8568
  }
8538
8569
  const $c = json => {
8539
- const $d = FFI_GitHub_n__6760_18486_parse($0, json);
8570
+ const $d = FFI_GitHub_n__6769_18486_parse($0, json);
8540
8571
  switch($d.h) {
8541
8572
  case 0: /* Left */ return {h: 0 /* Left */, a1: FFI_GitHub_internalError($d.a1)};
8542
8573
  case 1: /* Right */ return {h: 1 /* Right */, a1: $d.a1};
@@ -8628,7 +8659,7 @@ function FFI_GitHub_internalError($0) {
8628
8659
 
8629
8660
  /* FFI.GitHub.ignoreStatus : Promise String a -> Promise String a */
8630
8661
  function FFI_GitHub_ignoreStatus($0, $1, $2) {
8631
- return Data_Promise_mapError($5 => FFI_GitHub_n__6893_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);
8632
8663
  }
8633
8664
 
8634
8665
  /* FFI.GitHub.getUser : Octokit => String -> Promise String User */
@@ -8651,14 +8682,19 @@ function FFI_GitHub_getPullRequestGraphQlId($0, $1, $2, $3, $4, $5) {
8651
8682
  return Data_Promise_mapSnd_Bifunctor_Promise($8 => $8, $a => $b => FFI_GitHub_ignoreStatus($e => $f => FFI_promiseIO($12 => $13 => $14 => FFI_GitHub_prim__getPullRequestGraphQlId($0, $1, $2, $3, $12, $13, $14), $e, $f), $a, $b), $4, $5);
8652
8683
  }
8653
8684
 
8685
+ /* FFI.GitHub.getIssue : Octokit => String -> String -> String -> Promise String Issue */
8686
+ function FFI_GitHub_getIssue($0, $1, $2, $3) {
8687
+ return FFI_GitHub_parsePrimResult($6 => Data_Issue_parseIssueString($6), $a => $b => $c => FFI_GitHub_prim__getIssue($0, $1, $2, $3, $a, $b, $c));
8688
+ }
8689
+
8654
8690
  /* FFI.GitHub.forceListTeams : Octokit => String -> Promise' (List String) */
8655
8691
  function FFI_GitHub_forceListTeams($0, $1, $2, $3) {
8656
- return Data_Promise_mapError($6 => FFI_GitHub_n__7156_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);
8657
8693
  }
8658
8694
 
8659
8695
  /* FFI.GitHub.forceListTeamMembers : Octokit => String -> String -> Promise' (List String) */
8660
8696
  function FFI_GitHub_forceListTeamMembers($0, $1, $2, $3, $4) {
8661
- return Data_Promise_mapError($7 => FFI_GitHub_n__8194_19964_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);
8662
8698
  }
8663
8699
 
8664
8700
  /* FFI.GitHub.createPR : Octokit => {default False _ : Bool} ->
@@ -8734,8 +8770,8 @@ function Data_Review_isAuthor($0, $1) {
8734
8770
  return Prelude_EqOrd_x3dx3d_Eq_String($1.a2, $0);
8735
8771
  }
8736
8772
 
8737
- /* Data.Date.4986:11759:parseNat */
8738
- function Data_Date_n__4986_11759_parseNat($0, $1, $2) {
8773
+ /* Data.Date.4986:11849:parseNat */
8774
+ function Data_Date_n__4986_11849_parseNat($0, $1, $2) {
8739
8775
  switch($2) {
8740
8776
  case '0': return {a1: 0n};
8741
8777
  case '1': return {a1: 1n};
@@ -8751,12 +8787,12 @@ function Data_Date_n__4986_11759_parseNat($0, $1, $2) {
8751
8787
  }
8752
8788
  }
8753
8789
 
8754
- /* Data.Date.5103:11877:guardSuccess */
8755
- function Data_Date_n__5103_11877_guardSuccess($0) {
8790
+ /* Data.Date.5103:11967:guardSuccess */
8791
+ function Data_Date_n__5103_11967_guardSuccess($0) {
8756
8792
  switch($0.h) {
8757
8793
  case undefined: /* cons */ {
8758
8794
  switch($0.a1.h) {
8759
- case 3: /* 5103:11866:Day */ {
8795
+ case 3: /* 5103:11956:Day */ {
8760
8796
  switch($0.a2.h) {
8761
8797
  case undefined: /* cons */ {
8762
8798
  switch($0.a2.a2.h) {
@@ -8774,28 +8810,28 @@ function Data_Date_n__5103_11877_guardSuccess($0) {
8774
8810
  }
8775
8811
  }
8776
8812
 
8777
- /* Data.Date.5103:11876:go */
8778
- function Data_Date_n__5103_11876_go($0, $1) {
8813
+ /* Data.Date.5103:11966:go */
8814
+ function Data_Date_n__5103_11966_go($0, $1) {
8779
8815
  switch($0.a1.h) {
8780
- case 4: /* 5103:11867:Fail */ return {a1: {h: 4 /* 5103:11867:Fail */}, a2: undefined};
8781
- case 0: /* 5103:11874:Start */ {
8816
+ case 4: /* 5103:11957:Fail */ return {a1: {h: 4 /* 5103:11957:Fail */}, a2: undefined};
8817
+ case 0: /* 5103:11964:Start */ {
8782
8818
  switch(Prelude_Types_isDigit($1)) {
8783
- case 1: return {a1: {h: 1 /* 5103:11869:P */, a1: 0}, a2: {a1: $1, a2: {h: 0}}};
8784
- case 0: return {a1: {h: 4 /* 5103:11867: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};
8785
8821
  }
8786
8822
  }
8787
- case 1: /* 5103:11869:P */ {
8823
+ case 1: /* 5103:11959:P */ {
8788
8824
  switch($0.a1.a1) {
8789
8825
  case 0: {
8790
8826
  switch($1) {
8791
8827
  case '-': {
8792
8828
  const $12 = Data_Date_parsePositiveReversed($0.a2);
8793
8829
  switch($12.h) {
8794
- case 0: /* nothing */ return {a1: {h: 4 /* 5103:11867:Fail */}, a2: undefined};
8795
- case undefined: /* just */ return {a1: {h: 2 /* 5103:11873: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};
8796
8832
  }
8797
8833
  }
8798
- default: return {a1: {h: 1 /* 5103:11869: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}};
8799
8835
  }
8800
8836
  }
8801
8837
  case 1: {
@@ -8803,32 +8839,32 @@ function Data_Date_n__5103_11876_go($0, $1) {
8803
8839
  case '-': {
8804
8840
  const $21 = Data_Date_parsePositiveReversed($0.a2.a2);
8805
8841
  switch($21.h) {
8806
- case 0: /* nothing */ return {a1: {h: 4 /* 5103:11867:Fail */}, a2: undefined};
8807
- case undefined: /* just */ return {a1: {h: 2 /* 5103:11873: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}};
8808
8844
  }
8809
8845
  }
8810
- default: return {a1: {h: 1 /* 5103:11869: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}}};
8811
8847
  }
8812
8848
  }
8813
8849
  }
8814
8850
  }
8815
- case 2: /* 5103:11873:S */ {
8851
+ case 2: /* 5103:11963:S */ {
8816
8852
  switch($0.a1.a1) {
8817
8853
  case 0: {
8818
8854
  switch(Prelude_Types_isDigit($1)) {
8819
- case 1: return {a1: {h: 1 /* 5103:11869:P */, a1: 1}, a2: {a1: $0.a2, a2: {a1: $1, a2: {h: 0}}}};
8820
- case 0: return {a1: {h: 4 /* 5103:11867: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};
8821
8857
  }
8822
8858
  }
8823
8859
  case 1: {
8824
8860
  switch(Prelude_Types_isDigit($1)) {
8825
- case 1: return {a1: {h: 3 /* 5103:11866:Day */}, a2: {a1: $0.a2.a1, a2: {a1: $0.a2.a2, a2: {a1: $1, a2: {h: 0}}}}};
8826
- case 0: return {a1: {h: 4 /* 5103:11867: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};
8827
8863
  }
8828
8864
  }
8829
8865
  }
8830
8866
  }
8831
- case 3: /* 5103:11866:Day */ return {a1: {h: 3 /* 5103:11866: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}}}};
8832
8868
  }
8833
8869
  }
8834
8870
 
@@ -8908,7 +8944,7 @@ function Data_Date_showYearAndMonth($0) {
8908
8944
  function Data_Date_parsePositiveReversed($0) {
8909
8945
  switch($0.h) {
8910
8946
  case 0: /* nil */ return {a1: 0n};
8911
- case undefined: /* cons */ return Prelude_Types_x3ex3ex3d_Monad_Maybe(Data_Date_n__4986_11759_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))})));
8912
8948
  }
8913
8949
  }
8914
8950
 
@@ -8921,7 +8957,7 @@ function Data_Date_parseDateTimeString($0) {
8921
8957
 
8922
8958
  /* Data.Date.parseDateString : String -> Maybe Date */
8923
8959
  function Data_Date_parseDateString($0) {
8924
- return Data_Date_n__5103_11877_guardSuccess(Prelude_Types_foldl_Foldable_List($5 => $6 => Data_Date_n__5103_11876_go($5, $6), {a1: {h: 0 /* 5103:11874: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)));
8925
8961
  }
8926
8962
 
8927
8963
  /* Data.Date.pad : Nat -> String */
@@ -8947,7 +8983,31 @@ function Data_Issue_parseIssueString($0) {
8947
8983
 
8948
8984
  /* Data.Issue.parseIssue : JSON -> Either String Issue */
8949
8985
  function Data_Issue_parseIssue($0) {
8950
- 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: 'author', a2: {a1: 'created_at', a2: {a1: 'assignee', a2: {h: 0}}}}}}, issue), $16 => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_integer($16.a1), number => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_string($16.a2.a1), title => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_string($16.a2.a2.a1), author => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Prelude_Basics_flip(csegen_223(), $32 => Data_Issue_parseDateTime($32), Language_JSON_Accessors_string($16.a2.a2.a2.a1)), createdAt => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_optional($3d => Language_JSON_Accessors_string($3d), $16.a2.a2.a2.a2.a1), assignee => ({h: 1 /* Right */, a1: {a1: number, a2: title, a3: createdAt, a4: author, a5: 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);
8951
9011
  }
8952
9012
 
8953
9013
  /* Data.Issue.parseDateTime : String -> Either String Date */
@@ -9008,7 +9068,7 @@ function Data_PullRequest_parseState($0, $1) {
9008
9068
 
9009
9069
  /* Data.PullRequest.parsePullRequestsString : String -> Either String (List PullRequest) */
9010
9070
  function Data_PullRequest_parsePullRequestsString($0) {
9011
- return Prelude_Interfaces_x3ex3dx3e(csegen_227(), csegen_228(), csegen_345(), $0);
9071
+ return Prelude_Interfaces_x3ex3dx3e(csegen_227(), csegen_228(), csegen_346(), $0);
9012
9072
  }
9013
9073
 
9014
9074
  /* Data.PullRequest.parsePullRequestString : String -> Either String PullRequest */
@@ -9101,47 +9161,47 @@ function Config_case__parseGitHubURIx2cparseSuffix_1582($0, $1, $2) {
9101
9161
  default: return {h: 0};
9102
9162
  }
9103
9163
  };
9104
- return Prelude_Types_x3ex3ex3d_Monad_Maybe({a1: Data_String_split(csegen_358(), $2.a1)}, $b);
9164
+ return Prelude_Types_x3ex3ex3d_Monad_Maybe({a1: Data_String_split(csegen_359(), $2.a1)}, $b);
9105
9165
  }
9106
9166
 
9107
- /* Config.9586:2540:themePrompt */
9108
- function Config_n__9586_2540_themePrompt($0, $1, $2, $3, $4, $5) {
9109
- const $6 = Config_n__9586_2536_enterForDefaultStr($0, $1, $2, $3, $4, 'dark');
9110
- 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__9586_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)))));
9111
9171
  }
9112
9172
 
9113
- /* Config.9586:2539:repo */
9114
- function Config_n__9586_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) {
9115
9175
  return Prelude_Types_map_Functor_Maybe(csegen_318()(), $5);
9116
9176
  }
9117
9177
 
9118
- /* Config.8653:1562:parseSuffix */
9119
- function Config_n__8653_1562_parseSuffix($0, $1) {
9178
+ /* Config.8666:1562:parseSuffix */
9179
+ function Config_n__8666_1562_parseSuffix($0, $1) {
9120
9180
  return Config_case__parseGitHubURIx2cparseSuffix_1582($0, $1, Data_String_break$($8 => Prelude_EqOrd_x3dx3d_Eq_Char($8, '.'), $1));
9121
9181
  }
9122
9182
 
9123
- /* Config.8653:1561:parseSSH */
9124
- function Config_n__8653_1561_parseSSH($0, $1) {
9125
- return Prelude_Interfaces_x3ex3dx3e(csegen_14(), $6 => Config_dropPrefixx27('git@github.com:', $6), $b => Config_n__8653_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);
9126
9186
  }
9127
9187
 
9128
- /* Config.8653:1560:parseHTTPS */
9129
- function Config_n__8653_1560_parseHTTPS($0, $1) {
9130
- return Prelude_Interfaces_x3ex3dx3e(csegen_14(), $6 => Config_dropPrefixx27('https://github/com/', $6), $b => Config_n__8653_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);
9131
9191
  }
9132
9192
 
9133
- /* Config.9586:2538:org */
9134
- function Config_n__9586_2538_org($0, $1, $2, $3, $4, $5) {
9135
- return Prelude_Types_map_Functor_Maybe(csegen_364()(), $5);
9193
+ /* Config.9599:2538:org */
9194
+ function Config_n__9599_2538_org($0, $1, $2, $3, $4, $5) {
9195
+ return Prelude_Types_map_Functor_Maybe(csegen_365()(), $5);
9136
9196
  }
9137
9197
 
9138
- /* Config.8364:1281:oneDayAgo */
9139
- function Config_n__8364_1281_oneDayAgo($0, $1, $2) {
9198
+ /* Config.8377:1281:oneDayAgo */
9199
+ function Config_n__8377_1281_oneDayAgo($0, $1, $2) {
9140
9200
  return $2.a1.a2(undefined)(undefined)(System_time($2))(now => $2.a1.a1.a2(undefined)(Number(_truncUBigInt32((now-86400n)))));
9141
9201
  }
9142
9202
 
9143
- /* Config.9586:2537:offerRetry */
9144
- function Config_n__9586_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) {
9145
9205
  const $13 = $14 => {
9146
9206
  switch($14.h) {
9147
9207
  case 0: /* nothing */ {
@@ -9162,34 +9222,34 @@ function Config_n__9586_2537_offerRetry($0, $1, $2, $3, $4, $5, $6, $7, $8, $9)
9162
9222
  return $5.a1.a2(undefined)(undefined)($9)($13);
9163
9223
  }
9164
9224
 
9165
- /* Config.9489:2423:help */
9166
- function Config_n__9489_2423_help($0, $1) {
9225
+ /* Config.9502:2423:help */
9226
+ function Config_n__9502_2423_help($0, $1) {
9167
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}}})));
9168
9228
  }
9169
9229
 
9170
- /* Config.9586:2536:enterForDefaultStr */
9171
- function Config_n__9586_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) {
9172
9232
  return Prelude_Types_foldMap_Foldable_List(csegen_51()(), $b => $b, {a1: ' (ENTER for default: ', a2: {a1: $5, a2: {a1: ')', a2: {h: 0}}}});
9173
9233
  }
9174
9234
 
9175
- /* Config.8606:1513:drop' */
9176
- function Config_n__8606_1513_dropx27($0, $1) {
9235
+ /* Config.8619:1513:drop' */
9236
+ function Config_n__8619_1513_dropx27($0, $1) {
9177
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));
9178
9238
  }
9179
9239
 
9180
- /* Config.9586:2535:defaultStr */
9181
- function Config_n__9586_2535_defaultStr($0, $1, $2, $3, $4, $5, $6) {
9182
- return Data_Maybe_fromMaybe(() => '', Prelude_Types_map_Functor_Maybe($c => Config_n__9586_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));
9183
9243
  }
9184
9244
 
9185
- /* Config.9586:2534:commentConfigPrompt */
9186
- function Config_n__9586_2534_commentConfigPrompt($0, $1, $2, $3, $4, $5) {
9187
- const $6 = Config_n__9586_2536_enterForDefaultStr($0, $1, $2, $3, $4, 'name');
9188
- 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__9586_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)))));
9189
9249
  }
9190
9250
 
9191
- /* Config.8495:1406:checkRequestSettings */
9192
- function Config_n__8495_1406_checkRequestSettings($0, $1) {
9251
+ /* Config.8508:1406:checkRequestSettings */
9252
+ function Config_n__8508_1406_checkRequestSettings($0, $1) {
9193
9253
  let $2;
9194
9254
  switch($1.a6) {
9195
9255
  case 1: {
@@ -9207,10 +9267,10 @@ function Config_n__8495_1406_checkRequestSettings($0, $1) {
9207
9267
  }
9208
9268
  }
9209
9269
 
9210
- /* Config.9586:2533:branchParsingPrompt */
9211
- function Config_n__9586_2533_branchParsingPrompt($0, $1, $2, $3, $4, $5) {
9212
- const $6 = Config_n__9586_2536_enterForDefaultStr($0, $1, $2, $3, $4, 'none');
9213
- 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__9586_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)))));
9214
9274
  }
9215
9275
 
9216
9276
  /* Config.show */
@@ -9245,7 +9305,7 @@ function Config_syncIfOld($0, $1, $2, $3) {
9245
9305
  case 0: return $1b => Data_Promise_pure_Applicative_x28Promisex20x24ex29($1, $e, $1b);
9246
9306
  }
9247
9307
  };
9248
- return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(Config_n__8364_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);
9249
9309
  }
9250
9310
 
9251
9311
  /* Config.syncConfig : Config => Octokit => Bool -> Promise' Config */
@@ -9257,7 +9317,7 @@ function Config_syncConfig($0, $1, $2, $3, $4) {
9257
9317
  const $41 = {a1: updatedAt, a2: $0.a2, a3: $0.a3, a4: $0.a4, a5: $0.a5, a6: $0.a6, a7: $0.a7, a8: $0.a8, a9: $0.a9, a10: teamSlugs, a11: labelNames, a12: orgMembers, a13: $0.a13, a14: $0.a14, a15: $0.a15, a16: $0.a16};
9258
9318
  return $53 => $54 => Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($57 => $58 => Data_Promise_map_Functor_x28Promisex20x24ex29($5b => undefined, $5d => $5e => Config_writeConfig($41, $5d, $5e), $57, $58), $66 => $67 => $68 => Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(Prelude_Interfaces_when(csegen_66()(), $2, () => $71 => $72 => Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($75 => $76 => $77 => Data_Promise_liftIO_HasIO_x28Promisex20x24ex29($7a => Prelude_IO_prim__putStr('Your updated configuration is:\n', $7a), $75, $76, $77), $82 => $83 => $84 => $85 => Data_Promise_liftIO_HasIO_x28Promisex20x24ex29($88 => Prelude_IO_prim__putStr((Data_Config_show_Show_Config($41)+'\n'), $88), $83, $84, $85), $71, $72)), $96 => $97 => $98 => Data_Promise_pure_Applicative_x28Promisex20x24ex29($41, $97, $98), $67, $68), $53, $54);
9259
9319
  };
9260
- return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(csegen_377()(), $40, $3a, $3b);
9320
+ return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(csegen_378()(), $40, $3a, $3b);
9261
9321
  };
9262
9322
  return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($2f => $30 => FFI_GitHub_listRepoLabels($1, $0.a2, $0.a3, $2f, $30), $39, $2b, $2c);
9263
9323
  };
@@ -9268,7 +9328,7 @@ function Config_syncConfig($0, $1, $2, $3, $4) {
9268
9328
 
9269
9329
  /* Config.settablePropsWithHelp : Config => String */
9270
9330
  function Config_settablePropsWithHelp($0) {
9271
- return Util_renderString($0, Text_PrettyPrint_Prettyprinter_Doc_vsep(Prelude_Types_List_mapAppend({h: 0}, $9 => Config_n__9489_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())));
9272
9332
  }
9273
9333
 
9274
9334
  /* Config.setConfig : Config => String -> String -> Promise' Config */
@@ -9280,14 +9340,14 @@ function Config_setConfig($0, $1, $2) {
9280
9340
  function Config_propSetter($0, $1) {
9281
9341
  return $2 => {
9282
9342
  switch($0) {
9283
- case 0: return Config_update(csegen_382(), $8 => Config_parseBool($8), b => $c => ({a1: $c.a1, a2: $c.a2, a3: $c.a3, a4: $c.a4, a5: $c.a5, a6: b, a7: $c.a7, a8: $c.a8, a9: $c.a9, a10: $c.a10, a11: $c.a11, a12: $c.a12, a13: $c.a13, a14: $c.a14, a15: $c.a15, a16: $c.a16}), $1, $2);
9284
- case 1: return Config_update(csegen_382(), $24 => Config_parseBool($24), b => $28 => ({a1: $28.a1, a2: $28.a2, a3: $28.a3, a4: $28.a4, a5: $28.a5, a6: $28.a6, a7: b, a8: $28.a8, a9: $28.a9, a10: $28.a10, a11: $28.a11, a12: $28.a12, a13: $28.a13, a14: $28.a14, a15: $28.a15, a16: $28.a16}), $1, $2);
9285
- case 2: return Config_update(csegen_382(), $40 => Data_Config_CommentStrategy_parseCommentConfig(Data_String_toLower($40)), b => $46 => ({a1: $46.a1, a2: $46.a2, a3: $46.a3, a4: $46.a4, a5: $46.a5, a6: $46.a6, a7: $46.a7, a8: b, a9: $46.a9, a10: $46.a10, a11: $46.a11, a12: $46.a12, a13: $46.a13, a14: $46.a14, a15: $46.a15, a16: $46.a16}), $1, $2);
9286
- case 3: return Config_update(csegen_382(), $5e => Data_Config_ParseBranchStrategy_parseBranchConfig(Data_String_toLower($5e)), s => $64 => ({a1: $64.a1, a2: $64.a2, a3: $64.a3, a4: $64.a4, a5: $64.a5, a6: $64.a6, a7: $64.a7, a8: $64.a8, a9: s, a10: $64.a10, a11: $64.a11, a12: $64.a12, a13: $64.a13, a14: $64.a14, a15: $64.a15, a16: $64.a16}), $1, $2);
9287
- case 4: return Config_update(csegen_382(), $7c => ({a1: $7c}), s => $7f => ({a1: $7f.a1, a2: $7f.a2, a3: $7f.a3, a4: s, a5: $7f.a5, a6: $7f.a6, a7: $7f.a7, a8: $7f.a8, a9: $7f.a9, a10: $7f.a10, a11: $7f.a11, a12: $7f.a12, a13: $7f.a13, a14: $7f.a14, a15: $7f.a15, a16: $7f.a16}), $1, $2);
9288
- case 5: return Config_update(csegen_382(), $97 => ({a1: $97}), s => $9a => ({a1: $9a.a1, a2: $9a.a2, a3: $9a.a3, a4: $9a.a4, a5: s, a6: $9a.a6, a7: $9a.a7, a8: $9a.a8, a9: $9a.a9, a10: $9a.a10, a11: $9a.a11, a12: $9a.a12, a13: $9a.a13, a14: $9a.a14, a15: $9a.a15, a16: $9a.a16}), $1, $2);
9289
- case 6: return Config_update(csegen_382(), $b2 => Data_Theme_parseString($b2), t => $b6 => ({a1: $b6.a1, a2: $b6.a2, a3: $b6.a3, a4: $b6.a4, a5: $b6.a5, a6: $b6.a6, a7: $b6.a7, a8: $b6.a8, a9: $b6.a9, a10: $b6.a10, a11: $b6.a11, a12: $b6.a12, a13: $b6.a13, a14: $b6.a14, a15: t, a16: $b6.a16}), $1, $2);
9290
- case 7: return Config_update(csegen_382(), $ce => ({a1: $ce}), s => $d1 => ({a1: $d1.a1, a2: $d1.a2, a3: $d1.a3, a4: $d1.a4, a5: $d1.a5, a6: $d1.a6, a7: $d1.a7, a8: $d1.a8, a9: $d1.a9, a10: $d1.a10, a11: $d1.a11, a12: $d1.a12, a13: $d1.a13, a14: {a1: s}, a15: $d1.a15, a16: $d1.a16}), $1, $2);
9343
+ case 0: return Config_update(csegen_383(), $8 => Config_parseBool($8), b => $c => ({a1: $c.a1, a2: $c.a2, a3: $c.a3, a4: $c.a4, a5: $c.a5, a6: b, a7: $c.a7, a8: $c.a8, a9: $c.a9, a10: $c.a10, a11: $c.a11, a12: $c.a12, a13: $c.a13, a14: $c.a14, a15: $c.a15, a16: $c.a16}), $1, $2);
9344
+ case 1: return Config_update(csegen_383(), $24 => Config_parseBool($24), b => $28 => ({a1: $28.a1, a2: $28.a2, a3: $28.a3, a4: $28.a4, a5: $28.a5, a6: $28.a6, a7: b, a8: $28.a8, a9: $28.a9, a10: $28.a10, a11: $28.a11, a12: $28.a12, a13: $28.a13, a14: $28.a14, a15: $28.a15, a16: $28.a16}), $1, $2);
9345
+ case 2: return Config_update(csegen_383(), $40 => Data_Config_CommentStrategy_parseCommentConfig(Data_String_toLower($40)), b => $46 => ({a1: $46.a1, a2: $46.a2, a3: $46.a3, a4: $46.a4, a5: $46.a5, a6: $46.a6, a7: $46.a7, a8: b, a9: $46.a9, a10: $46.a10, a11: $46.a11, a12: $46.a12, a13: $46.a13, a14: $46.a14, a15: $46.a15, a16: $46.a16}), $1, $2);
9346
+ case 3: return Config_update(csegen_383(), $5e => Data_Config_ParseBranchStrategy_parseBranchConfig(Data_String_toLower($5e)), s => $64 => ({a1: $64.a1, a2: $64.a2, a3: $64.a3, a4: $64.a4, a5: $64.a5, a6: $64.a6, a7: $64.a7, a8: $64.a8, a9: s, a10: $64.a10, a11: $64.a11, a12: $64.a12, a13: $64.a13, a14: $64.a14, a15: $64.a15, a16: $64.a16}), $1, $2);
9347
+ case 4: return Config_update(csegen_383(), $7c => ({a1: $7c}), s => $7f => ({a1: $7f.a1, a2: $7f.a2, a3: $7f.a3, a4: s, a5: $7f.a5, a6: $7f.a6, a7: $7f.a7, a8: $7f.a8, a9: $7f.a9, a10: $7f.a10, a11: $7f.a11, a12: $7f.a12, a13: $7f.a13, a14: $7f.a14, a15: $7f.a15, a16: $7f.a16}), $1, $2);
9348
+ case 5: return Config_update(csegen_383(), $97 => ({a1: $97}), s => $9a => ({a1: $9a.a1, a2: $9a.a2, a3: $9a.a3, a4: $9a.a4, a5: s, a6: $9a.a6, a7: $9a.a7, a8: $9a.a8, a9: $9a.a9, a10: $9a.a10, a11: $9a.a11, a12: $9a.a12, a13: $9a.a13, a14: $9a.a14, a15: $9a.a15, a16: $9a.a16}), $1, $2);
9349
+ case 6: return Config_update(csegen_383(), $b2 => Data_Theme_parseString($b2), t => $b6 => ({a1: $b6.a1, a2: $b6.a2, a3: $b6.a3, a4: $b6.a4, a5: $b6.a5, a6: $b6.a6, a7: $b6.a7, a8: $b6.a8, a9: $b6.a9, a10: $b6.a10, a11: $b6.a11, a12: $b6.a12, a13: $b6.a13, a14: $b6.a14, a15: t, a16: $b6.a16}), $1, $2);
9350
+ case 7: return Config_update(csegen_383(), $ce => ({a1: $ce}), s => $d1 => ({a1: $d1.a1, a2: $d1.a2, a3: $d1.a3, a4: $d1.a4, a5: $d1.a5, a6: $d1.a6, a7: $d1.a7, a8: $d1.a8, a9: $d1.a9, a10: $d1.a10, a11: $d1.a11, a12: $d1.a12, a13: $d1.a13, a14: {a1: s}, a15: $d1.a15, a16: $d1.a16}), $1, $2);
9291
9351
  }
9292
9352
  };
9293
9353
  }
@@ -9317,7 +9377,7 @@ function Config_preferOriginRemote($0) {
9317
9377
 
9318
9378
  /* Config.parseGitHubURI : String -> Maybe GitRemote */
9319
9379
  function Config_parseGitHubURI($0) {
9320
- return Prelude_Types_x3cx7cx3e_Alternative_Maybe(Config_n__8653_1560_parseHTTPS($0, $0), () => Config_n__8653_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));
9321
9381
  }
9322
9382
 
9323
9383
  /* Config.parseBool : String -> Maybe Bool */
@@ -9428,14 +9488,14 @@ function Config_findConfig($0, $1, $2) {
9428
9488
 
9429
9489
  /* Config.dropPrefix' : String -> String -> Maybe String */
9430
9490
  function Config_dropPrefixx27($0, $1) {
9431
- return Prelude_Types_map_Functor_Maybe($4 => Prelude_Types_fastPack($4), Config_n__8606_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)));
9432
9492
  }
9433
9493
 
9434
9494
  /* Config.createConfig : Git => Maybe String -> Bool -> Nat -> Maybe String -> Promise' Config */
9435
9495
  function Config_createConfig($0, $1, $2, $3, $4, $5, $6) {
9436
9496
  const $25 = $26 => $27 => $28 => {
9437
9497
  const $2d = $2e => {
9438
- const $30 = Config_n__9586_2536_enterForDefaultStr($0, $4, $3, $2, $1, 'unset');
9498
+ const $30 = Config_n__9599_2536_enterForDefaultStr($0, $4, $3, $2, $1, 'unset');
9439
9499
  const $2f = () => $38 => $39 => {
9440
9500
  const $63 = $64 => $65 => $66 => {
9441
9501
  const $68 = $69 => $6a => {
@@ -9445,7 +9505,7 @@ function Config_createConfig($0, $1, $2, $3, $4, $5, $6) {
9445
9505
  default: return {a1: Data_String_trim($6d)};
9446
9506
  }
9447
9507
  };
9448
- return Data_Promise_map_Functor_x28Promisex20x24ex29($6c, csegen_405()(), $69, $6a);
9508
+ return Data_Promise_map_Functor_x28Promisex20x24ex29($6c, csegen_406()(), $69, $6a);
9449
9509
  };
9450
9510
  const $79 = configPAT => $7a => $7b => {
9451
9511
  const $87 = $88 => $89 => $8a => {
@@ -9454,17 +9514,17 @@ function Config_createConfig($0, $1, $2, $3, $4, $5, $6) {
9454
9514
  const $9e = remoteGuess => $9f => $a0 => {
9455
9515
  const $bd = defaultOrgAndRepo => $be => $bf => {
9456
9516
  const $c4 = $c5 => {
9457
- const $c7 = Config_n__9586_2535_defaultStr($0, $4, $3, $2, $1, csegen_364()(), defaultOrgAndRepo);
9517
+ const $c7 = Config_n__9599_2535_defaultStr($0, $4, $3, $2, $1, csegen_365()(), defaultOrgAndRepo);
9458
9518
  const $c6 = () => $d2 => $d3 => {
9459
9519
  const $f1 = $f2 => $f3 => $f4 => {
9460
9520
  const $10d = org => $10e => $10f => {
9461
9521
  const $114 = $115 => {
9462
- const $117 = Config_n__9586_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);
9463
9523
  const $116 = () => $122 => $123 => {
9464
9524
  const $141 = $142 => $143 => $144 => {
9465
9525
  const $15d = repo => $15e => $15f => {
9466
9526
  const $164 = $165 => {
9467
- const $167 = Config_n__9586_2536_enterForDefaultStr($0, $4, $3, $2, $1, remoteGuess);
9527
+ const $167 = Config_n__9599_2536_enterForDefaultStr($0, $4, $3, $2, $1, remoteGuess);
9468
9528
  const $166 = () => $16f => $170 => {
9469
9529
  const $18e = $18f => $190 => $191 => {
9470
9530
  const $1a4 = defaultRemote => $1a5 => $1a6 => {
@@ -9498,7 +9558,7 @@ function Config_createConfig($0, $1, $2, $3, $4, $5, $6) {
9498
9558
  return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($261 => $262 => Config_nonOrgFallback(() => ({h: 0}), $266 => $267 => FFI_GitHub_listTeams(_, org, $266, $267), $261, $262), $26f, $25d, $25e);
9499
9559
  };
9500
9560
  };
9501
- return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(csegen_377()(), $24b, $245, $246);
9561
+ return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(csegen_378()(), $24b, $245, $246);
9502
9562
  };
9503
9563
  return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($23c => $23d => FFI_GitHub_getRepoDefaultBranch(_, org, repo, $23c, $23d), $244, $238, $239);
9504
9564
  };
@@ -9506,53 +9566,53 @@ function Config_createConfig($0, $1, $2, $3, $4, $5, $6) {
9506
9566
  };
9507
9567
  return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($219 => $21a => $21b => Data_Promise_liftIO_HasIO_x28Promisex20x24ex29($21e => FFI_GitHub_octokit($88.a1, $21e), $219, $21a, $21b), $225, $215, $216);
9508
9568
  };
9509
- return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(csegen_403()(), $213, $20d, $20e);
9569
+ return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(csegen_404()(), $213, $20d, $20e);
9510
9570
  };
9511
- return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(Config_n__9586_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);
9512
9572
  };
9513
- return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(csegen_403()(), $1fd, $1f7, $1f8);
9573
+ return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(csegen_404()(), $1fd, $1f7, $1f8);
9514
9574
  };
9515
9575
  return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(Util_Prompting_yesNoPrompt(csegen_74()(), 1, 'Would you like harmony to request reviews from individual users when it requests a teams review?'), $1f6, $1ec, $1ed);
9516
9576
  };
9517
- return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(csegen_403()(), $1ea, $1e4, $1e5);
9577
+ return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(csegen_404()(), $1ea, $1e4, $1e5);
9518
9578
  };
9519
9579
  return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(Util_Prompting_yesNoPrompt(csegen_74()(), 1, 'Would you like harmony to request reviews from teams when it requests reviewers?'), $1e3, $1d9, $1da);
9520
9580
  };
9521
- return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(csegen_403()(), $1d7, $1d1, $1d2);
9581
+ return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(csegen_404()(), $1d7, $1d1, $1d2);
9522
9582
  };
9523
- return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(Config_n__9586_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);
9524
9584
  };
9525
- return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(csegen_403()(), $1c1, $1bb, $1bc);
9585
+ return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(csegen_404()(), $1c1, $1bb, $1bc);
9526
9586
  };
9527
- return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(Config_n__9586_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);
9528
9588
  };
9529
- return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(csegen_403()(), $1ab, $1a5, $1a6);
9589
+ return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(csegen_404()(), $1ab, $1a5, $1a6);
9530
9590
  };
9531
- return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($194 => $195 => Data_Promise_map_Functor_x28Promisex20x24ex29($198 => Util_Prompting_orIfEmpty({a1: remoteGuess}, Data_String_trim($198)), csegen_405()(), $194, $195), $1a4, $190, $191);
9591
+ return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($194 => $195 => Data_Promise_map_Functor_x28Promisex20x24ex29($198 => Util_Prompting_orIfEmpty({a1: remoteGuess}, Data_String_trim($198)), csegen_406()(), $194, $195), $1a4, $190, $191);
9532
9592
  };
9533
9593
  return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($173 => $174 => $175 => Data_Promise_liftIO_HasIO_x28Promisex20x24ex29($178 => Prelude_IO_prim__putStr((Prelude_Types_foldMap_Foldable_List(csegen_51()(), $181 => $181, {a1: 'What GitHub remote repo would you like to use harmony for', a2: {a1: $167, a2: {a1: '?', a2: {h: 0}}}})+'\n'), $178), $173, $174, $175), $18e, $16f, $170);
9534
9594
  };
9535
9595
  return $166();
9536
9596
  };
9537
- return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(csegen_403()(), $164, $15e, $15f);
9597
+ return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(csegen_404()(), $164, $15e, $15f);
9538
9598
  };
9539
- return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($147 => $148 => Data_Promise_map_Functor_x28Promisex20x24ex29($14b => Util_Prompting_orIfEmpty(Config_n__9586_2539_repo($0, $4, $3, $2, $1, defaultOrgAndRepo), Data_String_trim($14b)), csegen_405()(), $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);
9540
9600
  };
9541
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);
9542
9602
  };
9543
9603
  return $116();
9544
9604
  };
9545
- return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(csegen_403()(), $114, $10e, $10f);
9605
+ return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(csegen_404()(), $114, $10e, $10f);
9546
9606
  };
9547
- return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($f7 => $f8 => Data_Promise_map_Functor_x28Promisex20x24ex29($fb => Util_Prompting_orIfEmpty(Config_n__9586_2538_org($0, $4, $3, $2, $1, defaultOrgAndRepo), Data_String_trim($fb)), csegen_405()(), $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);
9548
9608
  };
9549
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);
9550
9610
  };
9551
9611
  return $c6();
9552
9612
  };
9553
- return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(csegen_403()(), $c4, $be, $bf);
9613
+ return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(csegen_404()(), $c4, $be, $bf);
9554
9614
  };
9555
- return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($a3 => $a4 => Data_Promise_x3cx7cx3e_Alternative_x28Promisex20Stringx29($a7 => $a8 => Data_Promise_map_Functor_x28Promisex20x24ex29($ab => Config_parseGitHubURI($ab), $af => $b0 => FFI_Git_remoteURI($0, remoteGuess, $af, $b0), $a7, $a8), () => csegen_407()(), $a3, $a4), $bd, $9f, $a0);
9615
+ return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($a3 => $a4 => Data_Promise_x3cx7cx3e_Alternative_x28Promisex20Stringx29($a7 => $a8 => Data_Promise_map_Functor_x28Promisex20x24ex29($ab => Config_parseGitHubURI($ab), $af => $b0 => FFI_Git_remoteURI($0, remoteGuess, $af, $b0), $a7, $a8), () => csegen_408()(), $a3, $a4), $bd, $9f, $a0);
9556
9616
  };
9557
9617
  return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($8e => $8f => Data_Promise_map_Functor_x28Promisex20x24ex29($92 => Config_preferOriginRemote($92), $96 => $97 => FFI_Git_listRemotes($0, $96, $97), $8e, $8f), $9e, $89, $8a);
9558
9618
  }
@@ -9567,14 +9627,14 @@ function Config_createConfig($0, $1, $2, $3, $4, $5, $6) {
9567
9627
  };
9568
9628
  return $2f();
9569
9629
  };
9570
- return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(csegen_403()(), $2d, $27, $28);
9630
+ return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(csegen_404()(), $2d, $27, $28);
9571
9631
  };
9572
9632
  return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($9 => $a => $b => Data_Promise_liftIO_HasIO_x28Promisex20x24ex29($e => Prelude_IO_prim__putStr((Prelude_Types_foldMap_Foldable_List(csegen_51()(), $17 => $17, {a1: 'Creating a new configuration (storing in ', a2: {a1: Data_Config_filename(), a2: {a1: ')...', a2: {h: 0}}}})+'\n'), $e), $9, $a, $b), $25, $5, $6);
9573
9633
  }
9574
9634
 
9575
9635
  /* Config.checkConfigConsistency : Config -> Either (Doc AnsiStyle) () */
9576
9636
  function Config_checkConfigConsistency($0) {
9577
- return Config_n__8495_1406_checkRequestSettings($0, $0);
9637
+ return Config_n__8508_1406_checkRequestSettings($0, $0);
9578
9638
  }
9579
9639
 
9580
9640
  /* Config.addIgnoredPRs : Config -> List Integer -> Promise' Config */
@@ -9583,7 +9643,7 @@ function Config_addIgnoredPRs($0, $1, $2, $3) {
9583
9643
  }
9584
9644
 
9585
9645
  /* Data.List.PrefixSuffix.with block in with block in dropPrefix */
9586
- 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) {
9587
9647
  switch($4.h) {
9588
9648
  case 1: /* No */ return {h: 1 /* No */, a1: $8 => $4.a1({a1: $8.a1, a2: Builtin_snd(Data_List_PrefixSuffix_prefixSuffixConsInjective($8.a2))})};
9589
9649
  case 0: /* Yes */ return {h: 0 /* Yes */, a1: {a1: $4.a1.a1, a2: {a1: {a1: $5, a2: $3}, a2: $4.a1.a1}}};
@@ -9591,10 +9651,10 @@ function Data_List_PrefixSuffix_with__withx20blockx20inx20dropPrefix_3637($0, $1
9591
9651
  }
9592
9652
 
9593
9653
  /* Data.List.PrefixSuffix.with block in dropPrefix */
9594
- 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) {
9595
9655
  switch($4.h) {
9596
9656
  case 1: /* No */ return {h: 1 /* No */, a1: $9 => Data_List_PrefixSuffix_prefixDifferentVoid($4.a1, $9)};
9597
- 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);
9598
9658
  }
9599
9659
  }
9600
9660
 
@@ -9618,7 +9678,7 @@ function Data_List_PrefixSuffix_dropPrefix($0, $1, $2) {
9618
9678
  case undefined: /* cons */ {
9619
9679
  switch($2.h) {
9620
9680
  case 0: /* nil */ return {h: 1 /* No */, a1: $b => Prelude_Uninhabited_void$()};
9621
- 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);
9622
9682
  }
9623
9683
  }
9624
9684
  }
@@ -9631,21 +9691,21 @@ function AppVersion_printVersion($0) {
9631
9691
 
9632
9692
  /* AppVersion.appVersion : String */
9633
9693
  const AppVersion_appVersion = __lazy(function () {
9634
- return '5.6.0';
9694
+ return '5.8.0';
9635
9695
  });
9636
9696
 
9637
9697
  /* Commands.Help.subcommandHelp' : String -> Doc AnsiStyle */
9638
9698
  function Commands_Help_subcommandHelpx27($0) {
9639
9699
  switch($0) {
9640
- case 'label': return Commands_Help_subcommand($0, {a1: Commands_Help_argument(1, '<label>'), a2: csegen_421()}, {a1: Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29(Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29(Text_PrettyPrint_Prettyprinter_Util_reflow('Add one or more labels to a PR, creating a new PR if one does not exist.'), Text_PrettyPrint_Prettyprinter_Doc_line()), Text_PrettyPrint_Prettyprinter_Util_reflow('Labels that do not exist yet will be created automatically.')), a2: {h: 0}});
9641
- case 'request': return Commands_Help_subcommand($0, {a1: Commands_Help_argument(1, '<team-slug> | +<user-login>'), a2: csegen_426()}, {a1: Text_PrettyPrint_Prettyprinter_Util_reflow(Prelude_Types_foldMap_Foldable_List(csegen_51()(), $2b => $2b, {a1: 'Request review from the given team(s) and one lucky member from one\nof those teams to review the PR for the current branch.', a2: {h: 0}})), a2: {a1: Text_PrettyPrint_Prettyprinter_Util_reflow(Prelude_Types_foldMap_Foldable_List(csegen_51()(), $38 => $38, {a1: 'Also request reviews from any users with logins specified. You specify\nthese additional users by prefixing their logins with \'+\'.', a2: {h: 0}})), a2: {a1: Text_PrettyPrint_Prettyprinter_Util_reflow('Optionally apply any number of labels by prefixing them with \'#\'.'), a2: {h: 0}}}});
9700
+ case 'label': return Commands_Help_subcommand($0, {a1: Commands_Help_argument(1, '<label>'), a2: csegen_422()}, {a1: Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29(Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29(Text_PrettyPrint_Prettyprinter_Util_reflow('Add one or more labels to a PR, creating a new PR if one does not exist.'), Text_PrettyPrint_Prettyprinter_Doc_line()), Text_PrettyPrint_Prettyprinter_Util_reflow('Labels that do not exist yet will be created automatically.')), a2: {h: 0}});
9701
+ case 'request': return Commands_Help_subcommand($0, {a1: Commands_Help_argument(1, '<team-slug> | +<user-login>'), a2: csegen_427()}, {a1: Text_PrettyPrint_Prettyprinter_Util_reflow(Prelude_Types_foldMap_Foldable_List(csegen_51()(), $2b => $2b, {a1: 'Request review from the given team(s) and one lucky member from one\nof those teams to review the PR for the current branch.', a2: {h: 0}})), a2: {a1: Text_PrettyPrint_Prettyprinter_Util_reflow(Prelude_Types_foldMap_Foldable_List(csegen_51()(), $38 => $38, {a1: 'Also request reviews from any users with logins specified. You specify\nthese additional users by prefixing their logins with \'+\'.', a2: {h: 0}})), a2: {a1: Text_PrettyPrint_Prettyprinter_Util_reflow('Optionally apply any number of labels by prefixing them with \'#\'.'), a2: {h: 0}}}});
9642
9702
  case 'config': return Commands_Help_subcommand($0, {a1: Commands_Help_argument(1, '<property>'), a2: {a1: Commands_Help_argument(0, '<value>'), a2: {h: 0}}}, {a1: Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29(Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29(Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29(Text_PrettyPrint_Prettyprinter_Util_reflow(Prelude_Types_foldMap_Foldable_List(csegen_51()(), $5f => $5f, {a1: 'Get or set the value of a configuration property. Not all properties\ncan be set and read via this subcommand.', a2: {h: 0}})), Text_PrettyPrint_Prettyprinter_Doc_line()), Commands_Help_argumentx27('properties')), Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Text_PrettyPrint_Prettyprinter_Doc_unsafeTextWithoutNewLines(':'), a2: {h: 0}})), Text_PrettyPrint_Prettyprinter_Doc_align(Text_PrettyPrint_Prettyprinter_Doc_concatWith(a => b => Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29(Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29(Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29(a, Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Text_PrettyPrint_Prettyprinter_Doc_unsafeTextWithoutNewLines(','), a2: {h: 0}})), Text_PrettyPrint_Prettyprinter_Doc_softline()), b), Prelude_Types_List_mapAppend({h: 0}, $88 => Commands_Help_option($88), Data_Config_settablePropNames())))), a2: {h: 0}});
9643
- case 'pr': return Commands_Help_subcommand($0, {a1: Commands_Help_argument(0, '--draft'), a2: {a1: Commands_Help_argument(0, '-i/--into {<branch-name>}'), a2: csegen_426()}}, {a1: Text_PrettyPrint_Prettyprinter_Util_reflow('Identify an existing PR or create a new one for the current branch.'), a2: {a1: Text_PrettyPrint_Prettyprinter_Util_reflow('Optionally apply any number of labels by prefixing them with \'#\'.'), a2: {a1: Text_PrettyPrint_Prettyprinter_Util_reflow('Optionally mark a new or existing PR as a draft with the --draft flag.'), a2: {a1: Text_PrettyPrint_Prettyprinter_Util_reflow('Optionally specify the branch to merge into with the --into option.'), a2: {h: 0}}}}});
9703
+ case 'pr': return Commands_Help_subcommand($0, {a1: Commands_Help_argument(0, '--draft'), a2: {a1: Commands_Help_argument(0, '-i/--into {<branch-name>}'), a2: csegen_427()}}, {a1: Text_PrettyPrint_Prettyprinter_Util_reflow('Identify an existing PR or create a new one for the current branch.'), a2: {a1: Text_PrettyPrint_Prettyprinter_Util_reflow('Optionally apply any number of labels by prefixing them with \'#\'.'), a2: {a1: Text_PrettyPrint_Prettyprinter_Util_reflow('Optionally mark a new or existing PR as a draft with the --draft flag.'), a2: {a1: Text_PrettyPrint_Prettyprinter_Util_reflow('Optionally specify the branch to merge into with the --into option.'), a2: {h: 0}}}}});
9644
9704
  case 'contribute': return Commands_Help_subcommand($0, {a1: Commands_Help_argument(0, '-c/--checkout | -l/--list'), a2: {a1: Commands_Help_argument(0, '-<num>'), a2: {a1: Commands_Help_argument(0, '-i/--ignore {<uri>/<pr-number>}'), a2: {h: 0}}}}, {a1: Text_PrettyPrint_Prettyprinter_Util_reflow(Prelude_Types_foldMap_Foldable_List(csegen_51()(), $c8 => $c8, {a1: 'Contribute to an open PR. Prints a URL. Prioritizes PRs you are\nrequested to review but will also return other PRs.', a2: {h: 0}})), a2: {a1: Text_PrettyPrint_Prettyprinter_Util_reflow(Prelude_Types_foldMap_Foldable_List(csegen_51()(), $d5 => $d5, {a1: 'Use dash followed by a number (e.g. \'-3\') to skip that number of\npotential PRs and return the next.', a2: {h: 0}})), a2: {a1: Text_PrettyPrint_Prettyprinter_Util_reflow(Prelude_Types_foldMap_Foldable_List(csegen_51()(), $e2 => $e2, {a1: 'Specify a PR to ignore (only affects the local Harmony config on\nthis machine) if you would like to more permanently skip a potential\nPR. Do this with the \'--ignore\' option followed by a GitHub URI or\nPull Request number.', a2: {h: 0}})), a2: {a1: Text_PrettyPrint_Prettyprinter_Util_reflow(Prelude_Types_foldMap_Foldable_List(csegen_51()(), $ef => $ef, {a1: 'Use --list to list multiple PRs instead of just one. This option \nsupports skipping PRs but does not support the checkout option because\nthere is no single PR that should be checked out.', a2: {h: 0}})), a2: {h: 0}}}}});
9645
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}});
9646
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}});
9647
9707
  case 'version': return Commands_Help_subcommand($0, {h: 0}, {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('Print version'), a2: {h: 0}});
9648
- 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}}}});
9649
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}});
9650
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}});
9651
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}});
@@ -9653,7 +9713,7 @@ function Commands_Help_subcommandHelpx27($0) {
9653
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}});
9654
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}});
9655
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}});
9656
- 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}}}));
9657
9717
  }
9658
9718
  }
9659
9719
 
@@ -9759,7 +9819,7 @@ function Text_PrettyPrint_Prettyprinter_Util_reflow($0) {
9759
9819
  }
9760
9820
 
9761
9821
  /* Commands.case block in parseContributeArgs,parseSkipArg */
9762
- function Commands_case__parseContributeArgsx2cparseSkipArg_20199($0, $1, $2) {
9822
+ function Commands_case__parseContributeArgsx2cparseSkipArg_22481($0, $1, $2) {
9763
9823
  switch($2.h) {
9764
9824
  case undefined: /* cons */ {
9765
9825
  switch($2.a1) {
@@ -9772,7 +9832,7 @@ function Commands_case__parseContributeArgsx2cparseSkipArg_20199($0, $1, $2) {
9772
9832
  }
9773
9833
 
9774
9834
  /* Commands.case block in case block in graph */
9775
- 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) {
9776
9836
  return $9 => {
9777
9837
  const $c = $d => $e => {
9778
9838
  switch(Data_Maybe_isJust($3)) {
@@ -9785,17 +9845,17 @@ function Commands_case__casex20blockx20inx20graph_19933($0, $1, $2, $3, $4, $5,
9785
9845
  }
9786
9846
 
9787
9847
  /* Commands.case block in graph */
9788
- function Commands_case__graph_19889($0, $1, $2, $3, $4, $5) {
9848
+ function Commands_case__graph_22171($0, $1, $2, $3, $4, $5) {
9789
9849
  return $6 => {
9790
9850
  switch($4.h) {
9791
- 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);
9792
9852
  case 0: /* nothing */ return Data_Promise_reject('The graph command expects the name of a GitHub Team as an argument.', $5, $6);
9793
9853
  }
9794
9854
  };
9795
9855
  }
9796
9856
 
9797
9857
  /* Commands.case block in request */
9798
- function Commands_case__request_19159($0, $1, $2, $3, $4, $5) {
9858
+ function Commands_case__request_21441($0, $1, $2, $3, $4, $5) {
9799
9859
  return $7 => $9 => {
9800
9860
  let $a;
9801
9861
  switch(Prelude_Types_null_Foldable_List($5.a1)) {
@@ -9851,40 +9911,40 @@ function Commands_case__request_19159($0, $1, $2, $3, $4, $5) {
9851
9911
  }
9852
9912
 
9853
9913
  /* Commands.case block in case block in request,partitionedArgs */
9854
- function Commands_case__casex20blockx20inx20requestx2cpartitionedArgs_19079($0, $1, $2, $3, $4, $5, $6, $7) {
9855
- const $9 = Prelude_Interfaces_mapHom(csegen_603(), $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});
9856
9916
  return {a1: $9.a1, a2: {a1: $7.a2, a2: $9.a2}};
9857
9917
  }
9858
9918
 
9859
9919
  /* Commands.case block in request,partitionedArgs */
9860
- function Commands_case__requestx2cpartitionedArgs_19056($0, $1, $2, $3, $4, $5) {
9861
- 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));
9862
9922
  }
9863
9923
 
9864
- /* Commands.8933:18213:recombineIntoArgs */
9865
- function Commands_n__8933_18213_recombineIntoArgs($0, $1) {
9924
+ /* Commands.8950:20495:recombineIntoArgs */
9925
+ function Commands_n__8950_20495_recombineIntoArgs($0, $1) {
9866
9926
  switch($1.h) {
9867
9927
  case 0: /* nil */ return {a1: {h: 0}, a2: {h: 0}};
9868
9928
  case undefined: /* cons */ {
9869
9929
  switch($1.a1) {
9870
9930
  case '-i': {
9871
9931
  switch($1.a2.h) {
9872
- case 0: /* nil */ return csegen_607();
9932
+ case 0: /* nil */ return csegen_612();
9873
9933
  case undefined: /* cons */ {
9874
- const $8 = Commands_n__8933_18211_parseIntoOpt($0, $1.a2.a1);
9934
+ const $8 = Commands_n__8950_20493_parseIntoOpt($0, $1.a2.a1);
9875
9935
  switch($8.h) {
9876
9936
  case undefined: /* just */ {
9877
- const $c = Commands_n__8933_18213_recombineIntoArgs($0, $1.a2.a2);
9937
+ const $c = Commands_n__8950_20495_recombineIntoArgs($0, $1.a2.a2);
9878
9938
  return {a1: {a1: $8.a1, a2: $c.a1}, a2: $c.a2};
9879
9939
  }
9880
9940
  case 0: /* nothing */ {
9881
- const $14 = Commands_n__8933_18213_recombineIntoArgs($0, $1.a2.a2);
9941
+ const $14 = Commands_n__8950_20495_recombineIntoArgs($0, $1.a2.a2);
9882
9942
  return {a1: $14.a1, a2: {a1: '-i', a2: {a1: $1.a2.a1, a2: $14.a2}}};
9883
9943
  }
9884
9944
  }
9885
9945
  }
9886
9946
  default: {
9887
- const $1e = Commands_n__8933_18213_recombineIntoArgs($0, $1.a2);
9947
+ const $1e = Commands_n__8950_20495_recombineIntoArgs($0, $1.a2);
9888
9948
  return {a1: $1e.a1, a2: {a1: $1.a1, a2: $1e.a2}};
9889
9949
  }
9890
9950
  }
@@ -9893,26 +9953,26 @@ function Commands_n__8933_18213_recombineIntoArgs($0, $1) {
9893
9953
  switch($1.a2.h) {
9894
9954
  case 0: /* nil */ return {a1: {h: 0}, a2: {a1: '--into', a2: {h: 0}}};
9895
9955
  case undefined: /* cons */ {
9896
- const $2b = Commands_n__8933_18211_parseIntoOpt($0, $1.a2.a1);
9956
+ const $2b = Commands_n__8950_20493_parseIntoOpt($0, $1.a2.a1);
9897
9957
  switch($2b.h) {
9898
9958
  case undefined: /* just */ {
9899
- const $2f = Commands_n__8933_18213_recombineIntoArgs($0, $1.a2.a2);
9959
+ const $2f = Commands_n__8950_20495_recombineIntoArgs($0, $1.a2.a2);
9900
9960
  return {a1: {a1: $2b.a1, a2: $2f.a1}, a2: $2f.a2};
9901
9961
  }
9902
9962
  case 0: /* nothing */ {
9903
- const $37 = Commands_n__8933_18213_recombineIntoArgs($0, $1.a2.a2);
9963
+ const $37 = Commands_n__8950_20495_recombineIntoArgs($0, $1.a2.a2);
9904
9964
  return {a1: $37.a1, a2: {a1: '--into', a2: {a1: $1.a2.a1, a2: $37.a2}}};
9905
9965
  }
9906
9966
  }
9907
9967
  }
9908
9968
  default: {
9909
- const $41 = Commands_n__8933_18213_recombineIntoArgs($0, $1.a2);
9969
+ const $41 = Commands_n__8950_20495_recombineIntoArgs($0, $1.a2);
9910
9970
  return {a1: $41.a1, a2: {a1: $1.a1, a2: $41.a2}};
9911
9971
  }
9912
9972
  }
9913
9973
  }
9914
9974
  default: {
9915
- const $49 = Commands_n__8933_18213_recombineIntoArgs($0, $1.a2);
9975
+ const $49 = Commands_n__8950_20495_recombineIntoArgs($0, $1.a2);
9916
9976
  return {a1: $49.a1, a2: {a1: $1.a1, a2: $49.a2}};
9917
9977
  }
9918
9978
  }
@@ -9920,30 +9980,30 @@ function Commands_n__8933_18213_recombineIntoArgs($0, $1) {
9920
9980
  }
9921
9981
  }
9922
9982
 
9923
- /* Commands.10985:20153:recombineIgnoreArgs */
9924
- function Commands_n__10985_20153_recombineIgnoreArgs($0, $1) {
9983
+ /* Commands.11002:22435:recombineIgnoreArgs */
9984
+ function Commands_n__11002_22435_recombineIgnoreArgs($0, $1) {
9925
9985
  switch($1.h) {
9926
9986
  case 0: /* nil */ return {a1: {h: 0}, a2: {h: 0}};
9927
9987
  case undefined: /* cons */ {
9928
9988
  switch($1.a1) {
9929
9989
  case '-i': {
9930
9990
  switch($1.a2.h) {
9931
- case 0: /* nil */ return csegen_607();
9991
+ case 0: /* nil */ return csegen_612();
9932
9992
  case undefined: /* cons */ {
9933
- const $8 = Commands_n__10985_20150_parseIgnoreOpt($0, $1.a2.a1);
9993
+ const $8 = Commands_n__11002_22432_parseIgnoreOpt($0, $1.a2.a1);
9934
9994
  switch($8.h) {
9935
9995
  case undefined: /* just */ {
9936
- const $c = Commands_n__10985_20153_recombineIgnoreArgs($0, $1.a2.a2);
9996
+ const $c = Commands_n__11002_22435_recombineIgnoreArgs($0, $1.a2.a2);
9937
9997
  return {a1: {a1: $8.a1, a2: $c.a1}, a2: $c.a2};
9938
9998
  }
9939
9999
  case 0: /* nothing */ {
9940
- const $14 = Commands_n__10985_20153_recombineIgnoreArgs($0, $1.a2.a2);
10000
+ const $14 = Commands_n__11002_22435_recombineIgnoreArgs($0, $1.a2.a2);
9941
10001
  return {a1: $14.a1, a2: {a1: '-i', a2: {a1: $1.a2.a1, a2: $14.a2}}};
9942
10002
  }
9943
10003
  }
9944
10004
  }
9945
10005
  default: {
9946
- const $1e = Commands_n__10985_20153_recombineIgnoreArgs($0, $1.a2);
10006
+ const $1e = Commands_n__11002_22435_recombineIgnoreArgs($0, $1.a2);
9947
10007
  return {a1: $1e.a1, a2: {a1: $1.a1, a2: $1e.a2}};
9948
10008
  }
9949
10009
  }
@@ -9952,26 +10012,26 @@ function Commands_n__10985_20153_recombineIgnoreArgs($0, $1) {
9952
10012
  switch($1.a2.h) {
9953
10013
  case 0: /* nil */ return {a1: {h: 0}, a2: {a1: '--ignore', a2: {h: 0}}};
9954
10014
  case undefined: /* cons */ {
9955
- const $2b = Commands_n__10985_20150_parseIgnoreOpt($0, $1.a2.a1);
10015
+ const $2b = Commands_n__11002_22432_parseIgnoreOpt($0, $1.a2.a1);
9956
10016
  switch($2b.h) {
9957
10017
  case undefined: /* just */ {
9958
- const $2f = Commands_n__10985_20153_recombineIgnoreArgs($0, $1.a2.a2);
10018
+ const $2f = Commands_n__11002_22435_recombineIgnoreArgs($0, $1.a2.a2);
9959
10019
  return {a1: {a1: $2b.a1, a2: $2f.a1}, a2: $2f.a2};
9960
10020
  }
9961
10021
  case 0: /* nothing */ {
9962
- const $37 = Commands_n__10985_20153_recombineIgnoreArgs($0, $1.a2.a2);
10022
+ const $37 = Commands_n__11002_22435_recombineIgnoreArgs($0, $1.a2.a2);
9963
10023
  return {a1: $37.a1, a2: {a1: '--ignore', a2: {a1: $1.a2.a1, a2: $37.a2}}};
9964
10024
  }
9965
10025
  }
9966
10026
  }
9967
10027
  default: {
9968
- const $41 = Commands_n__10985_20153_recombineIgnoreArgs($0, $1.a2);
10028
+ const $41 = Commands_n__11002_22435_recombineIgnoreArgs($0, $1.a2);
9969
10029
  return {a1: $41.a1, a2: {a1: $1.a1, a2: $41.a2}};
9970
10030
  }
9971
10031
  }
9972
10032
  }
9973
10033
  default: {
9974
- const $49 = Commands_n__10985_20153_recombineIgnoreArgs($0, $1.a2);
10034
+ const $49 = Commands_n__11002_22435_recombineIgnoreArgs($0, $1.a2);
9975
10035
  return {a1: $49.a1, a2: {a1: $1.a1, a2: $49.a2}};
9976
10036
  }
9977
10037
  }
@@ -9979,23 +10039,23 @@ function Commands_n__10985_20153_recombineIgnoreArgs($0, $1) {
9979
10039
  }
9980
10040
  }
9981
10041
 
9982
- /* Commands.10199:19397:putNameLn */
9983
- function Commands_n__10199_19397_putNameLn($0, $1, $2, $3) {
10042
+ /* Commands.10216:21679:putNameLn */
10043
+ function Commands_n__10216_21679_putNameLn($0, $1, $2, $3) {
9984
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}}}});
9985
10045
  }
9986
10046
 
9987
- /* Commands.8671:17949:putLabels */
9988
- function Commands_n__8671_17949_putLabels($0, $1, $2, $3, $4) {
9989
- 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__8671_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)));
9990
10050
  }
9991
10051
 
9992
- /* Commands.8671:17948:putLabel */
9993
- function Commands_n__8671_17948_putLabel($0, $1, $2, $3, $4) {
10052
+ /* Commands.8688:20230:putLabel */
10053
+ function Commands_n__8688_20230_putLabel($0, $1, $2, $3, $4) {
9994
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)));
9995
10055
  }
9996
10056
 
9997
- /* Commands.11337:20514:printDetails */
9998
- function Commands_n__11337_20514_printDetails($0, $1, $2, $3, $4) {
10057
+ /* Commands.11354:22796:printDetails */
10058
+ function Commands_n__11354_22796_printDetails($0, $1, $2, $3, $4) {
9999
10059
  const $5 = Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_italic(), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String($4.a8));
10000
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));
10001
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)));
@@ -10004,8 +10064,8 @@ function Commands_n__11337_20514_printDetails($0, $1, $2, $3, $4) {
10004
10064
  return Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: $5, a2: {a1: $d, a2: {a1: $16, a2: {a1: $21, a2: {a1: $2f, a2: {h: 0}}}}}});
10005
10065
  }
10006
10066
 
10007
- /* Commands.11337:20513:pickOne */
10008
- function Commands_n__11337_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) {
10009
10069
  const $9 = Data_List_headx27(Data_List_drop($5, Prelude_Types_List_tailRecAppend($7, $8)));
10010
10070
  return $12 => $13 => {
10011
10071
  switch($9.h) {
@@ -10019,7 +10079,7 @@ function Commands_n__11337_20513_pickOne($0, $1, $2, $3, $4, $5, $6, $7, $8) {
10019
10079
  break;
10020
10080
  }
10021
10081
  case 0: /* nothing */ {
10022
- $1a = csegen_612();
10082
+ $1a = csegen_617();
10023
10083
  break;
10024
10084
  }
10025
10085
  }
@@ -10029,23 +10089,23 @@ function Commands_n__11337_20513_pickOne($0, $1, $2, $3, $4, $5, $6, $7, $8) {
10029
10089
  };
10030
10090
  }
10031
10091
 
10032
- /* Commands.9799:19044:partitionedArgs */
10033
- function Commands_n__9799_19044_partitionedArgs($0, $1, $2, $3, $4) {
10034
- 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));
10035
10095
  }
10036
10096
 
10037
- /* Commands.10367:19585:parseTeamArg */
10038
- function Commands_n__10367_19585_parseTeamArg($0, $1) {
10097
+ /* Commands.10384:21867:parseTeamArg */
10098
+ function Commands_n__10384_21867_parseTeamArg($0, $1) {
10039
10099
  return {a1: {a1: $1}};
10040
10100
  }
10041
10101
 
10042
- /* Commands.10985:20152:parseSkipArg */
10043
- function Commands_n__10985_20152_parseSkipArg($0, $1) {
10044
- 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));
10045
10105
  }
10046
10106
 
10047
- /* Commands.10985:20151:parseListFlag */
10048
- function Commands_n__10985_20151_parseListFlag($0, $1) {
10107
+ /* Commands.11002:22433:parseListFlag */
10108
+ function Commands_n__11002_22433_parseListFlag($0, $1) {
10049
10109
  switch($1) {
10050
10110
  case '-l': return {a1: {h: 0 /* List */}};
10051
10111
  case '--list': return {a1: {h: 0 /* List */}};
@@ -10053,8 +10113,8 @@ function Commands_n__10985_20151_parseListFlag($0, $1) {
10053
10113
  }
10054
10114
  }
10055
10115
 
10056
- /* Commands.8933:18212:parseLabelArg */
10057
- function Commands_n__8933_18212_parseLabelArg($0, $1) {
10116
+ /* Commands.8950:20494:parseLabelArg */
10117
+ function Commands_n__8950_20494_parseLabelArg($0, $1) {
10058
10118
  const $2 = Data_String_strM($1);
10059
10119
  switch($2.h) {
10060
10120
  case undefined: /* cons */ {
@@ -10067,29 +10127,29 @@ function Commands_n__8933_18212_parseLabelArg($0, $1) {
10067
10127
  }
10068
10128
  }
10069
10129
 
10070
- /* Commands.8933:18211:parseIntoOpt */
10071
- function Commands_n__8933_18211_parseIntoOpt($0, $1) {
10130
+ /* Commands.8950:20493:parseIntoOpt */
10131
+ function Commands_n__8950_20493_parseIntoOpt($0, $1) {
10072
10132
  const $2 = Util_String_nonEmpty($1);
10073
10133
  return Prelude_Types_map_Functor_Maybe($7 => $7, $2);
10074
10134
  }
10075
10135
 
10076
- /* Commands.10985:20150:parseIgnoreOpt */
10077
- function Commands_n__10985_20150_parseIgnoreOpt($0, $1) {
10078
- const $2 = Data_String_split(csegen_358(), $1);
10136
+ /* Commands.11002:22432:parseIgnoreOpt */
10137
+ function Commands_n__11002_22432_parseIgnoreOpt($0, $1) {
10138
+ const $2 = Data_String_split(csegen_359(), $1);
10079
10139
  const $7 = Data_List1_last($2);
10080
10140
  return Prelude_Types_map_Functor_Maybe($c => $c, Data_String_parsePositive(csegen_2(), $7));
10081
10141
  }
10082
10142
 
10083
- /* Commands.8933:18210:parseDraftFlag */
10084
- function Commands_n__8933_18210_parseDraftFlag($0, $1) {
10143
+ /* Commands.8950:20492:parseDraftFlag */
10144
+ function Commands_n__8950_20492_parseDraftFlag($0, $1) {
10085
10145
  switch($1) {
10086
10146
  case '--draft': return {a1: {h: 0 /* Draft */}};
10087
10147
  default: return {h: 0};
10088
10148
  }
10089
10149
  }
10090
10150
 
10091
- /* Commands.10367:19584:parseCompletedFlag */
10092
- function Commands_n__10367_19584_parseCompletedFlag($0, $1) {
10151
+ /* Commands.10384:21866:parseCompletedFlag */
10152
+ function Commands_n__10384_21866_parseCompletedFlag($0, $1) {
10093
10153
  switch($1) {
10094
10154
  case '-c': return {a1: {h: 0}};
10095
10155
  case '--completed': return {a1: {h: 0}};
@@ -10097,8 +10157,8 @@ function Commands_n__10367_19584_parseCompletedFlag($0, $1) {
10097
10157
  }
10098
10158
  }
10099
10159
 
10100
- /* Commands.10985:20149:parseCheckoutFlag */
10101
- function Commands_n__10985_20149_parseCheckoutFlag($0, $1) {
10160
+ /* Commands.11002:22431:parseCheckoutFlag */
10161
+ function Commands_n__11002_22431_parseCheckoutFlag($0, $1) {
10102
10162
  switch($1) {
10103
10163
  case '-c': return {a1: {h: 1 /* Checkout */}};
10104
10164
  case '--checkout': return {a1: {h: 1 /* Checkout */}};
@@ -10106,8 +10166,8 @@ function Commands_n__10985_20149_parseCheckoutFlag($0, $1) {
10106
10166
  }
10107
10167
  }
10108
10168
 
10109
- /* Commands.11337:20512:listSome */
10110
- function Commands_n__11337_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) {
10111
10171
  const $15 = $16 => {
10112
10172
  let $1b;
10113
10173
  switch(Prelude_Types_null_Foldable_List($6)) {
@@ -10120,13 +10180,13 @@ function Commands_n__11337_20512_listSome($0, $1, $2, $3, $4, $5, $6, $7, $8) {
10120
10180
  break;
10121
10181
  }
10122
10182
  }
10123
- return Prelude_Interfaces_when(csegen_66()(), $1b, () => $20 => $21 => Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(csegen_403()(), $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__11337_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));
10124
10184
  };
10125
- return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(Commands_n__11337_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);
10126
10186
  }
10127
10187
 
10128
- /* Commands.9359:18641:labelSlugs */
10129
- function Commands_n__9359_18641_labelSlugs($0, $1, $2, $3) {
10188
+ /* Commands.9376:20923:labelSlugs */
10189
+ function Commands_n__9376_20923_labelSlugs($0, $1, $2, $3) {
10130
10190
  const $5 = $6 => $7 => {
10131
10191
  switch($6.h) {
10132
10192
  case 2: /* Label */ return {a1: $6.a1, a2: $7};
@@ -10136,13 +10196,13 @@ function Commands_n__9359_18641_labelSlugs($0, $1, $2, $3) {
10136
10196
  return Prelude_Types_foldr_Foldable_List($5, {h: 0}, $3);
10137
10197
  }
10138
10198
 
10139
- /* Commands.11337:20511:isNotIgnored */
10140
- function Commands_n__11337_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) {
10141
10201
  return Data_Maybe_isNothing(Data_List_find($a => Prelude_EqOrd_x3dx3d_Eq_Integer($a, $5.a1), $4.a13));
10142
10202
  }
10143
10203
 
10144
- /* Commands.9359:18640:isDraft */
10145
- function Commands_n__9359_18640_isDraft($0, $1, $2, $3) {
10204
+ /* Commands.9376:20922:isDraft */
10205
+ function Commands_n__9376_20922_isDraft($0, $1, $2, $3) {
10146
10206
  const $7 = $8 => {
10147
10207
  switch($8.h) {
10148
10208
  case 0: /* Draft */ return 1;
@@ -10153,8 +10213,8 @@ function Commands_n__9359_18640_isDraft($0, $1, $2, $3) {
10153
10213
  return Data_Maybe_isJust($5);
10154
10214
  }
10155
10215
 
10156
- /* Commands.9359:18639:intoBranch */
10157
- function Commands_n__9359_18639_intoBranch($0, $1, $2, $3) {
10216
+ /* Commands.9376:20921:intoBranch */
10217
+ function Commands_n__9376_20921_intoBranch($0, $1, $2, $3) {
10158
10218
  const $d = $e => {
10159
10219
  switch($e.h) {
10160
10220
  case 1: /* Into */ return {a1: Util_String_value($e.a1)};
@@ -10164,11 +10224,11 @@ function Commands_n__9359_18639_intoBranch($0, $1, $2, $3) {
10164
10224
  return Prelude_Types_foldMap_Foldable_List({a1: $7 => $8 => Prelude_Types_x3cx2bx3e_Semigroup_x28Maybex20x24ax29($7, $8), a2: {h: 0}}, $d, $3);
10165
10225
  }
10166
10226
 
10167
- /* Commands.11337:20510:goListSome */
10168
- function Commands_n__11337_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) {
10169
10229
  switch($5.h) {
10170
10230
  case undefined: /* cons */ {
10171
- const $7 = Commands_n__11337_20514_printDetails($0, $1, $2, $3, $5.a1);
10231
+ const $7 = Commands_n__11354_22796_printDetails($0, $1, $2, $3, $5.a1);
10172
10232
  let $15;
10173
10233
  switch($4) {
10174
10234
  case 1: {
@@ -10180,15 +10240,28 @@ function Commands_n__11337_20510_goListSome($0, $1, $2, $3, $4, $5) {
10180
10240
  break;
10181
10241
  }
10182
10242
  }
10183
- 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__11337_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));
10184
10244
  return Util_renderIO($3, csegen_74()(), $13);
10185
10245
  }
10186
- case 0: /* nil */ return csegen_612();
10246
+ case 0: /* nil */ return csegen_617();
10247
+ }
10248
+ }
10249
+
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
+ }
10187
10260
  }
10188
10261
  }
10189
10262
 
10190
- /* Commands.10199:19396:forkedUser */
10191
- function Commands_n__10199_19396_forkedUser($0, $1, $2, $3) {
10263
+ /* Commands.10216:21678:forkedUser */
10264
+ function Commands_n__10216_21678_forkedUser($0, $1, $2, $3) {
10192
10265
  return FFI_Concurrency_fork(csegen_74()(), ('user --json '+$3));
10193
10266
  }
10194
10267
 
@@ -10197,6 +10270,11 @@ function Commands_whoami($0, $1, $2, $3, $4) {
10197
10270
  return Commands_User_Me_printInfoOnSelf($0, $2, $1, $3, $4);
10198
10271
  }
10199
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
+
10200
10278
  /* Commands.teamNameArg : GraphArg -> Maybe String */
10201
10279
  function Commands_teamNameArg($0) {
10202
10280
  switch($0.h) {
@@ -10221,7 +10299,7 @@ function Commands_skipArg($0) {
10221
10299
  /* Commands.request : Config => Git => Octokit => List String -> {default False _ : Bool} ->
10222
10300
  Promise' () */
10223
10301
  function Commands_request($0, $1, $2, $3, $4) {
10224
- return Commands_case__request_19159($0, $1, $2, $4, $3, Commands_n__9799_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));
10225
10303
  }
10226
10304
 
10227
10305
  /* Commands.reflect : Config => Octokit => Promise' () */
@@ -10229,9 +10307,9 @@ function Commands_reflect($0, $1, $2, $3) {
10229
10307
  return Commands_User_Reflect_reflectOnSelf($0, $1, $2, $3);
10230
10308
  }
10231
10309
 
10232
- /* Commands.quick : Config => Git => Octokit => IssueCategory -> Promise' () */
10310
+ /* Commands.quick : Config => Git => Octokit => List QuickArg -> Promise' () */
10233
10311
  function Commands_quick($0, $1, $2, $3, $4, $5) {
10234
- 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);
10235
10313
  }
10236
10314
 
10237
10315
  /* Commands.prUsageError : String */
@@ -10252,7 +10330,7 @@ function Commands_pr($0, $1, $2, $3, $4, $5) {
10252
10330
  };
10253
10331
  const $48 = $49 => $4a => $4b => {
10254
10332
  let $52;
10255
- switch(Prelude_Types_null_Foldable_List(Commands_n__9359_18641_labelSlugs($0, $1, $2, $3))) {
10333
+ switch(Prelude_Types_null_Foldable_List(Commands_n__9376_20923_labelSlugs($0, $1, $2, $3))) {
10256
10334
  case 1: {
10257
10335
  $52 = 0;
10258
10336
  break;
@@ -10262,10 +10340,10 @@ function Commands_pr($0, $1, $2, $3, $4, $5) {
10262
10340
  break;
10263
10341
  }
10264
10342
  }
10265
- const $4d = Prelude_Interfaces_when(csegen_66()(), $52, () => $5c => $5d => Commands_label($0, $1, $2, Commands_n__9359_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));
10266
10344
  const $6a = $6b => $6c => $6d => {
10267
10345
  const $6f = $70 => {
10268
- const $71 = Commands_n__9359_18639_intoBranch($0, $1, $2, $3);
10346
+ const $71 = Commands_n__9376_20921_intoBranch($0, $1, $2, $3);
10269
10347
  switch($71.h) {
10270
10348
  case undefined: /* just */ {
10271
10349
  return $77 => {
@@ -10280,7 +10358,7 @@ function Commands_pr($0, $1, $2, $3, $4, $5) {
10280
10358
  };
10281
10359
  const $96 = $97 => {
10282
10360
  let $9c;
10283
- switch(Commands_n__9359_18640_isDraft($0, $1, $2, $3)) {
10361
+ switch(Commands_n__9376_20922_isDraft($0, $1, $2, $3)) {
10284
10362
  case 1: {
10285
10363
  switch($2c.a2.a4) {
10286
10364
  case 1: {
@@ -10309,7 +10387,7 @@ function Commands_pr($0, $1, $2, $3, $4, $5) {
10309
10387
  };
10310
10388
  return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(Util_Prompting_yesNoPrompt(csegen_74()(), 0, 'Are you sure you want to convert the existing PR for the current branch to a draft?'), $b8, $ae, $af);
10311
10389
  };
10312
- return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(csegen_403()(), $ac, $a6, $a7);
10390
+ return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(csegen_404()(), $ac, $a6, $a7);
10313
10391
  });
10314
10392
  };
10315
10393
  return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($6f, $96, $6c, $6d);
@@ -10321,7 +10399,20 @@ function Commands_pr($0, $1, $2, $3, $4, $5) {
10321
10399
  case 1: /* Hypothetical */ return $f4 => Data_Promise_liftIO_HasIO_x28Promisex20x24ex29($f7 => Prelude_IO_prim__putStr(($2c.a1+'\n'), $f7), $2d, $2e, $f4);
10322
10400
  }
10323
10401
  };
10324
- 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__9359_18640_isDraft($0, $1, $2, $3), Commands_n__9359_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
+ }
10325
10416
  }
10326
10417
 
10327
10418
  /* Commands.parsePrArgs : List String -> Either String (List PrArg) */
@@ -10329,9 +10420,9 @@ function Commands_parsePrArgs($0) {
10329
10420
  switch($0.h) {
10330
10421
  case 0: /* nil */ return {h: 1 /* Right */, a1: {h: 0}};
10331
10422
  default: {
10332
- const $3 = Commands_n__8933_18213_recombineIntoArgs($0, $0);
10423
+ const $3 = Commands_n__8950_20495_recombineIntoArgs($0, $0);
10333
10424
  const $7 = Prelude_Types_List_mapAppend({h: 0}, $b => ({h: 1 /* Into */, a1: $b}), $3.a1);
10334
- const $e = Prelude_Types_traverse_Traversable_List(csegen_9(), $13 => Commands_x3cx7cx7cx3e(csegen_627(), $18 => Commands_n__8933_18210_parseDraftFlag($0, $18), $1d => Commands_n__8933_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);
10335
10426
  return Data_Either_maybeToEither(() => Commands_prUsageError(), Prelude_Types_map_Functor_Maybe($29 => Prelude_Types_List_tailRecAppend($7, $29), $e));
10336
10427
  }
10337
10428
  }
@@ -10347,7 +10438,7 @@ function Commands_parseGraphArgs($0) {
10347
10438
  switch($0.a2.a2.h) {
10348
10439
  case undefined: /* cons */ return {h: 0 /* Left */, a1: 'graph accepts at most one team name and the --completed flag.'};
10349
10440
  default: {
10350
- const $6 = Prelude_Types_traverse_Traversable_List(csegen_9(), $b => Commands_x3cx7cx7cx3e(csegen_627(), $10 => Commands_n__10367_19584_parseCompletedFlag($0, $10), $15 => Commands_n__10367_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);
10351
10442
  switch($6.h) {
10352
10443
  case undefined: /* just */ return {h: 1 /* Right */, a1: $6.a1};
10353
10444
  case 0: /* nothing */ return {h: 0 /* Left */, a1: 'The graph command expects the name of a GitHub Team and optionally --completed as arguments.'};
@@ -10356,7 +10447,7 @@ function Commands_parseGraphArgs($0) {
10356
10447
  }
10357
10448
  }
10358
10449
  default: {
10359
- const $1d = Prelude_Types_traverse_Traversable_List(csegen_9(), $22 => Commands_x3cx7cx7cx3e(csegen_627(), $27 => Commands_n__10367_19584_parseCompletedFlag($0, $27), $2c => Commands_n__10367_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);
10360
10451
  switch($1d.h) {
10361
10452
  case undefined: /* just */ return {h: 1 /* Right */, a1: $1d.a1};
10362
10453
  case 0: /* nothing */ return {h: 0 /* Left */, a1: 'The graph command expects the name of a GitHub Team and optionally --completed as arguments.'};
@@ -10365,7 +10456,7 @@ function Commands_parseGraphArgs($0) {
10365
10456
  }
10366
10457
  }
10367
10458
  default: {
10368
- const $34 = Prelude_Types_traverse_Traversable_List(csegen_9(), $39 => Commands_x3cx7cx7cx3e(csegen_627(), $3e => Commands_n__10367_19584_parseCompletedFlag($0, $3e), $43 => Commands_n__10367_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);
10369
10460
  switch($34.h) {
10370
10461
  case undefined: /* just */ return {h: 1 /* Right */, a1: $34.a1};
10371
10462
  case 0: /* nothing */ return {h: 0 /* Left */, a1: 'The graph command expects the name of a GitHub Team and optionally --completed as arguments.'};
@@ -10379,9 +10470,9 @@ function Commands_parseContributeArgs($0) {
10379
10470
  switch($0.h) {
10380
10471
  case 0: /* nil */ return {h: 1 /* Right */, a1: {h: 0}};
10381
10472
  default: {
10382
- const $3 = Commands_n__10985_20153_recombineIgnoreArgs($0, $0);
10473
+ const $3 = Commands_n__11002_22435_recombineIgnoreArgs($0, $0);
10383
10474
  const $7 = Prelude_Types_List_mapAppend({h: 0}, $b => ({h: 2 /* Ignore */, a1: $b}), $3.a1);
10384
- const $e = Prelude_Types_traverse_Traversable_List(csegen_9(), $13 => Commands_x3cx7cx7cx3e(csegen_627(), $18 => Commands_n__10985_20151_parseListFlag($0, $18), $1d => Commands_x3cx7cx7cx3e(csegen_627(), $22 => Commands_n__10985_20152_parseSkipArg($0, $22), $27 => Commands_n__10985_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);
10385
10476
  return Data_Either_maybeToEither(() => Commands_contributeUsageError(), Prelude_Types_map_Functor_Maybe($34 => Prelude_Types_List_tailRecAppend($7, $34), $e));
10386
10477
  }
10387
10478
  }
@@ -10389,12 +10480,12 @@ function Commands_parseContributeArgs($0) {
10389
10480
 
10390
10481
  /* Commands.listOrgTeams : Config => Octokit => Promise' () */
10391
10482
  function Commands_listOrgTeams($0, $1, $2, $3) {
10392
- return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($6 => $7 => Data_Promise_map_Functor_x28Promisex20x24ex29(csegen_628(), $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);
10393
10484
  }
10394
10485
 
10395
10486
  /* Commands.list : Config => Octokit => String -> Promise' () */
10396
10487
  function Commands_list($0, $1, $2, $3, $4) {
10397
- return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($7 => $8 => Data_Promise_map_Functor_x28Promisex20x24ex29(csegen_628(), $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_630(), Prelude_Types_traverse_Traversable_List(csegen_66()(), $29 => Commands_n__10199_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__10199_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);
10398
10489
  }
10399
10490
 
10400
10491
  /* Commands.label : Config => Git => Octokit => List String -> Promise' () */
@@ -10403,7 +10494,7 @@ function Commands_label($0, $1, $2, $3, $4, $5) {
10403
10494
  switch($22.h) {
10404
10495
  case 0: /* Actual */ {
10405
10496
  const $24 = Prelude_Types_List_mapAppend({h: 0}, $28 => Commands_Label_unslugifyLabel($0.a11, $28), $3);
10406
- 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__8671_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__8671_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);
10407
10498
  }
10408
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);
10409
10500
  }
@@ -10411,6 +10502,11 @@ function Commands_label($0, $1, $2, $3, $4, $5) {
10411
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);
10412
10503
  }
10413
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
+
10414
10510
  /* Commands.health : Config => Octokit => Promise' () */
10415
10511
  function Commands_health($0, $1, $2, $3) {
10416
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);
@@ -10418,14 +10514,8 @@ function Commands_health($0, $1, $2, $3) {
10418
10514
 
10419
10515
  /* Commands.graph : Config => Octokit => List GraphArg -> Promise' () */
10420
10516
  function Commands_graph($0, $1, $2) {
10421
- const $5 = $6 => {
10422
- switch($6.h) {
10423
- case 0: /* nothing */ return 1;
10424
- default: return 0;
10425
- }
10426
- };
10427
- const $3 = Data_List_find($5, $2);
10428
- 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);
10429
10519
  }
10430
10520
 
10431
10521
  /* Commands.contributeUsageError : String */
@@ -10490,17 +10580,17 @@ function Commands_contribute($0, $1, $2, $3, $4, $5) {
10490
10580
  }
10491
10581
  };
10492
10582
  const $72 = Prelude_Types_List_filterAppend({h: 0}, $75, $13);
10493
- const $7c = Prelude_Types_List_filterAppend({h: 0}, $80 => Commands_n__11337_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);
10494
10584
  const $89 = Data_List_partition($8c => Data_PullRequest_isRequestedReviewer(myLogin, $8c), $7c);
10495
- const $91 = Prelude_Interfaces_mapHom(csegen_603(), $97 => Data_List_sortBy(csegen_644(), $97))($89);
10585
+ const $91 = Prelude_Interfaces_mapHom(csegen_608(), $97 => Data_List_sortBy(csegen_650(), $97))($89);
10496
10586
  let $71;
10497
10587
  switch($54.h) {
10498
10588
  case 0: /* nothing */ {
10499
- $71 = () => Commands_n__11337_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);
10500
10590
  break;
10501
10591
  }
10502
10592
  case undefined: /* just */ {
10503
- $71 = () => $a8 => $a9 => Commands_n__11337_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);
10504
10594
  break;
10505
10595
  }
10506
10596
  }
@@ -10512,7 +10602,7 @@ function Commands_contribute($0, $1, $2, $3, $4, $5) {
10512
10602
  return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($31, $40, $2e, $2f);
10513
10603
  };
10514
10604
  };
10515
- return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($1f => $20 => Data_Promise_map_Functor_x28Promisex20x24ex29(csegen_364()(), FFI_GitHub_getSelf($2), $1f, $20), $2a, $1b, $1c);
10605
+ return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($1f => $20 => Data_Promise_map_Functor_x28Promisex20x24ex29(csegen_365()(), FFI_GitHub_getSelf($2), $1f, $20), $2a, $1b, $1c);
10516
10606
  };
10517
10607
  };
10518
10608
  return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(FFI_GitHub_listPullRequests($2, $0.a2, $0.a3, {a1: 0}, 100n, 0n), $12, $4, $5);
@@ -10534,8 +10624,8 @@ function Commands_x3cx7cx7cx3e($0, $1, $2, $3) {
10534
10624
  return $0.a3(undefined)($1($3))(() => $2($3));
10535
10625
  }
10536
10626
 
10537
- /* FFI.Concurrency.5712:17953:both */
10538
- 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) {
10539
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))));
10540
10630
  }
10541
10631
 
@@ -10578,7 +10668,7 @@ function FFI_Concurrency_fork($0, $1) {
10578
10668
 
10579
10669
  /* FFI.Concurrency.all : HasIO io => Foldable t => t Future -> io Future */
10580
10670
  function FFI_Concurrency_all($0, $1, $2) {
10581
- 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);
10582
10672
  }
10583
10673
 
10584
10674
  /* Data.SortedMap.map */
@@ -10618,7 +10708,7 @@ function Data_SortedMap_empty($0) {
10618
10708
 
10619
10709
  /* Data.SortedMap.Dependent.treeToList : Tree n k v o -> List (x : k ** v x) */
10620
10710
  function Data_SortedMap_Dependent_treeToList($0) {
10621
- 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);
10622
10712
  }
10623
10713
 
10624
10714
  /* Data.SortedMap.Dependent.treeMap : (a x -> b x) -> Tree n k a o -> Tree n k b o */
@@ -10746,67 +10836,67 @@ function Data_SortedMap_Dependent_empty($0) {
10746
10836
 
10747
10837
  /* Commands.User.Reflect.case block in case block in reflectOnSelf */
10748
10838
  function Commands_User_Reflect_case__casex20blockx20inx20reflectOnSelf_1920($0, $1, $2, $3, $4, $5, $6, $7, $8, $9) {
10749
- const $b = Prelude_Interfaces_mapHom(csegen_603(), $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_666(), $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});
10750
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));
10751
10841
  }
10752
10842
 
10753
- /* Commands.User.Me.7540:2049:ul */
10754
- function Commands_User_Me_n__7540_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) {
10755
10845
  return Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_underline(), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String($4));
10756
10846
  }
10757
10847
 
10758
- /* Commands.User.Me.7540:2048:teams */
10759
- function Commands_User_Me_n__7540_2048_teams($0, $1, $2, $3) {
10760
- return Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Commands_User_Me_n__7540_2049_ul($0, $1, $2, $3, 'GitHub Teams:'), a2: Prelude_Types_List_mapAppend({h: 0}, $11 => Commands_User_Me_n__7540_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)});
10761
10851
  }
10762
10852
 
10763
- /* Commands.User.Me.7540:2047:login */
10764
- function Commands_User_Me_n__7540_2047_login($0, $1, $2, $3) {
10765
- return Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('GitHub Login:'), Commands_User_Me_n__7540_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));
10766
10856
  }
10767
10857
 
10768
- /* Commands.User.Reflect.6595:1075:ital */
10769
- function Commands_User_Reflect_n__6595_1075_ital($0, $1) {
10858
+ /* Commands.User.Reflect.6604:1075:ital */
10859
+ function Commands_User_Reflect_n__6604_1075_ital($0, $1) {
10770
10860
  return Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_italic(), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String($1));
10771
10861
  }
10772
10862
 
10773
- /* Commands.User.Me.7540:2046:it */
10774
- function Commands_User_Me_n__7540_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) {
10775
10865
  return Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_italic(), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String($4));
10776
10866
  }
10777
10867
 
10778
- /* Commands.User.Me.7690:2202:handleUnsetEmail */
10779
- function Commands_User_Me_n__7690_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) {
10780
10870
  switch($3) {
10781
10871
  case '': return {h: 0};
10782
10872
  default: return {a1: $3};
10783
10873
  }
10784
10874
  }
10785
10875
 
10786
- /* Commands.User.Me.7540:2045:fullName */
10787
- function Commands_User_Me_n__7540_2045_fullName($0, $1, $2, $3) {
10788
- return Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('GitHub Name:'), Commands_User_Me_n__7540_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));
10789
10879
  }
10790
10880
 
10791
- /* Commands.User.Me.7540:2044:email */
10792
- function Commands_User_Me_n__7540_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) {
10793
10883
  let $8;
10794
10884
  switch($2.h) {
10795
10885
  case undefined: /* just */ {
10796
- $8 = Commands_User_Me_n__7540_2043_dataVal($0, $1, $2, $3, $2.a1);
10886
+ $8 = Commands_User_Me_n__7549_2043_dataVal($0, $1, $2, $3, $2.a1);
10797
10887
  break;
10798
10888
  }
10799
10889
  case 0: /* nothing */ {
10800
- $8 = Commands_User_Me_n__7540_2046_it($0, $1, $2, $3, 'Not set');
10890
+ $8 = Commands_User_Me_n__7549_2046_it($0, $1, $2, $3, 'Not set');
10801
10891
  break;
10802
10892
  }
10803
10893
  }
10804
10894
  return Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('Git Email:'), $8);
10805
10895
  }
10806
10896
 
10807
- /* Commands.User.Me.7540:2043:dataVal */
10808
- function Commands_User_Me_n__7540_2043_dataVal($0, $1, $2, $3, $4) {
10809
- return Theme_theme($3, csegen_669(), 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));
10810
10900
  }
10811
10901
 
10812
10902
  /* Commands.User.Reflect.rightTitle : String */
@@ -10829,20 +10919,20 @@ function Commands_User_Reflect_reflectOnSelf($0, $1, $2, $3) {
10829
10919
  const $c = prs => $d => $e => {
10830
10920
  const $1c = myLogin => $1d => $1e => {
10831
10921
  const $3a = reviews => {
10832
- const $3b = Prelude_Types_map_Functor_Maybe(csegen_672(), Data_List_headx27(Data_List_sortBy($44 => $45 => Prelude_Basics_on(csegen_642(), csegen_672(), $44, $45), reviews)));
10833
- const $4e = Prelude_Interfaces_mapHom(csegen_603(), $54 => Prelude_Types_List_filterAppend({h: 0}, $58 => Prelude_EqOrd_x3dx3d_Eq_String($58.a5, myLogin), $54))(prs);
10834
- return Commands_User_Reflect_case__casex20blockx20inx20reflectOnSelf_1920($0, $1, prs, myLogin, reviews, $3b, prs, $4e.a1, $4e.a2, Prelude_Interfaces_mapHom(csegen_603(), $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));
10835
10925
  };
10836
- 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_642(), csegen_666(), $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);
10837
10927
  };
10838
- return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($11 => $12 => Data_Promise_map_Functor_x28Promisex20x24ex29(csegen_364()(), FFI_GitHub_getSelf($1), $11, $12), $1c, $d, $e);
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);
10839
10929
  };
10840
10930
  return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(Commands_PullRequest_listPartitionedPRs($0, $1, 4n, Commands_User_Reflect_prCount()), $c, $2, $3);
10841
10931
  }
10842
10932
 
10843
10933
  /* Commands.User.Me.printInfoOnSelf : Config => Octokit => Git => Promise' () */
10844
10934
  function Commands_User_Me_printInfoOnSelf($0, $1, $2, $3, $4) {
10845
- return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($7 => $8 => Data_Promise_map_Functor_x28Promisex20x24ex29($b => Commands_User_Me_n__7690_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_628(), $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);
10846
10936
  }
10847
10937
 
10848
10938
  /* Commands.User.Reflect.print : Nat -> Nat -> Nat -> Nat -> Nat -> Nat -> Maybe Date -> Maybe Date -> Maybe Date -> Config =>
@@ -10853,7 +10943,7 @@ function Commands_User_Reflect_print($0, $1, $2, $3, $4, $5, $6, $7, $8, $9) {
10853
10943
 
10854
10944
  /* Commands.User.Me.print : Config -> Maybe String -> User -> List String -> Doc AnsiStyle */
10855
10945
  function Commands_User_Me_print($0, $1, $2, $3) {
10856
- return Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {a1: Commands_User_Me_n__7540_2044_email($3, $2, $1, $0), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {a1: Commands_User_Me_n__7540_2045_fullName($3, $2, $1, $0), a2: {a1: Commands_User_Me_n__7540_2047_login($3, $2, $1, $0), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {a1: Commands_User_Me_n__7540_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}}}}}}}}});
10857
10947
  }
10858
10948
 
10859
10949
  /* Commands.User.Reflect.prCount : Fin 101 */
@@ -10873,7 +10963,7 @@ const Commands_User_Reflect_intro = __lazy(function () {
10873
10963
 
10874
10964
  /* Commands.User.Reflect.header : Nat -> Doc AnsiStyle */
10875
10965
  function Commands_User_Reflect_header($0) {
10876
- return Text_PrettyPrint_Prettyprinter_Doc_indent(Number(_truncBigInt32($0)), Text_PrettyPrint_Prettyprinter_Doc_hsep({a1: Commands_User_Reflect_n__6595_1075_ital($0, Commands_User_Reflect_leftTitle()), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(' '), a2: {a1: Commands_User_Reflect_n__6595_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}}}}));
10877
10967
  }
10878
10968
 
10879
10969
  /* Commands.User.Reflect.graph : Nat -> Nat -> Nat -> Nat -> Nat -> Nat -> Config => Doc AnsiStyle */
@@ -10891,12 +10981,12 @@ function Commands_User_Reflect_graph($0, $1, $2, $3, $4, $5, $6) {
10891
10981
 
10892
10982
  /* Commands.User.Reflect.details : Nat -> Nat -> Nat -> Nat -> Nat -> Nat -> Maybe Date -> Maybe Date -> Maybe Date -> Doc AnsiStyle */
10893
10983
  function Commands_User_Reflect_details($0, $1, $2, $3, $4, $5, $6, $7, $8) {
10894
- 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_678(), $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_678(), $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}}}}}}}}}});
10895
10985
  }
10896
10986
 
10897
10987
  /* Commands.User.Reflect.chart : Nat -> Nat -> Nat -> Nat -> Nat -> Nat -> Config => Nat -> Doc AnsiStyle */
10898
10988
  function Commands_User_Reflect_chart($0, $1, $2, $3, $4, $5, $6, $7) {
10899
- 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_669(), csegen_688(), 4, $1, '\u{b7}'), Commands_User_replicatex27($6, csegen_689(), csegen_689(), 7, $3, '\u{25e6}')), Commands_User_replicatex27($6, csegen_690(), csegen_690(), 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_690(), csegen_690(), 5, $5, '>'), Commands_User_replicatex27($6, csegen_669(), csegen_688(), 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}')))));
10900
10990
  }
10901
10991
 
10902
10992
  /* Theme.4411:1332:maybeAnnotate */
@@ -10982,104 +11072,100 @@ function Commands_PullRequest_with__listOpenPRs_1391($0, $1, $2, $3, $4) {
10982
11072
  }
10983
11073
  }
10984
11074
 
10985
- /* Commands.PullRequest.case block in case block in case block in identifyOrCreatePR,createPR */
10986
- function Commands_PullRequest_case__casex20blockx20inx20casex20blockx20inx20identifyOrCreatePRx2ccreatePR_3538($0, $1, $2, $3, $4, $5, $6, $7, $8, $9, $a, $b) {
10987
- const $1b = $1c => $1d => $1e => {
10988
- const $2d = $2e => $2f => $30 => {
10989
- const $41 = title => $42 => $43 => {
10990
- const $4d = templateFilePath => $4e => $4f => {
10991
- const $52 = Data_Config_rf__editor($5);
10992
- let $51;
10993
- switch($52.h) {
10994
- case 0: /* nothing */ {
10995
- $51 = Util_Prompting_inlineDescription(csegen_74()(), Commands_PullRequest_n__11100_3054_inlineDescriptionPrompt($0, $1, $2, $3, $4, $5), $9.a2);
10996
- break;
10997
- }
10998
- case undefined: /* just */ {
10999
- $51 = $62 => $63 => Data_Promise_map_Functor_x28Promisex20x24ex29(csegen_695(), Util_Prompting_editorDescription(csegen_74()(), $52.a1, {a1: templateFilePath}, $9.a2), $62, $63);
11000
- break;
11001
- }
11002
- }
11003
- return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($51, description => $73 => $74 => Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($77 => $78 => $79 => Data_Promise_liftIO_HasIO_x28Promisex20x24ex29($7c => Prelude_IO_prim__putStr('Creating PR...\n', $7c), $77, $78, $79), $84 => $85 => $86 => Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($89 => $8a => $8b => Data_Promise_liftIO_HasIO_x28Promisex20x24ex29($8e => Prelude_IO_prim__putStr(($2+'\n'), $8e), $89, $8a, $8b), $98 => FFI_GitHub_createPR($1, $4, $5.a2, $5.a3, $2, $8, title, description), $85, $86), $73, $74), $4e, $4f);
11004
- };
11005
- return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($46 => $47 => Util_relativeToRoot($0, '.github/PULL_REQUEST_TEMPLATE.md', $46, $47), $4d, $42, $43);
11006
- };
11007
- return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($33 => $34 => Data_Promise_map_Functor_x28Promisex20x24ex29($37 => ($9.a1+Data_String_trim($37)), csegen_405()(), $33, $34), $41, $2f, $30);
11008
- };
11009
- return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($21 => $22 => $23 => Data_Promise_liftIO_HasIO_x28Promisex20x24ex29($26 => Prelude_IO_prim__putStr($9.a1, $26), $21, $22, $23), $2d, $1d, $1e);
11075
+ /* Commands.PullRequest.case block in githubTitleAndBodyPrefix */
11076
+ function Commands_PullRequest_case__githubTitleAndBodyPrefix_2919($0, $1, $2, $3, $4) {
11077
+ return $5 => {
11078
+ switch($3.h) {
11079
+ case 0: /* nothing */ return Data_Promise_pure_Applicative_x28Promisex20x24ex29({a1: '', a2: ''}, $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);
11081
+ }
11010
11082
  };
11011
- return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($f => $10 => $11 => Data_Promise_liftIO_HasIO_x28Promisex20x24ex29($14 => Prelude_IO_prim__putStr('What would you like the title to be?\n', $14), $f, $10, $11), $1b, $a, $b);
11012
11083
  }
11013
11084
 
11014
- /* Commands.PullRequest.10007:1999:userNotice */
11015
- function Commands_PullRequest_n__10007_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) {
11016
11087
  switch($6.h) {
11017
11088
  case 0: /* nothing */ {
11018
11089
  switch($2.h) {
11019
11090
  case 0: /* nil */ return 'no users';
11020
- default: return Prelude_Types_foldMap_Foldable_List(csegen_51()(), $e => $e, {a1: Commands_PullRequest_n__10007_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}});
11021
11092
  }
11022
11093
  }
11023
- case undefined: /* just */ return Prelude_Types_foldMap_Foldable_List(csegen_51()(), $1f => $1f, {a1: Commands_PullRequest_n__10007_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}});
11024
11095
  }
11025
11096
  }
11026
11097
 
11027
- /* Commands.PullRequest.10007:1998:teamNotice */
11028
- function Commands_PullRequest_n__10007_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) {
11029
11100
  switch($6.h) {
11030
11101
  case 0: /* nil */ return '';
11031
11102
  case undefined: /* cons */ {
11032
11103
  switch($6.a2.h) {
11033
- case 0: /* nil */ return Prelude_Types_foldMap_Foldable_List(csegen_51()(), $e => $e, {a1: ' and team ', a2: {a1: Commands_PullRequest_n__10007_1994_csv($0, $1, $2, $3, $4, $5, {a1: $6.a1, a2: {h: 0}}), a2: {h: 0}}});
11034
- default: return Prelude_Types_foldMap_Foldable_List(csegen_51()(), $23 => $23, {a1: ' and teams ', a2: {a1: Commands_PullRequest_n__10007_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}}});
11035
11106
  }
11036
11107
  }
11037
- default: return Prelude_Types_foldMap_Foldable_List(csegen_51()(), $36 => $36, {a1: ' and teams ', a2: {a1: Commands_PullRequest_n__10007_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}}});
11038
11109
  }
11039
11110
  }
11040
11111
 
11041
- /* Commands.PullRequest.11100:3055:prCreationUrl */
11042
- function Commands_PullRequest_n__11100_3055_prCreationUrl($0, $1, $2, $3, $4, $5) {
11112
+ /* Commands.PullRequest.10961:2843:relatedToPrefix */
11113
+ function Commands_PullRequest_n__10961_2843_relatedToPrefix($0, $1, $2, $3) {
11114
+ return Prelude_Types_foldMap_Foldable_List(csegen_51()(), $9 => $9, {a1: 'Related to #', a2: {a1: $3, a2: {h: 0}}});
11115
+ }
11116
+
11117
+ /* Commands.PullRequest.11195:3087:prCreationUrl */
11118
+ function Commands_PullRequest_n__11195_3087_prCreationUrl($0, $1, $2, $3, $4, $5) {
11043
11119
  const $6 = $5.a3;
11044
11120
  const $8 = $5.a2;
11045
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}}}}}}}});
11046
11122
  }
11047
11123
 
11048
- /* Commands.PullRequest.10007:1997:prComment */
11049
- function Commands_PullRequest_n__10007_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) {
11050
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}}}});
11051
11127
  }
11052
11128
 
11053
- /* Commands.PullRequest.10007:1996:namePrComment */
11054
- function Commands_PullRequest_n__10007_1996_namePrComment($0, $1, $2, $3, $4, $5, $6) {
11055
- return Commands_PullRequest_n__10007_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}}));
11132
+ }
11133
+
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}}}));
11056
11137
  }
11057
11138
 
11058
- /* Commands.PullRequest.10007:1995:mentionPrComment */
11059
- function Commands_PullRequest_n__10007_1995_mentionPrComment($0, $1, $2, $3, $4, $5, $6) {
11060
- return Commands_PullRequest_n__10007_1997_prComment($0, $1, $2, $3, $4, $5, Prelude_Types_foldMap_Foldable_List(csegen_51()(), $14 => $14, {a1: '@', a2: {a1: $6, a2: {h: 0}}}));
11139
+ /* Commands.PullRequest.10961:2842:issueNumber */
11140
+ function Commands_PullRequest_n__10961_2842_issueNumber($0, $1, $2) {
11141
+ return Util_Github_parseGithubIssueNumber($1);
11061
11142
  }
11062
11143
 
11063
- /* Commands.PullRequest.11100:3054:inlineDescriptionPrompt */
11064
- function Commands_PullRequest_n__11100_3054_inlineDescriptionPrompt($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) {
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);
11147
+ }
11148
+
11149
+ /* Commands.PullRequest.11195:3086:inlineDescriptionPrompt */
11150
+ function Commands_PullRequest_n__11195_3086_inlineDescriptionPrompt($0, $1, $2, $3, $4, $5) {
11065
11151
  return 'What would you like the description to be (two blank lines to finish)?';
11066
11152
  }
11067
11153
 
11068
- /* Commands.PullRequest.11100:3053:getBaseBranch */
11069
- function Commands_PullRequest_n__11100_3053_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) {
11070
11156
  switch($3.h) {
11071
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);
11072
- 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_405()(), $50, $51), $6, $7);
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);
11073
11159
  }
11074
11160
  }
11075
11161
 
11076
- /* Commands.PullRequest.9769:1725:forkedReviews */
11077
- function Commands_PullRequest_n__9769_1725_forkedReviews($0, $1, $2, $3) {
11162
+ /* Commands.PullRequest.9829:1725:forkedReviews */
11163
+ function Commands_PullRequest_n__9829_1725_forkedReviews($0, $1, $2, $3) {
11078
11164
  return FFI_Concurrency_fork(csegen_74()(), ('reviews --json '+Prelude_Show_show_Show_Integer($3.a1)));
11079
11165
  }
11080
11166
 
11081
- /* Commands.PullRequest.9192:1180:filterString */
11082
- function Commands_PullRequest_n__9192_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) {
11083
11169
  switch($4.h) {
11084
11170
  case 0: /* nothing */ return 'none';
11085
11171
  case undefined: /* just */ {
@@ -11091,13 +11177,13 @@ function Commands_PullRequest_n__9192_1180_filterString($0, $1, $2, $3, $4) {
11091
11177
  }
11092
11178
  }
11093
11179
 
11094
- /* Commands.PullRequest.10007:1994:csv */
11095
- function Commands_PullRequest_n__10007_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) {
11096
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)));
11097
11183
  }
11098
11184
 
11099
- /* Commands.PullRequest.11100:3052:createPR */
11100
- function Commands_PullRequest_n__11100_3052_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) {
11101
11187
  const $3b = $3c => $3d => $3e => {
11102
11188
  const $4c = $4d => $4e => $4f => {
11103
11189
  switch($4d) {
@@ -11114,37 +11200,73 @@ function Commands_PullRequest_n__11100_3052_createPR($0, $1, $2, $3, $4, $5, $6,
11114
11200
  };
11115
11201
  return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($69 => $6a => FFI_Git_unpushedCommits($0, $69, $6a), $6f, $65, $66);
11116
11202
  };
11117
- return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($64, $d0 => $d1 => $d2 => 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), $f1 => $f2 => $f3 => Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($f6 => $f7 => Commands_PullRequest_n__11100_3053_getBaseBranch($0, $1, $2, $3, $4, $5, $f6, $f7), baseBranch => $102 => $103 => Commands_PullRequest_case__casex20blockx20inx20casex20blockx20inx20identifyOrCreatePRx2ccreatePR_3538($0, $1, $2, $3, $4, $5, 1, 1, baseBranch, Commands_PullRequest_parseTitleAndBodyPrefix($5, $2), $102, $103), $f2, $f3), $d1, $d2), $60, $61);
11203
+ const $cf = $d0 => $d1 => $d2 => {
11204
+ const $f0 = $f1 => $f2 => $f3 => {
11205
+ const $101 = baseBranch => $102 => $103 => {
11206
+ const $10a = $10b => $10c => $10d => {
11207
+ const $11d = $11e => $11f => $120 => {
11208
+ const $12f = $130 => $131 => $132 => {
11209
+ const $143 = title => $144 => $145 => {
11210
+ const $14f = templateFilePath => $150 => $151 => {
11211
+ const $154 = Data_Config_rf__editor($5);
11212
+ let $153;
11213
+ switch($154.h) {
11214
+ case 0: /* nothing */ {
11215
+ $153 = Util_Prompting_inlineDescription(csegen_74()(), Commands_PullRequest_n__11195_3086_inlineDescriptionPrompt($0, $1, $2, $3, $4, $5), $10b.a2);
11216
+ break;
11217
+ }
11218
+ case undefined: /* just */ {
11219
+ $153 = $164 => $165 => Data_Promise_map_Functor_x28Promisex20x24ex29(csegen_710(), Util_Prompting_editorDescription(csegen_74()(), $154.a1, {a1: templateFilePath}, $10b.a2), $164, $165);
11220
+ break;
11221
+ }
11222
+ }
11223
+ return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($153, description => $175 => $176 => Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($179 => $17a => $17b => Data_Promise_liftIO_HasIO_x28Promisex20x24ex29($17e => Prelude_IO_prim__putStr('Creating PR...\n', $17e), $179, $17a, $17b), $186 => $187 => $188 => Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($18b => $18c => $18d => Data_Promise_liftIO_HasIO_x28Promisex20x24ex29($190 => Prelude_IO_prim__putStr(($2+'\n'), $190), $18b, $18c, $18d), $19a => FFI_GitHub_createPR($1, $4, $5.a2, $5.a3, $2, baseBranch, title, description), $187, $188), $175, $176), $150, $151);
11224
+ };
11225
+ return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($148 => $149 => Util_relativeToRoot($0, '.github/PULL_REQUEST_TEMPLATE.md', $148, $149), $14f, $144, $145);
11226
+ };
11227
+ return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($135 => $136 => Data_Promise_map_Functor_x28Promisex20x24ex29($139 => ($10b.a1+Data_String_trim($139)), csegen_406()(), $135, $136), $143, $131, $132);
11228
+ };
11229
+ return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($123 => $124 => $125 => Data_Promise_liftIO_HasIO_x28Promisex20x24ex29($128 => Prelude_IO_prim__putStr($10b.a1, $128), $123, $124, $125), $12f, $11f, $120);
11230
+ };
11231
+ return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($111 => $112 => $113 => Data_Promise_liftIO_HasIO_x28Promisex20x24ex29($116 => Prelude_IO_prim__putStr('What would you like the title to be?\n', $116), $111, $112, $113), $11d, $10c, $10d);
11232
+ };
11233
+ return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(Commands_PullRequest_getTitleAndBodyPrefix($5, $1, $2), $10a, $102, $103);
11234
+ };
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);
11236
+ };
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);
11238
+ };
11239
+ return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($64, $cf, $60, $61);
11118
11240
  }
11119
11241
  case 0: return Data_Promise_reject('Not creating a PR (for now)...', $60, $61);
11120
11242
  }
11121
11243
  };
11122
- return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($53 => $54 => Commands_PullRequest_n__11100_3050_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);
11123
11245
  }
11124
11246
  case 0: return Data_Promise_reject('Not creating a PR (for now)...', $4e, $4f);
11125
11247
  }
11126
11248
  };
11127
- return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($41 => $42 => Commands_PullRequest_n__11100_3051_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);
11128
11250
  };
11129
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);
11130
11252
  }
11131
11253
 
11132
- /* Commands.PullRequest.11100:3051:continueGivenUncommittedChanges */
11133
- function Commands_PullRequest_n__11100_3051_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) {
11134
11256
  const $10 = $11 => $12 => $13 => {
11135
11257
  switch($11.h) {
11136
- 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_709(), $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);
11137
11259
  case 0: /* nothing */ return Data_Promise_pure_Applicative_x28Promisex20x24ex29(1, $12, $13);
11138
11260
  }
11139
11261
  };
11140
11262
  return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($a => $b => FFI_Git_uncommittedChanges($0, $a, $b), $10, $6, $7);
11141
11263
  }
11142
11264
 
11143
- /* Commands.PullRequest.11100:3050:continueGivenStagedChanges */
11144
- function Commands_PullRequest_n__11100_3050_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) {
11145
11267
  const $10 = $11 => $12 => $13 => {
11146
11268
  switch($11.h) {
11147
- 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_709(), $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);
11148
11270
  case 0: /* nothing */ return Data_Promise_pure_Applicative_x28Promisex20x24ex29(1, $12, $13);
11149
11271
  }
11150
11272
  };
@@ -11153,12 +11275,12 @@ function Commands_PullRequest_n__11100_3050_continueGivenStagedChanges($0, $1, $
11153
11275
 
11154
11276
  /* Commands.PullRequest.(.allReviewers) : PRHistory -> (List String, List String) */
11155
11277
  function Commands_PullRequest_rf__allReviewers($0) {
11156
- return Prelude_Interfaces_mapHom(csegen_603(), $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);
11157
11279
  }
11158
11280
 
11159
11281
  /* Commands.PullRequest.reviewsForPrs : Config => Octokit => List PullRequest -> Promise' (List Review) */
11160
11282
  function Commands_PullRequest_reviewsForPrs($0, $1, $2, $3, $4) {
11161
- return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(Prelude_Basics_flip(csegen_67()(), csegen_630(), Prelude_Types_traverse_Traversable_List(csegen_66()(), $13 => Commands_PullRequest_n__9769_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);
11162
11284
  }
11163
11285
 
11164
11286
  /* Commands.PullRequest.reviewsByUser : Config => Octokit => String -> List PullRequest -> Promise' (List Review) */
@@ -11209,7 +11331,7 @@ function Commands_PullRequest_requestReviewers($0, $1, $2, $3, $4, $5, $6, $7) {
11209
11331
  break;
11210
11332
  }
11211
11333
  case 0: {
11212
- $38 = csegen_407()();
11334
+ $38 = csegen_408()();
11213
11335
  break;
11214
11336
  }
11215
11337
  }
@@ -11245,8 +11367,8 @@ function Commands_PullRequest_requestReviewers($0, $1, $2, $3, $4, $5, $6, $7) {
11245
11367
  return $7f => {
11246
11368
  switch($0.a8) {
11247
11369
  case 0: return Data_Promise_pure_Applicative_x28Promisex20x24ex29(undefined, $7d, $7f);
11248
- case 2: return FFI_GitHub_createComment($1, $0.a2, $0.a3, $2.a1, Commands_PullRequest_n__10007_1995_mentionPrComment($1, $5, $4, $3, $2, $0, chosenUser.a1), $7d, $7f);
11249
- 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__10007_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);
11250
11372
  }
11251
11373
  };
11252
11374
  }
@@ -11270,11 +11392,11 @@ function Commands_PullRequest_requestReviewers($0, $1, $2, $3, $4, $5, $6, $7) {
11270
11392
  let $bf;
11271
11393
  switch($c0) {
11272
11394
  case 1: {
11273
- $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__10007_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);
11274
11396
  break;
11275
11397
  }
11276
11398
  case 0: {
11277
- $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__10007_1999_userNotice($1, $5, $4, $3, $2, $0, chosenUser), a2: {a1: Commands_PullRequest_n__10007_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);
11278
11400
  break;
11279
11401
  }
11280
11402
  }
@@ -11300,15 +11422,6 @@ function Commands_PullRequest_partition($0) {
11300
11422
  return Prelude_Basics_uncurry(csegen_94(), Data_List_partition($7 => Data_PullRequest_x3dx3d_Eq_PRState($7.a6, 0), $0));
11301
11423
  }
11302
11424
 
11303
- /* Commands.PullRequest.parseTitleAndBodyPrefix : Config => String -> (String, String) */
11304
- function Commands_PullRequest_parseTitleAndBodyPrefix($0, $1) {
11305
- switch($0.a9) {
11306
- case 1: return {a1: Data_Maybe_fromMaybe(() => '', Prelude_Types_map_Functor_Maybe($a => ($a+' - '), Util_Jira_parseJiraSlug($1))), a2: ''};
11307
- case 2: return {a1: '', a2: Data_Maybe_fromMaybe(() => '', Prelude_Types_map_Functor_Maybe($18 => ('Related to #'+$18), Util_Github_parseGithubIssueNumber($1)))};
11308
- case 0: return {a1: '', a2: ''};
11309
- }
11310
- }
11311
-
11312
11425
  /* Commands.PullRequest.listReviewers : Config => Octokit => {default 0 _ : Nat} -> Fin 101 -> Promise' (List String,
11313
11426
  List String) */
11314
11427
  function Commands_PullRequest_listReviewers($0, $1, $2, $3, $4, $5) {
@@ -11328,7 +11441,7 @@ function Commands_PullRequest_listOpenPRs($0, $1, $2, $3) {
11328
11441
 
11329
11442
  /* Commands.PullRequest.list' : Maybe GitHubPRState -> Pagination _ _ _ () -> Promise' (List PullRequest) */
11330
11443
  function Commands_PullRequest_listx27($0, $1, $2, $3) {
11331
- return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(Prelude_Basics_flip(csegen_67()(), $b => $c => $d => FFI_Concurrency_promiseAll({a1: acc => elem => func => init => input => Data_Pagination_foldr_Foldable_x28x28x28Paginationx20x24itemsx29x20x24perPagex29x20x24pagex29(func, init, input), a2: elem => acc => func => init => input => Data_Pagination_foldl_Foldable_x28x28x28Paginationx20x24itemsx29x20x24perPagex29x20x24pagex29(func, init, input), a3: elem => $1b => Data_Pagination_null_Foldable_x28x28x28Paginationx20x24itemsx29x20x24perPagex29x20x24pagex29($1b), a4: elem => acc => m => $1f => funcM => init => input => Data_Pagination_foldlM_Foldable_x28x28x28Paginationx20x24itemsx29x20x24perPagex29x20x24pagex29($1f, funcM, init, input), a5: elem => $26 => Data_Pagination_toList_Foldable_x28x28x28Paginationx20x24itemsx29x20x24perPagex29x20x24pagex29($26), a6: a => m => $2a => f => $2b => Data_Pagination_foldMap_Foldable_x28x28x28Paginationx20x24itemsx29x20x24perPagex29x20x24pagex29($2a, f, $2b)}, $b, $c, $d), Data_Pagination_traversex27(csegen_66()(), $39 => $3a => $3b => $3c => Commands_PullRequest_forkedPRs($0, $39, $3a, $3b, $3c), $1)), prJsons => $45 => $46 => Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($49 => Data_Promise_either(Prelude_Types_traverse_Traversable_List(csegen_222(), csegen_345(), prJsons), $49), pulls => $54 => $55 => Data_Promise_pure_Applicative_x28Promisex20x24ex29(Prelude_Types_join_Monad_List(pulls), $54, $55), $45, $46), $2, $3);
11444
+ return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(Prelude_Basics_flip(csegen_67()(), $b => $c => $d => FFI_Concurrency_promiseAll({a1: acc => elem => func => init => input => Data_Pagination_foldr_Foldable_x28x28x28Paginationx20x24itemsx29x20x24perPagex29x20x24pagex29(func, init, input), a2: elem => acc => func => init => input => Data_Pagination_foldl_Foldable_x28x28x28Paginationx20x24itemsx29x20x24perPagex29x20x24pagex29(func, init, input), a3: elem => $1b => Data_Pagination_null_Foldable_x28x28x28Paginationx20x24itemsx29x20x24perPagex29x20x24pagex29($1b), a4: elem => acc => m => $1f => funcM => init => input => Data_Pagination_foldlM_Foldable_x28x28x28Paginationx20x24itemsx29x20x24perPagex29x20x24pagex29($1f, funcM, init, input), a5: elem => $26 => Data_Pagination_toList_Foldable_x28x28x28Paginationx20x24itemsx29x20x24perPagex29x20x24pagex29($26), a6: a => m => $2a => f => $2b => Data_Pagination_foldMap_Foldable_x28x28x28Paginationx20x24itemsx29x20x24perPagex29x20x24pagex29($2a, f, $2b)}, $b, $c, $d), Data_Pagination_traversex27(csegen_66()(), $39 => $3a => $3b => $3c => Commands_PullRequest_forkedPRs($0, $39, $3a, $3b, $3c), $1)), prJsons => $45 => $46 => Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($49 => Data_Promise_either(Prelude_Types_traverse_Traversable_List(csegen_222(), csegen_346(), prJsons), $49), pulls => $54 => $55 => Data_Promise_pure_Applicative_x28Promisex20x24ex29(Prelude_Types_join_Monad_List(pulls), $54, $55), $45, $46), $2, $3);
11332
11445
  }
11333
11446
 
11334
11447
  /* Commands.PullRequest.identifyOrCreatePR : Config => Git => Octokit => {default False _ : Bool} ->
@@ -11348,8 +11461,8 @@ function Commands_PullRequest_identifyOrCreatePR($0, $1, $2, $3, $4, $5, $6, $7)
11348
11461
  return $21 => {
11349
11462
  const $2a = $2b => $2c => $2d => {
11350
11463
  switch($2b) {
11351
- case 1: return Data_Promise_map_Functor_x28Promisex20x24ex29($31 => ({h: 0 /* Actual */, a1: 1, a2: $31}), $35 => $36 => Commands_PullRequest_n__11100_3052_createPR($1, $2, $5, $4, $3, $0, $35, $36), $2c, $2d);
11352
- case 0: return Data_Promise_pure_Applicative_x28Promisex20x24ex29({h: 1 /* Hypothetical */, a1: Commands_PullRequest_n__11100_3055_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);
11353
11466
  }
11354
11467
  };
11355
11468
  return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(System_File_Meta_isTTY(csegen_74()(), System_File_Virtual_stdout()), $2a, $13, $21);
@@ -11361,9 +11474,23 @@ function Commands_PullRequest_identifyOrCreatePR($0, $1, $2, $3, $4, $5, $6, $7)
11361
11474
  return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(FFI_GitHub_listPRsForBranch($2, $0.a2, $0.a3, $5), $11, $6, $7);
11362
11475
  }
11363
11476
 
11477
+ /* Commands.PullRequest.githubTitleAndBodyPrefix : Config => Octokit => String -> Promise' (String, String) */
11478
+ function Commands_PullRequest_githubTitleAndBodyPrefix($0, $1, $2) {
11479
+ return $3 => Commands_PullRequest_case__githubTitleAndBodyPrefix_2919($1, $2, $0, Commands_PullRequest_n__10961_2842_issueNumber($1, $2, $0), $3);
11480
+ }
11481
+
11482
+ /* Commands.PullRequest.getTitleAndBodyPrefix : Config => Octokit => String -> Promise' (String, String) */
11483
+ function Commands_PullRequest_getTitleAndBodyPrefix($0, $1, $2) {
11484
+ switch($0.a9) {
11485
+ case 1: return $5 => $6 => Data_Promise_pure_Applicative_x28Promisex20x24ex29({a1: Data_Maybe_fromMaybe(() => '', Prelude_Types_map_Functor_Maybe($f => ($f+' - '), Util_Jira_parseJiraSlug($2))), a2: ''}, $5, $6);
11486
+ case 2: return Commands_PullRequest_githubTitleAndBodyPrefix($0, $1, $2);
11487
+ case 0: return $1c => $1d => Data_Promise_pure_Applicative_x28Promisex20x24ex29({a1: '', a2: ''}, $1c, $1d);
11488
+ }
11489
+ }
11490
+
11364
11491
  /* Commands.PullRequest.forkedPRs : Maybe GitHubPRState -> Nat -> Nat -> Nat -> () -> Promise' Future */
11365
11492
  function Commands_PullRequest_forkedPRs($0, $1, $2, $3, $4) {
11366
- return FFI_Concurrency_fork(csegen_74()(), Prelude_Types_foldMap_Foldable_List(csegen_51()(), $f => $f, {a1: 'pulls --json ', a2: {a1: Commands_PullRequest_n__9192_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}}}}}}}));
11367
11494
  }
11368
11495
 
11369
11496
  /* Commands.PullRequest.empty : PRHistory */
@@ -11485,7 +11612,7 @@ function Util_Github_n__2629_823_go($0, $1) {
11485
11612
 
11486
11613
  /* Util.Github.parseGithubIssueNumber : String -> Maybe String */
11487
11614
  function Util_Github_parseGithubIssueNumber($0) {
11488
- return Prelude_Types_map_Functor_Maybe(csegen_746(), 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))));
11489
11616
  }
11490
11617
 
11491
11618
  /* Util.Jira.2629:820:startOver */
@@ -11545,30 +11672,30 @@ function Util_Jira_n__2629_818_go($0, $1) {
11545
11672
 
11546
11673
  /* Util.Jira.parseJiraSlug : String -> Maybe String */
11547
11674
  function Util_Jira_parseJiraSlug($0) {
11548
- return Prelude_Types_map_Functor_Maybe(csegen_746(), 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))));
11549
11676
  }
11550
11677
 
11551
11678
  /* Data.Pagination.with block in metaPages' */
11552
- function Data_Pagination_with__metaPagesx27_7501($0, $1, $2, $3, $4, $5, $6) {
11679
+ function Data_Pagination_with__metaPagesx27_7597($0, $1, $2, $3, $4, $5, $6) {
11553
11680
  const $7 = $8 => Data_Pagination_divNatNZLemma($0, $1, $6);
11554
11681
  return Data_Pagination_pagesHelper(0n, $0, $3, $7(undefined), $5);
11555
11682
  }
11556
11683
 
11557
11684
  /* Data.Pagination.with block in with block in divNatNZLemma */
11558
- function Data_Pagination_with__withx20blockx20inx20divNatNZLemma_7442($0, $1, $2, $3, $4, $5) {
11685
+ function Data_Pagination_with__withx20blockx20inx20divNatNZLemma_7538($0, $1, $2, $3, $4, $5) {
11559
11686
  return Prelude_Uninhabited_void$();
11560
11687
  }
11561
11688
 
11562
11689
  /* Data.Pagination.with block in divNatNZLemma */
11563
- function Data_Pagination_with__divNatNZLemma_7424($0, $1, $2, $3, $4, $5) {
11690
+ function Data_Pagination_with__divNatNZLemma_7520($0, $1, $2, $3, $4, $5) {
11564
11691
  switch($2) {
11565
11692
  case 0: return 1n;
11566
- case 1: return Data_Pagination_with__withx20blockx20inx20divNatNZLemma_7442($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);
11567
11694
  }
11568
11695
  }
11569
11696
 
11570
11697
  /* Data.Pagination.with block in pagesHelper */
11571
- function Data_Pagination_with__pagesHelper_7266($0, $1, $2, $3, $4, $5) {
11698
+ function Data_Pagination_with__pagesHelper_7380($0, $1, $2, $3, $4, $5) {
11572
11699
  switch($2.h) {
11573
11700
  case 0: /* Yes */ {
11574
11701
  const $7 = Data_Pagination_lemma($0, $1, $2.a1);
@@ -11579,12 +11706,12 @@ function Data_Pagination_with__pagesHelper_7266($0, $1, $2, $3, $4, $5) {
11579
11706
  }
11580
11707
 
11581
11708
  /* Data.Pagination.with block in nonTerminalPage */
11582
- function Data_Pagination_with__nonTerminalPage_7245($0, $1, $2, $3, $4, $5, $6, $7) {
11709
+ function Data_Pagination_with__nonTerminalPage_7359($0, $1, $2, $3, $4, $5, $6, $7) {
11583
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)};
11584
11711
  }
11585
11712
 
11586
11713
  /* Data.Pagination.with block in lemma */
11587
- function Data_Pagination_with__lemma_7148($0, $1, $2, $3, $4) {
11714
+ function Data_Pagination_with__lemma_7262($0, $1, $2, $3, $4) {
11588
11715
  return {a1: ($3.a1+1n), a2: {a1: undefined, a2: 1n}};
11589
11716
  }
11590
11717
 
@@ -11633,21 +11760,21 @@ function Data_Pagination_traversex27($0, $1, $2) {
11633
11760
  /* Data.Pagination.pagesHelper : (page : Nat) -> (remainingItems : Nat) -> (perPage : Nat) -> GT perPage 0 =>
11634
11761
  GT remainingItems 0 => PaginationShape remainingItems perPage page */
11635
11762
  function Data_Pagination_pagesHelper($0, $1, $2, $3, $4) {
11636
- return Data_Pagination_with__pagesHelper_7266($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);
11637
11764
  }
11638
11765
 
11639
11766
  /* Data.Pagination.nonTerminalPage : (page : Nat) -> (remainingItems : Nat) -> (perPage : Nat) ->
11640
11767
  {auto 0 _ : remainder + perPage = remainingItems} -> GT perPage 0 =>
11641
11768
  GT remainder 0 => PaginationShape remainingItems perPage page */
11642
11769
  function Data_Pagination_nonTerminalPage($0, $1, $2, $3, $4, $5) {
11643
- return Data_Pagination_with__nonTerminalPage_7245($0, $3, $2, undefined, undefined, $5, $4, $1);
11770
+ return Data_Pagination_with__nonTerminalPage_7359($0, $3, $2, undefined, undefined, $5, $4, $1);
11644
11771
  }
11645
11772
 
11646
11773
  /* Data.Pagination.metaPages' : (items : Nat) -> (pages : Nat) -> GT items 0 => {auto 0 pagesOk : GT pages 0} ->
11647
11774
  LTE pages items =>
11648
11775
  PaginationShape items (divNatNZ items pages (gtIsNonZero pagesOk)) 0 */
11649
11776
  function Data_Pagination_metaPagesx27($0, $1, $2, $3) {
11650
- return Data_Pagination_with__metaPagesx27_7501($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);
11651
11778
  }
11652
11779
 
11653
11780
  /* Data.Pagination.metaPages : (items : Nat) -> (perPage : Nat) -> GT items 0 => GT perPage 0 =>
@@ -11671,7 +11798,7 @@ function Data_Pagination_lemma($0, $1, $2) {
11671
11798
  case 0n: _crashExp('Nat case not covered');
11672
11799
  default: {
11673
11800
  const $8 = ($2-1n);
11674
- return Data_Pagination_with__lemma_7148($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);
11675
11802
  }
11676
11803
  }
11677
11804
  }
@@ -11693,7 +11820,7 @@ function Data_Pagination_divNatNZLemma($0, $1, $2) {
11693
11820
  case 0n: _crashExp('Nat case not covered');
11694
11821
  default: {
11695
11822
  const $a = ($1-1n);
11696
- return Data_Pagination_with__divNatNZLemma_7424($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);
11697
11824
  }
11698
11825
  }
11699
11826
  }
@@ -11814,14 +11941,14 @@ function Data_List_DeleteBy_deleteByx27($0, $1, $2) {
11814
11941
  }
11815
11942
  }
11816
11943
 
11817
- /* Commands.Quick.5799:5628:issuePrompt */
11818
- function Commands_Quick_n__5799_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) {
11819
11946
  return 'What would you like the issue description to be (two blank lines to finish)?';
11820
11947
  }
11821
11948
 
11822
- /* Commands.Quick.5799:5627:branchPrefix */
11823
- function Commands_Quick_n__5799_5627_branchPrefix($0, $1, $2, $3) {
11824
- 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));
11825
11952
  }
11826
11953
 
11827
11954
  /* Commands.Quick.show */
@@ -11832,40 +11959,43 @@ function Commands_Quick_show_Show_IssueCategory($0) {
11832
11959
  }
11833
11960
  }
11834
11961
 
11835
- /* Commands.Quick.quickStartNewWork : Config => Git => Octokit => IssueCategory -> Promise' () */
11836
- function Commands_Quick_quickStartNewWork($0, $1, $2, $3, $4, $5) {
11837
- const $14 = $15 => $16 => $17 => {
11838
- const $1c = $1d => $1e => $1f => {
11839
- const $2e = $2f => $30 => $31 => {
11840
- const $35 = issueTitle => $36 => $37 => {
11841
- const $3a = Data_Config_rf__editor($0);
11842
- let $39;
11843
- switch($3a.h) {
11844
- case 0: /* nothing */ {
11845
- $39 = Util_Prompting_inlineDescription(csegen_74()(), Commands_Quick_n__5799_5628_issuePrompt($1, $2, $3, $0), '');
11846
- break;
11847
- }
11848
- case undefined: /* just */ {
11849
- $39 = $48 => $49 => Data_Promise_map_Functor_x28Promisex20x24ex29(csegen_695(), Util_Prompting_editorDescription(csegen_74()(), $3a.a1, {h: 0}, ''), $48, $49);
11850
- break;
11851
- }
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;
11852
11979
  }
11853
- const $57 = issueBody => $58 => $59 => {
11854
- const $64 = issue => {
11855
- const $65 = Prelude_Types_foldMap_Foldable_List(csegen_51()(), $6b => $6b, {a1: Commands_Quick_n__5799_5627_branchPrefix($1, $2, $3, $0), a2: {a1: '/', a2: {a1: Prelude_Show_show_Show_Integer(issue.a1), a2: {a1: '/', a2: {h: 0}}}}});
11856
- 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_758(), 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);
11857
- };
11858
- 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);
11859
11989
  };
11860
- 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);
11861
11991
  };
11862
- return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(csegen_758(), $35, $30, $31);
11992
+ return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($41, $60, $3e, $3f);
11863
11993
  };
11864
- 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);
11865
11995
  };
11866
- return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(csegen_403()(), $1c, $16, $17);
11996
+ return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(csegen_404()(), $1d, $17, $18);
11867
11997
  };
11868
- 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);
11869
11999
  }
11870
12000
 
11871
12001
  /* Commands.Label.unslugifyLabel : List String -> String -> String */
@@ -11884,7 +12014,7 @@ function Commands_Label_addLabels($0, $1, $2, $3, $4, $5) {
11884
12014
 
11885
12015
  /* Commands.Graph.7730:7016:pendingDot */
11886
12016
  function Commands_Graph_n__7730_7016_pendingDot($0, $1, $2, $3, $4, $5, $6, $7) {
11887
- return Theme_theme($7, csegen_690(), csegen_688(), 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}'));
11888
12018
  }
11889
12019
 
11890
12020
  /* Commands.Graph.7730:7015:note */
@@ -11894,7 +12024,7 @@ function Commands_Graph_n__7730_7015_note($0, $1, $2, $3, $4, $5, $6, $7, $8) {
11894
12024
 
11895
12025
  /* Commands.Graph.7730:7014:missedDot */
11896
12026
  function Commands_Graph_n__7730_7014_missedDot($0, $1, $2, $3, $4, $5, $6, $7) {
11897
- return Theme_theme($7, csegen_689(), csegen_689(), 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}'));
11898
12028
  }
11899
12029
 
11900
12030
  /* Commands.Graph.7730:7013:maxValue */
@@ -11923,7 +12053,7 @@ function Commands_Graph_n__7730_7012_header($0, $1, $2, $3, $4, $5, $6, $7) {
11923
12053
  break;
11924
12054
  }
11925
12055
  }
11926
- 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_762()}};
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()}};
11927
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};
11928
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};
11929
12059
  const $f = {a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('Weighted review workload.')}, a2: $14};
@@ -11934,7 +12064,7 @@ function Commands_Graph_n__7730_7012_header($0, $1, $2, $3, $4, $5, $6, $7) {
11934
12064
 
11935
12065
  /* Commands.Graph.7327:6604:header */
11936
12066
  function Commands_Graph_n__7327_6604_header($0, $1, $2, $3) {
11937
- 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_762()}}}));
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()}}}));
11938
12068
  }
11939
12069
 
11940
12070
  /* Commands.Graph.7327:6603:graphable */
@@ -11957,20 +12087,20 @@ function Commands_Graph_n__6760_6183_countInParens($0, $1, $2, $3, $4) {
11957
12087
 
11958
12088
  /* Commands.Graph.7730:7010:completedBox */
11959
12089
  function Commands_Graph_n__7730_7010_completedBox($0, $1, $2, $3, $4, $5, $6, $7) {
11960
- return Theme_theme($7, csegen_669(), csegen_669(), 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}'));
11961
12091
  }
11962
12092
 
11963
12093
  /* Commands.Graph.6760:6182:coloredLabel */
11964
12094
  function Commands_Graph_n__6760_6182_coloredLabel($0, $1, $2, $3, $4) {
11965
12095
  switch((($4.a2===0n)?1:0)) {
11966
- case 1: return Theme_theme($0, csegen_669(), csegen_669(), 0)($2.a1(undefined)($4.a1));
12096
+ case 1: return Theme_theme($0, csegen_675(), csegen_675(), 0)($2.a1(undefined)($4.a1));
11967
12097
  case 0: {
11968
12098
  switch(Prelude_Types_x3c_Ord_Nat($4.a2, 2n)) {
11969
12099
  case 1: return $2.a1(undefined)($4.a1);
11970
12100
  case 0: {
11971
12101
  switch(Prelude_Types_x3c_Ord_Nat($4.a2, 6n)) {
11972
- case 1: return Theme_theme($0, csegen_690(), csegen_688(), 1)($2.a1(undefined)($4.a1));
11973
- case 0: return Theme_theme($0, csegen_689(), csegen_689(), 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));
11974
12104
  }
11975
12105
  }
11976
12106
  }
@@ -12110,9 +12240,9 @@ function Commands_Graph_reviewsGraph($0, $1, $2, $3, $4, $5, $6, $7) {
12110
12240
 
12111
12241
  /* Commands.Graph.healthGraph : Config => List PullRequest -> String -> String -> Doc AnsiStyle */
12112
12242
  function Commands_Graph_healthGraph($0, $1, $2, $3) {
12113
- const $4 = Data_List_groupBy($7 => $8 => Prelude_Basics_on($b => $c => Prelude_Basics_on(csegen_328(), $11 => $11.a2, $b, $c), csegen_643(), $7, $8), Data_List_sortBy(csegen_644(), $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));
12114
12244
  const $1e = Prelude_Types_foldr_Foldable_List(xs => m => Prelude_Types_max_Ord_Nat(Data_List1_length(xs), m), 1n, $4);
12115
- 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_778(), $36), a2: $41 => maxLabelLength => Commands_Graph_label_Graphable_x28PRsOnDatex20x24dateTyx29($0, $45 => Commands_Graph_length_HasLength_Date($45), csegen_778(), $41, maxLabelLength), a3: $4d => Commands_Graph_labelLength_Graphable_x28PRsOnDatex20x24dateTyx29($0, $51 => Commands_Graph_length_HasLength_Date($51), csegen_778(), $4d), a4: $58 => Commands_Graph_score_Graphable_x28PRsOnDatex20x24dateTyx29($0, $5c => Commands_Graph_length_HasLength_Date($5c), csegen_778(), $58), a5: $63 => Commands_Graph_detractor_Graphable_x28PRsOnDatex20x24dateTyx29($0, $67 => Commands_Graph_length_HasLength_Date($67), csegen_778(), $63), a6: $6e => Commands_Graph_bonus_Graphable_x28PRsOnDatex20x24dateTyx29($0, $72 => Commands_Graph_length_HasLength_Date($72), csegen_778(), $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}}}}}});
12116
12246
  }
12117
12247
 
12118
12248
  /* Commands.Graph.graphOne : Config -> Graphable g => Nat -> Nat -> Nat -> g -> Doc AnsiStyle */
@@ -12135,7 +12265,7 @@ function Commands_Graph_countPadRight($0, $1, $2) {
12135
12265
 
12136
12266
  /* Commands.Graph.bar : Config -> Nat -> Nat -> Nat -> Nat -> Doc AnsiStyle */
12137
12267
  function Commands_Graph_bar($0, $1, $2, $3, $4) {
12138
- return Text_PrettyPrint_Prettyprinter_Doc_indent(Number(_truncBigInt32($1)), Text_PrettyPrint_Prettyprinter_Doc_hcat({a1: Theme_theme($0, csegen_689(), csegen_689(), 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_690(), csegen_688(), 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_669(), csegen_669(), 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}}}}));
12139
12269
  }
12140
12270
 
12141
12271