@mattpolzin/harmony 0.7.0 → 1.1.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 (2) hide show
  1. harmony-npm/harmony +772 -572
  2. harmony-npm/package.json +2 -2
harmony-npm/harmony CHANGED
@@ -307,6 +307,13 @@ const git_remote_uri = (git, remoteName, onSuccess, onFailure) =>
307
307
  onFailure
308
308
  )
309
309
 
310
+ const git_list_remotes = (git, onSuccess, onFailure) =>
311
+ idris__git_unpromisify(
312
+ git.raw('remote'),
313
+ r => onSuccess(r.trim()),
314
+ onFailure
315
+ )
316
+
310
317
  // Get the remote branch that the current local branch is tracking.
311
318
  // Executes callback with branch name or empty string when no branch
312
319
  // is being tracked.
@@ -327,6 +334,13 @@ const git_user_email = (git, onSuccess, onFailure) =>
327
334
  onFailure
328
335
  )
329
336
 
337
+ const git_root_dir = (git, onSuccess, onFailure) =>
338
+ idris__git_unpromisify(
339
+ git.raw('rev-parse', '--show-toplevel'),
340
+ r => onSuccess(r.trim()),
341
+ onFailure
342
+ )
343
+
330
344
 
331
345
 
332
346
  const { Octokit } = require('octokit')
@@ -653,9 +667,11 @@ const FFI_GitHub_prim__createPR = okit_create_pr;
653
667
  const FFI_GitHub_prim__createComment = okit_create_comment;
654
668
  const FFI_GitHub_prim__addPullReviewers = okit_add_reviewers;
655
669
  const FFI_Git_prim__userEmail = git_user_email;
670
+ const FFI_Git_prim__rootDir = git_root_dir;
656
671
  const FFI_Git_prim__remoteURI = git_remote_uri;
657
672
  const FFI_Git_prim__remoteTrackingBranch = git_remote_tracking_branch;
658
673
  const FFI_Git_prim__pushNewBranch = git_push_new_branch;
674
+ const FFI_Git_prim__listRemotes = git_list_remotes;
659
675
  const FFI_Git_prim__git = git_git;
660
676
  const FFI_Git_prim__currentBranch = git_current_branch;
661
677
  const FFI_Git_prim__checkoutBranch = git_checkout_branch;
@@ -678,7 +694,7 @@ function x24tcOpt_1($0) {
678
694
  default: {
679
695
  switch($0.a7.h) {
680
696
  case 0: return {h: 0, a1: $0.a6};
681
- case 1: return {h: 0, a1: Prelude_Interfaces_x3cx24x3e(csegen_119(), $c => ({a1: $c.a1, a2: $c.a2, a3: 0n}), $0.a6)};
697
+ case 1: return {h: 0, a1: Prelude_Interfaces_x3cx24x3e(csegen_118(), $c => ({a1: $c.a1, a2: $c.a2, a3: 0n}), $0.a6)};
682
698
  default: {
683
699
  switch($0.a6.h) {
684
700
  case 0: {
@@ -691,11 +707,11 @@ function x24tcOpt_1($0) {
691
707
  switch($1c.a1.h) {
692
708
  case 0: {
693
709
  switch($0.a8) {
694
- case 0: return {h: 0, a1: {a1: {a1: $0.a5.a1.a1, a2: $0.a5.a1.a2, a3: $0.a5.a1.a3}, a2: Reviewer_n__4747_1536_zipReviews($0.a1, $0.a2, $0.a3, $0.a4, $0.a5.a2, $1c.a2, $0.a7, $0.a8)}};
710
+ case 0: return {h: 0, a1: {a1: {a1: $0.a5.a1.a1, a2: $0.a5.a1.a2, a3: $0.a5.a1.a3}, a2: Reviewer_n__4753_1596_zipReviews($0.a1, $0.a2, $0.a3, $0.a4, $0.a5.a2, $1c.a2, $0.a7, $0.a8)}};
695
711
  case 1: return {h: 1, a1: $0.a1, a2: $0.a2, a3: $0.a3, a4: $0.a4, a5: $0.a5.a2, a6: $1c.a2, a7: $0.a7, a8: $0.a8};
696
712
  }
697
713
  }
698
- case undefined: return {h: 0, a1: {a1: {a1: $0.a5.a1.a1, a2: $0.a5.a1.a2, a3: Reviewer_n__4774_1688_calc($0.a1, $0.a2, $0.a3, $0.a4, $0.a5.a1.a1, $0.a5.a1.a3, $0.a5.a1.a2, $18, $0.a5.a2, $0.a8, $0.a7, $0.a6, $0.a5.a1.a3, $1c.a1.a1.a3)}, a2: Reviewer_n__4747_1536_zipReviews($0.a1, $0.a2, $0.a3, $0.a4, $0.a5.a2, $1c.a2, $0.a7, $0.a8)}};
714
+ case undefined: return {h: 0, a1: {a1: {a1: $0.a5.a1.a1, a2: $0.a5.a1.a2, a3: Reviewer_n__4780_1748_calc($0.a1, $0.a2, $0.a3, $0.a4, $0.a5.a1.a1, $0.a5.a1.a3, $0.a5.a1.a2, $18, $0.a5.a2, $0.a8, $0.a7, $0.a6, $0.a5.a1.a3, $1c.a1.a1.a3)}, a2: Reviewer_n__4753_1596_zipReviews($0.a1, $0.a2, $0.a3, $0.a4, $0.a5.a2, $1c.a2, $0.a7, $0.a8)}};
699
715
  }
700
716
  }
701
717
  }
@@ -706,11 +722,11 @@ function x24tcOpt_1($0) {
706
722
  switch($6f.a1.h) {
707
723
  case 0: {
708
724
  switch($0.a8) {
709
- case 0: return {h: 0, a1: {a1: {a1: $0.a5.a1.a1, a2: $0.a5.a1.a2, a3: $0.a5.a1.a3}, a2: Reviewer_n__4747_1536_zipReviews($0.a1, $0.a2, $0.a3, $0.a4, $0.a5.a2, $6f.a2, $0.a7, $0.a8)}};
725
+ case 0: return {h: 0, a1: {a1: {a1: $0.a5.a1.a1, a2: $0.a5.a1.a2, a3: $0.a5.a1.a3}, a2: Reviewer_n__4753_1596_zipReviews($0.a1, $0.a2, $0.a3, $0.a4, $0.a5.a2, $6f.a2, $0.a7, $0.a8)}};
710
726
  case 1: return {h: 1, a1: $0.a1, a2: $0.a2, a3: $0.a3, a4: $0.a4, a5: $0.a5.a2, a6: $6f.a2, a7: $0.a7, a8: $0.a8};
711
727
  }
712
728
  }
713
- case undefined: return {h: 0, a1: {a1: {a1: $0.a5.a1.a1, a2: $0.a5.a1.a2, a3: Reviewer_n__4774_1688_calc($0.a1, $0.a2, $0.a3, $0.a4, $0.a5.a1.a1, $0.a5.a1.a3, $0.a5.a1.a2, $6b, $0.a5.a2, $0.a8, $0.a7, $0.a6, $0.a5.a1.a3, $6f.a1.a1.a3)}, a2: Reviewer_n__4747_1536_zipReviews($0.a1, $0.a2, $0.a3, $0.a4, $0.a5.a2, $6f.a2, $0.a7, $0.a8)}};
729
+ case undefined: return {h: 0, a1: {a1: {a1: $0.a5.a1.a1, a2: $0.a5.a1.a2, a3: Reviewer_n__4780_1748_calc($0.a1, $0.a2, $0.a3, $0.a4, $0.a5.a1.a1, $0.a5.a1.a3, $0.a5.a1.a2, $6b, $0.a5.a2, $0.a8, $0.a7, $0.a6, $0.a5.a1.a3, $6f.a1.a1.a3)}, a2: Reviewer_n__4753_1596_zipReviews($0.a1, $0.a2, $0.a3, $0.a4, $0.a5.a2, $6f.a2, $0.a7, $0.a8)}};
714
730
  }
715
731
  }
716
732
  }
@@ -731,11 +747,11 @@ function x24tcOpt_1($0) {
731
747
  switch($c6.a1.h) {
732
748
  case 0: {
733
749
  switch($0.a8) {
734
- case 0: return {h: 0, a1: {a1: {a1: $0.a5.a1.a1, a2: $0.a5.a1.a2, a3: $0.a5.a1.a3}, a2: Reviewer_n__4747_1536_zipReviews($0.a1, $0.a2, $0.a3, $0.a4, $0.a5.a2, $c6.a2, $0.a7, $0.a8)}};
750
+ case 0: return {h: 0, a1: {a1: {a1: $0.a5.a1.a1, a2: $0.a5.a1.a2, a3: $0.a5.a1.a3}, a2: Reviewer_n__4753_1596_zipReviews($0.a1, $0.a2, $0.a3, $0.a4, $0.a5.a2, $c6.a2, $0.a7, $0.a8)}};
735
751
  case 1: return {h: 1, a1: $0.a1, a2: $0.a2, a3: $0.a3, a4: $0.a4, a5: $0.a5.a2, a6: $c6.a2, a7: $0.a7, a8: $0.a8};
736
752
  }
737
753
  }
738
- case undefined: return {h: 0, a1: {a1: {a1: $0.a5.a1.a1, a2: $0.a5.a1.a2, a3: Reviewer_n__4774_1688_calc($0.a1, $0.a2, $0.a3, $0.a4, $0.a5.a1.a1, $0.a5.a1.a3, $0.a5.a1.a2, $c2, $0.a5.a2, $0.a8, $0.a7, $0.a6, $0.a5.a1.a3, $c6.a1.a1.a3)}, a2: Reviewer_n__4747_1536_zipReviews($0.a1, $0.a2, $0.a3, $0.a4, $0.a5.a2, $c6.a2, $0.a7, $0.a8)}};
754
+ case undefined: return {h: 0, a1: {a1: {a1: $0.a5.a1.a1, a2: $0.a5.a1.a2, a3: Reviewer_n__4780_1748_calc($0.a1, $0.a2, $0.a3, $0.a4, $0.a5.a1.a1, $0.a5.a1.a3, $0.a5.a1.a2, $c2, $0.a5.a2, $0.a8, $0.a7, $0.a6, $0.a5.a1.a3, $c6.a1.a1.a3)}, a2: Reviewer_n__4753_1596_zipReviews($0.a1, $0.a2, $0.a3, $0.a4, $0.a5.a2, $c6.a2, $0.a7, $0.a8)}};
739
755
  }
740
756
  }
741
757
  }
@@ -746,11 +762,11 @@ function x24tcOpt_1($0) {
746
762
  switch($119.a1.h) {
747
763
  case 0: {
748
764
  switch($0.a8) {
749
- case 0: return {h: 0, a1: {a1: {a1: $0.a5.a1.a1, a2: $0.a5.a1.a2, a3: $0.a5.a1.a3}, a2: Reviewer_n__4747_1536_zipReviews($0.a1, $0.a2, $0.a3, $0.a4, $0.a5.a2, $119.a2, $0.a7, $0.a8)}};
765
+ case 0: return {h: 0, a1: {a1: {a1: $0.a5.a1.a1, a2: $0.a5.a1.a2, a3: $0.a5.a1.a3}, a2: Reviewer_n__4753_1596_zipReviews($0.a1, $0.a2, $0.a3, $0.a4, $0.a5.a2, $119.a2, $0.a7, $0.a8)}};
750
766
  case 1: return {h: 1, a1: $0.a1, a2: $0.a2, a3: $0.a3, a4: $0.a4, a5: $0.a5.a2, a6: $119.a2, a7: $0.a7, a8: $0.a8};
751
767
  }
752
768
  }
753
- case undefined: return {h: 0, a1: {a1: {a1: $0.a5.a1.a1, a2: $0.a5.a1.a2, a3: Reviewer_n__4774_1688_calc($0.a1, $0.a2, $0.a3, $0.a4, $0.a5.a1.a1, $0.a5.a1.a3, $0.a5.a1.a2, $115, $0.a5.a2, $0.a8, $0.a7, $0.a6, $0.a5.a1.a3, $119.a1.a1.a3)}, a2: Reviewer_n__4747_1536_zipReviews($0.a1, $0.a2, $0.a3, $0.a4, $0.a5.a2, $119.a2, $0.a7, $0.a8)}};
769
+ case undefined: return {h: 0, a1: {a1: {a1: $0.a5.a1.a1, a2: $0.a5.a1.a2, a3: Reviewer_n__4780_1748_calc($0.a1, $0.a2, $0.a3, $0.a4, $0.a5.a1.a1, $0.a5.a1.a3, $0.a5.a1.a2, $115, $0.a5.a2, $0.a8, $0.a7, $0.a6, $0.a5.a1.a3, $119.a1.a1.a3)}, a2: Reviewer_n__4753_1596_zipReviews($0.a1, $0.a2, $0.a3, $0.a4, $0.a5.a2, $119.a2, $0.a7, $0.a8)}};
754
770
  }
755
771
  }
756
772
  }
@@ -758,7 +774,7 @@ function x24tcOpt_1($0) {
758
774
  }
759
775
  }
760
776
 
761
- function Reviewer_n__4747_1536_zipReviews($0, $1, $2, $3, $4, $5, $6, $7) {
777
+ function Reviewer_n__4753_1596_zipReviews($0, $1, $2, $3, $4, $5, $6, $7) {
762
778
  return __tailRec(x24tcOpt_1, {h: 1, a1: $0, a2: $1, a3: $2, a4: $3, a5: $4, a6: $5, a7: $6, a8: $7});
763
779
  }
764
780
 
@@ -1512,31 +1528,31 @@ const csegen_95 = __lazy(function () {
1512
1528
  return System_exitSuccess(csegen_59());
1513
1529
  });
1514
1530
 
1515
- const csegen_103 = __lazy(function () {
1531
+ const csegen_102 = __lazy(function () {
1516
1532
  return $0 => $1 => $2 => $3 => $4 => $5 => Data_Promise_map_Functor_Promise($2, $3, $4, $5);
1517
1533
  });
1518
1534
 
1519
- const csegen_111 = __lazy(function () {
1535
+ const csegen_110 = __lazy(function () {
1520
1536
  return {a1: csegen_94(), a2: $3 => $4 => Prelude_EqOrd_compare_Ord_String($3, $4), a3: $9 => $a => Prelude_EqOrd_x3c_Ord_String($9, $a), a4: $f => $10 => Prelude_EqOrd_x3e_Ord_String($f, $10), a5: $15 => $16 => Prelude_EqOrd_x3cx3d_Ord_String($15, $16), a6: $1b => $1c => Prelude_EqOrd_x3ex3d_Ord_String($1b, $1c), a7: $21 => $22 => Prelude_EqOrd_max_Ord_String($21, $22), a8: $27 => $28 => Prelude_EqOrd_min_Ord_String($27, $28)};
1521
1537
  });
1522
1538
 
1523
- const csegen_112 = __lazy(function () {
1524
- return $0 => Data_List_sort(csegen_111(), $0);
1539
+ const csegen_111 = __lazy(function () {
1540
+ return $0 => Data_List_sort(csegen_110(), $0);
1525
1541
  });
1526
1542
 
1527
- const csegen_113 = __lazy(function () {
1543
+ const csegen_112 = __lazy(function () {
1528
1544
  return $0 => $1 => $2 => FFI_Concurrency_promiseAll(csegen_77(), $0, $1, $2);
1529
1545
  });
1530
1546
 
1531
- const csegen_115 = __lazy(function () {
1547
+ const csegen_114 = __lazy(function () {
1532
1548
  return {a1: x => Prelude_Show_show_Show_String(x), a2: d => x => Prelude_Show_showPrec_Show_String(d, x)};
1533
1549
  });
1534
1550
 
1535
- const csegen_119 = __lazy(function () {
1551
+ const csegen_118 = __lazy(function () {
1536
1552
  return $0 => $1 => $2 => $3 => Prelude_Types_map_Functor_List($2, $3);
1537
1553
  });
1538
1554
 
1539
- const csegen_128 = __lazy(function () {
1555
+ const csegen_129 = __lazy(function () {
1540
1556
  return $0 => $1 => Data_Promise_pure_Applicative_Promise(undefined, $0, $1);
1541
1557
  });
1542
1558
 
@@ -1552,90 +1568,90 @@ const csegen_141 = __lazy(function () {
1552
1568
  return $0 => $1 => Data_Date_compare_Ord_Date($0, $1);
1553
1569
  });
1554
1570
 
1555
- const csegen_156 = __lazy(function () {
1556
- return $0 => $0.a2;
1557
- });
1558
-
1559
1571
  const csegen_159 = __lazy(function () {
1560
- return $0 => $0.a1;
1561
- });
1562
-
1563
- const csegen_161 = __lazy(function () {
1564
- return Prelude_IO_putStrLn(csegen_21(), '');
1565
- });
1566
-
1567
- const csegen_167 = __lazy(function () {
1568
- return $0 => $1 => Prelude_Types_max_Ord_Nat($0, $1);
1569
- });
1570
-
1571
- const csegen_169 = __lazy(function () {
1572
- 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}}}));
1573
- });
1574
-
1575
- const csegen_193 = __lazy(function () {
1576
1572
  return {a1: {a1: b => a => func => $2 => Control_Monad_ST_map_Functor_x28STx20x24sx29(func, $2), a2: a => $7 => $8 => $7, a3: b => a => $a => $b => $c => Control_Monad_ST_x3cx2ax3e_Applicative_x28STx20x24sx29($a, $b, $c)}, a2: b => a => $12 => $13 => $14 => Control_Monad_ST_x3ex3ex3d_Monad_x28STx20x24sx29($12, $13, $14), a3: a => $1a => $1b => Control_Monad_ST_join_Monad_x28STx20x24sx29($1a, $1b)};
1577
1573
  });
1578
1574
 
1579
- const csegen_206 = __lazy(function () {
1575
+ const csegen_172 = __lazy(function () {
1580
1576
  return $0 => $1 => Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29($0, $1);
1581
1577
  });
1582
1578
 
1583
- const csegen_210 = __lazy(function () {
1579
+ const csegen_176 = __lazy(function () {
1584
1580
  return {a1: $1 => $2 => Prelude_EqOrd_x3dx3d_Eq_Char($1, $2), a2: $7 => $8 => Prelude_EqOrd_x2fx3d_Eq_Char($7, $8)};
1585
1581
  });
1586
1582
 
1587
- const csegen_226 = __lazy(function () {
1583
+ const csegen_192 = __lazy(function () {
1588
1584
  return $0 => $1 => ({a1: $0, a2: $1});
1589
1585
  });
1590
1586
 
1591
- const csegen_227 = __lazy(function () {
1587
+ const csegen_193 = __lazy(function () {
1592
1588
  return $0 => $1 => $2 => $0($1($2));
1593
1589
  });
1594
1590
 
1595
- const csegen_278 = __lazy(function () {
1591
+ const csegen_241 = __lazy(function () {
1592
+ return $0 => Language_JSON_Accessors_optional($3 => Language_JSON_Accessors_string($3), $0);
1593
+ });
1594
+
1595
+ const csegen_247 = __lazy(function () {
1596
1596
  return b => a => $0 => $1 => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29($0, $1);
1597
1597
  });
1598
1598
 
1599
- const csegen_279 = __lazy(function () {
1599
+ const csegen_248 = __lazy(function () {
1600
1600
  return a => $0 => Prelude_Types_join_Monad_x28Eitherx20x24ex29($0);
1601
1601
  });
1602
1602
 
1603
- const csegen_280 = __lazy(function () {
1603
+ const csegen_249 = __lazy(function () {
1604
1604
  return $0 => Data_Either_maybeToEither(() => 'Failed to parse JSON', Language_JSON_parse($0));
1605
1605
  });
1606
1606
 
1607
- const csegen_283 = __lazy(function () {
1607
+ const csegen_252 = __lazy(function () {
1608
1608
  return b => a => func => $0 => Text_Bounded_map_Functor_WithBounds(func, $0);
1609
1609
  });
1610
1610
 
1611
- const csegen_294 = __lazy(function () {
1611
+ const csegen_263 = __lazy(function () {
1612
1612
  return {a1: {a1: $2 => $3 => Prelude_EqOrd_x3dx3d_Eq_Int($2, $3), a2: $8 => $9 => Prelude_EqOrd_x2fx3d_Eq_Int($8, $9)}, a2: $e => $f => Prelude_EqOrd_compare_Ord_Int($e, $f), a3: $14 => $15 => Prelude_EqOrd_x3c_Ord_Int($14, $15), a4: $1a => $1b => Prelude_EqOrd_x3e_Ord_Int($1a, $1b), a5: $20 => $21 => Prelude_EqOrd_x3cx3d_Ord_Int($20, $21), a6: $26 => $27 => Prelude_EqOrd_x3ex3d_Ord_Int($26, $27), a7: $2c => $2d => Prelude_EqOrd_max_Ord_Int($2c, $2d), a8: $32 => $33 => Prelude_EqOrd_min_Ord_Int($32, $33)};
1613
1613
  });
1614
1614
 
1615
- const csegen_302 = __lazy(function () {
1615
+ const csegen_271 = __lazy(function () {
1616
1616
  return {a1: $1 => Language_JSON_Tokens_TokType_TokenKind_JSONTokenKind($1), a2: kind => $5 => Language_JSON_Tokens_tokValue_TokenKind_JSONTokenKind(kind, $5)};
1617
1617
  });
1618
1618
 
1619
- const csegen_305 = __lazy(function () {
1619
+ const csegen_274 = __lazy(function () {
1620
1620
  return {a1: $1 => $2 => Language_JSON_Tokens_x3dx3d_Eq_JSONTokenKind($1, $2), a2: $7 => $8 => Language_JSON_Tokens_x2fx3d_Eq_JSONTokenKind($7, $8)};
1621
1621
  });
1622
1622
 
1623
- const csegen_341 = __lazy(function () {
1623
+ const csegen_310 = __lazy(function () {
1624
1624
  return {a1: $1 => Language_JSON_String_Tokens_TokType_TokenKind_JSONStringTokenKind($1), a2: kind => $5 => Language_JSON_String_Tokens_tokValue_TokenKind_JSONStringTokenKind(kind, $5)};
1625
1625
  });
1626
1626
 
1627
- const csegen_344 = __lazy(function () {
1627
+ const csegen_313 = __lazy(function () {
1628
1628
  return {a1: $1 => $2 => Language_JSON_String_Tokens_x3dx3d_Eq_JSONStringTokenKind($1, $2), a2: $7 => $8 => Language_JSON_String_Tokens_x2fx3d_Eq_JSONStringTokenKind($7, $8)};
1629
1629
  });
1630
1630
 
1631
- const csegen_360 = __lazy(function () {
1631
+ const csegen_329 = __lazy(function () {
1632
1632
  return $0 => $1 => $2 => $3 => Text_Bounded_map_Functor_WithBounds($2, $3);
1633
1633
  });
1634
1634
 
1635
- const csegen_362 = __lazy(function () {
1635
+ const csegen_331 = __lazy(function () {
1636
1636
  return {a1: {a1: 'End of input', a2: {h: 0}}, a2: {h: 0}};
1637
1637
  });
1638
1638
 
1639
+ const csegen_383 = __lazy(function () {
1640
+ return $0 => $0.a2;
1641
+ });
1642
+
1643
+ const csegen_386 = __lazy(function () {
1644
+ return $0 => $0.a1;
1645
+ });
1646
+
1647
+ const csegen_391 = __lazy(function () {
1648
+ return $0 => $1 => Prelude_Types_max_Ord_Nat($0, $1);
1649
+ });
1650
+
1651
+ const csegen_393 = __lazy(function () {
1652
+ 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}}}));
1653
+ });
1654
+
1639
1655
  const csegen_405 = __lazy(function () {
1640
1656
  return $0 => Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_color(2), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String($0));
1641
1657
  });
@@ -1661,11 +1677,11 @@ const csegen_474 = __lazy(function () {
1661
1677
  });
1662
1678
 
1663
1679
  const csegen_482 = __lazy(function () {
1664
- return $0 => $1 => $2 => Data_Promise_either(csegen_115(), Data_PullRequest_parsePullRequestsString($0), $1, $2);
1680
+ return $0 => $1 => $2 => Data_Promise_either(csegen_114(), Data_PullRequest_parsePullRequestsString($0), $1, $2);
1665
1681
  });
1666
1682
 
1667
1683
  const csegen_483 = __lazy(function () {
1668
- return $0 => $1 => $2 => Data_Promise_either(csegen_115(), Data_User_parseUserString($0), $1, $2);
1684
+ return $0 => $1 => $2 => Data_Promise_either(csegen_114(), Data_User_parseUserString($0), $1, $2);
1669
1685
  });
1670
1686
 
1671
1687
  const csegen_516 = __lazy(function () {
@@ -1681,14 +1697,14 @@ const csegen_535 = __lazy(function () {
1681
1697
  });
1682
1698
 
1683
1699
  const csegen_538 = __lazy(function () {
1684
- return Prelude_Interfaces_x3cx24x3e(csegen_103(), $4 => Prelude_Cast_cast_Cast_Integer_Bits32($4), System_time(csegen_21()));
1700
+ return Prelude_Interfaces_x3cx24x3e(csegen_102(), $4 => Prelude_Cast_cast_Cast_Integer_Bits32($4), System_time(csegen_21()));
1685
1701
  });
1686
1702
 
1687
1703
  const csegen_542 = __lazy(function () {
1688
1704
  return {a1: csegen_21(), a2: {a1: x => Data_Config_show_Show_Config(x), a2: d => x => Data_Config_showPrec_Show_Config(d, x)}};
1689
1705
  });
1690
1706
 
1691
- const csegen_567 = __lazy(function () {
1707
+ const csegen_577 = __lazy(function () {
1692
1708
  return {a1: {a1: '--checkout', a2: {a1: '-c', a2: {h: 0}}}};
1693
1709
  });
1694
1710
 
@@ -1704,7 +1720,7 @@ function prim__mul_Integer($0, $1) {
1704
1720
  return ($0*$1);
1705
1721
  }
1706
1722
 
1707
- function Main_case__contribute_3289($0, $1, $2, $3, $4, $5, $6, $7, $8, $9, $a) {
1723
+ function Main_case__contribute_2186($0, $1, $2, $3, $4, $5, $6, $7, $8, $9, $a) {
1708
1724
  const $c = Data_List_headx27(Data_List_drop($6, Prelude_Types_List_tailRecAppend($a.a1, $a.a2)));
1709
1725
  switch($c.h) {
1710
1726
  case 0: return $16 => $17 => Data_Promise_reject('No open PRs to review!', $16, $17);
@@ -1721,16 +1737,16 @@ function Main_case__contribute_3289($0, $1, $2, $3, $4, $5, $6, $7, $8, $9, $a)
1721
1737
  }
1722
1738
  }
1723
1739
 
1724
- function Main_n__6357_2891_putNameLn($0, $1, $2, $3) {
1740
+ function Main_n__6457_1831_putNameLn($0, $1, $2, $3) {
1725
1741
  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}}}});
1726
1742
  }
1727
1743
 
1728
- function Main_n__6225_2781_partitionedArgs($0, $1, $2, $3, $4) {
1744
+ function Main_n__6325_1721_partitionedArgs($0, $1, $2, $3, $4) {
1729
1745
  const $5 = Data_List_partition($8 => Data_String_isPrefixOf('+', $8), $4);
1730
1746
  return {a1: Prelude_Types_map_Functor_List($11 => Data_String_Extra_drop(1n, $11), $5.a1), a2: $5.a2};
1731
1747
  }
1732
1748
 
1733
- function Main_n__6941_3487_parseSkipArg($0, $1) {
1749
+ function Main_n__7005_2384_parseSkipArg($0, $1) {
1734
1750
  const $2 = Prelude_Types_fastUnpack($1);
1735
1751
  switch($2.h) {
1736
1752
  case undefined: {
@@ -1743,15 +1759,15 @@ function Main_n__6941_3487_parseSkipArg($0, $1) {
1743
1759
  }
1744
1760
  }
1745
1761
 
1746
- function Main_n__7140_3747_parsePg($0, $1, $2, $3, $4, $5) {
1762
+ function Main_n__7204_2635_parsePg($0, $1, $2, $3, $4, $5) {
1747
1763
  return Data_String_parsePositive(csegen_30(), $5);
1748
1764
  }
1749
1765
 
1750
- function Main_n__7140_3746_parseLim($0, $1, $2, $3, $4) {
1766
+ function Main_n__7204_2634_parseLim($0, $1, $2, $3, $4) {
1751
1767
  return Prelude_Interfaces_x3cx3dx3c(csegen_42(), x => Data_Fin_natToFin(x, Prelude_Types_prim__integerToNat(101n)), $f => Data_String_parsePositive(csegen_30(), $f));
1752
1768
  }
1753
1769
 
1754
- function Main_n__6941_3486_parseCheckoutArg($0, $1) {
1770
+ function Main_n__7005_2383_parseCheckoutArg($0, $1) {
1755
1771
  switch($1) {
1756
1772
  case '-c': return {a1: {h: 0}};
1757
1773
  case '--checkout': return {a1: {h: 0}};
@@ -1759,18 +1775,11 @@ function Main_n__6941_3486_parseCheckoutArg($0, $1) {
1759
1775
  }
1760
1776
  }
1761
1777
 
1762
- function Main_n__6498_3045_maybeDecorated($0, $1, $2, $3) {
1763
- switch(Data_Config_rf__colors($2)) {
1764
- case 1: return $3;
1765
- case 0: return Text_PrettyPrint_Prettyprinter_Doc_unAnnotate($3);
1766
- }
1767
- }
1768
-
1769
- function Main_n__6357_2890_forkedUser($0, $1, $2, $3) {
1778
+ function Main_n__6457_1830_forkedUser($0, $1, $2, $3) {
1770
1779
  return FFI_Concurrency_fork(csegen_21(), ('user --json '+$3));
1771
1780
  }
1772
1781
 
1773
- function Main_n__6095_2643_configuredOpts($0, $1, $2) {
1782
+ function Main_n__6195_1583_configuredOpts($0, $1, $2) {
1774
1783
  const $10 = $11 => {
1775
1784
  switch($11.h) {
1776
1785
  case 1: return $0.a1.a1.a2(undefined)(BashCompletion_opts($11.a1, $2, $1));
@@ -1831,7 +1840,7 @@ function Main_parseContributeArgs($0) {
1831
1840
  switch($0.a2.a2.h) {
1832
1841
  case undefined: return {h: 0, a1: 'contribute\'s arguments must be either -<num> to skip num PRs or --checkout (-c) to checkout the branch needing review.'};
1833
1842
  default: {
1834
- const $6 = Prelude_Types_traverse_Traversable_List(csegen_37(), $b => Main_x3cx7cx7cx3e(csegen_80(), $10 => Main_n__6941_3487_parseSkipArg($0, $10), $15 => Main_n__6941_3486_parseCheckoutArg($0, $15), $b), $0);
1843
+ const $6 = Prelude_Types_traverse_Traversable_List(csegen_37(), $b => Main_x3cx7cx7cx3e(csegen_80(), $10 => Main_n__7005_2384_parseSkipArg($0, $10), $15 => Main_n__7005_2383_parseCheckoutArg($0, $15), $b), $0);
1835
1844
  switch($6.h) {
1836
1845
  case undefined: return {h: 1, a1: $6.a1};
1837
1846
  case 0: return {h: 0, a1: 'contribute\'s arguments must be either -<num> to skip num PRs or --checkout (-c) to checkout the branch needing review.'};
@@ -1840,7 +1849,7 @@ function Main_parseContributeArgs($0) {
1840
1849
  }
1841
1850
  }
1842
1851
  default: {
1843
- const $1d = Prelude_Types_traverse_Traversable_List(csegen_37(), $22 => Main_x3cx7cx7cx3e(csegen_80(), $27 => Main_n__6941_3487_parseSkipArg($0, $27), $2c => Main_n__6941_3486_parseCheckoutArg($0, $2c), $22), $0);
1852
+ const $1d = Prelude_Types_traverse_Traversable_List(csegen_37(), $22 => Main_x3cx7cx7cx3e(csegen_80(), $27 => Main_n__7005_2384_parseSkipArg($0, $27), $2c => Main_n__7005_2383_parseCheckoutArg($0, $2c), $22), $0);
1844
1853
  switch($1d.h) {
1845
1854
  case undefined: return {h: 1, a1: $1d.a1};
1846
1855
  case 0: return {h: 0, a1: 'contribute\'s arguments must be either -<num> to skip num PRs or --checkout (-c) to checkout the branch needing review.'};
@@ -1849,7 +1858,7 @@ function Main_parseContributeArgs($0) {
1849
1858
  }
1850
1859
  }
1851
1860
  default: {
1852
- const $34 = Prelude_Types_traverse_Traversable_List(csegen_37(), $39 => Main_x3cx7cx7cx3e(csegen_80(), $3e => Main_n__6941_3487_parseSkipArg($0, $3e), $43 => Main_n__6941_3486_parseCheckoutArg($0, $43), $39), $0);
1861
+ const $34 = Prelude_Types_traverse_Traversable_List(csegen_37(), $39 => Main_x3cx7cx7cx3e(csegen_80(), $3e => Main_n__7005_2384_parseSkipArg($0, $3e), $43 => Main_n__7005_2383_parseCheckoutArg($0, $43), $39), $0);
1853
1862
  switch($34.h) {
1854
1863
  case undefined: return {h: 1, a1: $34.a1};
1855
1864
  case 0: return {h: 0, a1: 'contribute\'s arguments must be either -<num> to skip num PRs or --checkout (-c) to checkout the branch needing review.'};
@@ -1863,53 +1872,136 @@ function Main_main($0) {
1863
1872
  const $7 = System_getEnv(csegen_59(), 'EDITOR')($0);
1864
1873
  const $e = Prelude_Interfaces_x3cx24x3e(csegen_85(), $14 => Data_List_drop(2n, $14), System_getArgs(csegen_59()))($0);
1865
1874
  let $25;
1866
- switch(Prelude_Types_x3dx3d_Eq_x28Listx20x24ax29(csegen_94(), $e, {a1: 'help', a2: {h: 0}})) {
1875
+ switch(Prelude_Types_x3dx3d_Eq_x28Listx20x24ax29(csegen_94(), $e, {h: 0})) {
1867
1876
  case 1: {
1868
1877
  $25 = 1;
1869
1878
  break;
1870
1879
  }
1871
1880
  case 0: {
1872
- $25 = Prelude_Types_x3dx3d_Eq_x28Listx20x24ax29(csegen_94(), $e, {a1: '--help', a2: {h: 0}});
1881
+ switch(Prelude_Types_x3dx3d_Eq_x28Listx20x24ax29(csegen_94(), $e, {a1: 'help', a2: {h: 0}})) {
1882
+ case 1: {
1883
+ $25 = 1;
1884
+ break;
1885
+ }
1886
+ case 0: {
1887
+ $25 = Prelude_Types_x3dx3d_Eq_x28Listx20x24ax29(csegen_94(), $e, {a1: '--help', a2: {h: 0}});
1888
+ break;
1889
+ }
1890
+ }
1873
1891
  break;
1874
1892
  }
1875
1893
  }
1876
1894
  const $21 = Prelude_Interfaces_when(csegen_52(), $25, () => Prelude_Interfaces_x3ex3e(csegen_91(), Prelude_IO_putStrLn(csegen_59(), Help_help($1)), () => csegen_95()));
1877
- const $42 = () => {
1878
- let $4a;
1895
+ const $48 = () => {
1896
+ let $50;
1879
1897
  switch(Prelude_Types_x3dx3d_Eq_x28Listx20x24ax29(csegen_94(), $e, {a1: 'version', a2: {h: 0}})) {
1880
1898
  case 1: {
1881
- $4a = 1;
1899
+ $50 = 1;
1882
1900
  break;
1883
1901
  }
1884
1902
  case 0: {
1885
- $4a = Prelude_Types_x3dx3d_Eq_x28Listx20x24ax29(csegen_94(), $e, {a1: '--version', a2: {h: 0}});
1903
+ $50 = Prelude_Types_x3dx3d_Eq_x28Listx20x24ax29(csegen_94(), $e, {a1: '--version', a2: {h: 0}});
1886
1904
  break;
1887
1905
  }
1888
1906
  }
1889
- const $46 = Prelude_Interfaces_when(csegen_52(), $4a, () => Prelude_Interfaces_x3ex3e(csegen_91(), AppVersion_printVersion(csegen_59()), () => csegen_95()));
1890
- return Prelude_Interfaces_x3ex3e(csegen_91(), $46, () => $65 => {
1891
- const $66 = System_getEnv(csegen_59(), 'GITHUB_PAT')($65);
1892
- switch($66.h) {
1893
- case undefined: {
1894
- const $6e = FFI_GitHub_octokit($66.a1)($65);
1895
- const $73 = FFI_Git_git(csegen_59())($65);
1896
- return Main_handleArgs($73, $6e, $1, $7, $e)($65);
1897
- }
1898
- case 0: return Main_exitError(csegen_59(), 'GITHUB_PAT environment variable must be set to a personal access token.')($65);
1899
- }
1907
+ const $4c = Prelude_Interfaces_when(csegen_52(), $50, () => Prelude_Interfaces_x3ex3e(csegen_91(), AppVersion_printVersion(csegen_59()), () => csegen_95()));
1908
+ return Prelude_Interfaces_x3ex3e(csegen_91(), $4c, () => $6b => {
1909
+ const $6c = System_getEnv(csegen_59(), 'GITHUB_PAT')($6b);
1910
+ const $73 = FFI_Git_git(csegen_59())($6b);
1911
+ return Main_handleArgs($73, $6c, $1, $7, $e)($6b);
1900
1912
  });
1901
1913
  };
1902
- const $1d = Prelude_Interfaces_x3ex3e(csegen_91(), $21, $42);
1914
+ const $1d = Prelude_Interfaces_x3ex3e(csegen_91(), $21, $48);
1903
1915
  return $1d($0);
1904
1916
  }
1905
1917
 
1906
1918
  function Main_listTeam($0, $1, $2, $3, $4) {
1907
- return Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Interfaces_x3cx24x3e(csegen_103(), csegen_112(), FFI_GitHub_listTeamMembers($1, $0.a2, $2)), teamMemberLogins => $13 => $14 => Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Interfaces_x3dx3cx3c(csegen_15(), csegen_113(), Prelude_Types_traverse_Traversable_List(csegen_9(), $21 => Main_n__6357_2890_forkedUser($1, $2, $0, $21), teamMemberLogins)), teamMembersJson => $29 => $2a => Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Types_traverse_Traversable_List(csegen_9(), $31 => $32 => $33 => Data_Promise_either(csegen_115(), Data_User_parseUser($31), $32, $33), teamMembersJson), teamMembers => $3e => $3f => $40 => Data_Promise_liftIO_HasIO_Promise(Text_PrettyPrint_Prettyprinter_Render_Terminal_putDoc(Text_PrettyPrint_Prettyprinter_Doc_vsep(Prelude_Interfaces_x3cx24x3e(csegen_119(), $4b => Main_n__6357_2891_putNameLn($1, $2, $0, $4b), teamMembers))), $3e, $3f, $40), $29, $2a), $13, $14), $3, $4);
1919
+ return Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Interfaces_x3cx24x3e(csegen_102(), csegen_111(), FFI_GitHub_listTeamMembers($1, $0.a2, $2)), teamMemberLogins => $13 => $14 => Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Interfaces_x3dx3cx3c(csegen_15(), csegen_112(), Prelude_Types_traverse_Traversable_List(csegen_9(), $21 => Main_n__6457_1830_forkedUser($1, $2, $0, $21), teamMemberLogins)), teamMembersJson => $29 => $2a => Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Types_traverse_Traversable_List(csegen_9(), $31 => $32 => $33 => Data_Promise_either(csegen_114(), Data_User_parseUser($31), $32, $33), teamMembersJson), teamMembers => Util_renderIO($0, csegen_21(), Text_PrettyPrint_Prettyprinter_Doc_vsep(Prelude_Interfaces_x3cx24x3e(csegen_118(), $49 => Main_n__6457_1831_putNameLn($1, $2, $0, $49), teamMembers))), $29, $2a), $13, $14), $3, $4);
1908
1920
  }
1909
1921
 
1910
1922
  function Main_handleConfiguredArgs($0, $1, $2, $3) {
1911
1923
  switch($3.h) {
1912
- case 0: return Prelude_IO_putStrLn(csegen_21(), Help_help(Data_Config_rf__colors($0)));
1924
+ case undefined: {
1925
+ switch($3.a1) {
1926
+ case 'config': {
1927
+ switch($3.a2.h) {
1928
+ case 0: return $7 => $8 => Data_Promise_reject('The config command expects one or two arguments. Specify a property to read out or a property and a value to set it to.', $7, $8);
1929
+ case undefined: {
1930
+ return $d => {
1931
+ switch($3.a2.a2.h) {
1932
+ case 0: return $f => Data_Promise_x3ex3ex3d_Monad_Promise($12 => Config_getConfig($0, $3.a2.a1, $12), value => Prelude_IO_putStrLn(csegen_21(), value), $d, $f);
1933
+ case undefined: {
1934
+ return $1e => {
1935
+ switch($3.a2.a2.a2.h) {
1936
+ case 0: return Data_Promise_map_Functor_Promise($22 => (undefined), Config_setConfig($0, $3.a2.a1, $3.a2.a2.a1), $d, $1e);
1937
+ default: {
1938
+ const $3c = $3d => $3e => $3f => {
1939
+ switch($3d.h) {
1940
+ case undefined: return Data_Promise_x3ex3ex3d_Monad_Promise($43 => $44 => $45 => Data_Promise_liftIO_HasIO_Promise(FFI_GitHub_octokit($3d.a1), $43, $44, $45), _ => $4e => $4f => Data_Promise_x3ex3ex3d_Monad_Promise($52 => $53 => Config_syncIfOld(_, $0, $52, $53), configx27 => Main_handleAuthenticatedArgs(configx27, $1, _, $3), $4e, $4f), $3e, $3f);
1941
+ case 0: return Data_Promise_reject('Either the GITHUB_PAT environment variable or githubPAT config property must be set to a personal access token.', $3e, $3f);
1942
+ }
1943
+ };
1944
+ return Data_Promise_x3ex3ex3d_Monad_Promise($2c => $2d => Data_Promise_pure_Applicative_Promise(Prelude_Types_x3cx7cx3e_Alternative_Maybe($2, () => Prelude_Interfaces_x3cx24x3e(csegen_18(), $37 => $37, $0.a10)), $2c, $2d), $3c, $d, $1e);
1945
+ }
1946
+ }
1947
+ };
1948
+ }
1949
+ default: {
1950
+ return $69 => {
1951
+ const $7c = $7d => $7e => $7f => {
1952
+ switch($7d.h) {
1953
+ case undefined: return Data_Promise_x3ex3ex3d_Monad_Promise($83 => $84 => $85 => Data_Promise_liftIO_HasIO_Promise(FFI_GitHub_octokit($7d.a1), $83, $84, $85), _ => $8e => $8f => Data_Promise_x3ex3ex3d_Monad_Promise($92 => $93 => Config_syncIfOld(_, $0, $92, $93), configx27 => Main_handleAuthenticatedArgs(configx27, $1, _, $3), $8e, $8f), $7e, $7f);
1954
+ case 0: return Data_Promise_reject('Either the GITHUB_PAT environment variable or githubPAT config property must be set to a personal access token.', $7e, $7f);
1955
+ }
1956
+ };
1957
+ return Data_Promise_x3ex3ex3d_Monad_Promise($6c => $6d => Data_Promise_pure_Applicative_Promise(Prelude_Types_x3cx7cx3e_Alternative_Maybe($2, () => Prelude_Interfaces_x3cx24x3e(csegen_18(), $77 => $77, $0.a10)), $6c, $6d), $7c, $d, $69);
1958
+ };
1959
+ }
1960
+ }
1961
+ };
1962
+ }
1963
+ default: {
1964
+ return $a9 => $aa => {
1965
+ const $bd = $be => $bf => $c0 => {
1966
+ switch($be.h) {
1967
+ case undefined: return Data_Promise_x3ex3ex3d_Monad_Promise($c4 => $c5 => $c6 => Data_Promise_liftIO_HasIO_Promise(FFI_GitHub_octokit($be.a1), $c4, $c5, $c6), _ => $cf => $d0 => Data_Promise_x3ex3ex3d_Monad_Promise($d3 => $d4 => Config_syncIfOld(_, $0, $d3, $d4), configx27 => Main_handleAuthenticatedArgs(configx27, $1, _, $3), $cf, $d0), $bf, $c0);
1968
+ case 0: return Data_Promise_reject('Either the GITHUB_PAT environment variable or githubPAT config property must be set to a personal access token.', $bf, $c0);
1969
+ }
1970
+ };
1971
+ return Data_Promise_x3ex3ex3d_Monad_Promise($ad => $ae => Data_Promise_pure_Applicative_Promise(Prelude_Types_x3cx7cx3e_Alternative_Maybe($2, () => Prelude_Interfaces_x3cx24x3e(csegen_18(), $b8 => $b8, $0.a10)), $ad, $ae), $bd, $a9, $aa);
1972
+ };
1973
+ }
1974
+ }
1975
+ }
1976
+ default: {
1977
+ return $ea => $eb => {
1978
+ const $fe = $ff => $100 => $101 => {
1979
+ switch($ff.h) {
1980
+ case undefined: return Data_Promise_x3ex3ex3d_Monad_Promise($105 => $106 => $107 => Data_Promise_liftIO_HasIO_Promise(FFI_GitHub_octokit($ff.a1), $105, $106, $107), _ => $110 => $111 => Data_Promise_x3ex3ex3d_Monad_Promise($114 => $115 => Config_syncIfOld(_, $0, $114, $115), configx27 => Main_handleAuthenticatedArgs(configx27, $1, _, $3), $110, $111), $100, $101);
1981
+ case 0: return Data_Promise_reject('Either the GITHUB_PAT environment variable or githubPAT config property must be set to a personal access token.', $100, $101);
1982
+ }
1983
+ };
1984
+ return Data_Promise_x3ex3ex3d_Monad_Promise($ee => $ef => Data_Promise_pure_Applicative_Promise(Prelude_Types_x3cx7cx3e_Alternative_Maybe($2, () => Prelude_Interfaces_x3cx24x3e(csegen_18(), $f9 => $f9, $0.a10)), $ee, $ef), $fe, $ea, $eb);
1985
+ };
1986
+ }
1987
+ }
1988
+ }
1989
+ default: {
1990
+ return $12b => $12c => {
1991
+ const $13f = $140 => $141 => $142 => {
1992
+ switch($140.h) {
1993
+ case undefined: return Data_Promise_x3ex3ex3d_Monad_Promise($146 => $147 => $148 => Data_Promise_liftIO_HasIO_Promise(FFI_GitHub_octokit($140.a1), $146, $147, $148), _ => $151 => $152 => Data_Promise_x3ex3ex3d_Monad_Promise($155 => $156 => Config_syncIfOld(_, $0, $155, $156), configx27 => Main_handleAuthenticatedArgs(configx27, $1, _, $3), $151, $152), $141, $142);
1994
+ case 0: return Data_Promise_reject('Either the GITHUB_PAT environment variable or githubPAT config property must be set to a personal access token.', $141, $142);
1995
+ }
1996
+ };
1997
+ return Data_Promise_x3ex3ex3d_Monad_Promise($12f => $130 => Data_Promise_pure_Applicative_Promise(Prelude_Types_x3cx7cx3e_Alternative_Maybe($2, () => Prelude_Interfaces_x3cx24x3e(csegen_18(), $13a => $13a, $0.a10)), $12f, $130), $13f, $12b, $12c);
1998
+ };
1999
+ }
2000
+ }
2001
+ }
2002
+
2003
+ function Main_handleAuthenticatedArgs($0, $1, $2, $3) {
2004
+ switch($3.h) {
1913
2005
  case undefined: {
1914
2006
  switch($3.a1) {
1915
2007
  case 'reviews': {
@@ -1919,28 +2011,28 @@ function Main_handleConfiguredArgs($0, $1, $2, $3) {
1919
2011
  case '--json': {
1920
2012
  switch($3.a2.a2.h) {
1921
2013
  case undefined: {
1922
- return $11 => {
2014
+ return $9 => {
1923
2015
  switch($3.a2.a2.a2.h) {
1924
2016
  case 0: {
1925
- return $13 => {
1926
- const $14 = Data_String_parsePositive(csegen_29(), $3.a2.a2.a1);
1927
- switch($14.h) {
1928
- case undefined: return Data_Promise_x3ex3ex3d_Monad_Promise($1b => $1c => FFI_GitHub_listPullReviewsJsonStr($2, $0.a2, $0.a3, $14.a1, $1b, $1c), reviewsJsonStr => Prelude_IO_putStr(csegen_21(), reviewsJsonStr), $11, $13);
1929
- case 0: return Data_Promise_pure_Applicative_Promise(undefined, $11, $13);
2017
+ return $b => {
2018
+ const $c = Data_String_parsePositive(csegen_29(), $3.a2.a2.a1);
2019
+ switch($c.h) {
2020
+ case undefined: return Data_Promise_x3ex3ex3d_Monad_Promise($13 => $14 => FFI_GitHub_listPullReviewsJsonStr($2, $0.a2, $0.a3, $c.a1, $13, $14), reviewsJsonStr => Prelude_IO_putStr(csegen_21(), reviewsJsonStr), $9, $b);
2021
+ case 0: return Data_Promise_pure_Applicative_Promise(undefined, $9, $b);
1930
2022
  }
1931
2023
  };
1932
2024
  }
1933
- default: return $31 => Data_Promise_reject(Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_115(), $3), a2: {a1: '.', a2: {h: 0}}}}), $11, $31);
2025
+ default: return $29 => Data_Promise_reject(Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_114(), $3), a2: {a1: '.', a2: {h: 0}}}}), $9, $29);
1934
2026
  }
1935
2027
  };
1936
2028
  }
1937
- default: return $46 => $47 => Data_Promise_reject(Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_115(), $3), a2: {a1: '.', a2: {h: 0}}}}), $46, $47);
2029
+ default: return $3e => $3f => Data_Promise_reject(Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_114(), $3), a2: {a1: '.', a2: {h: 0}}}}), $3e, $3f);
1938
2030
  }
1939
2031
  }
1940
- default: return $5c => $5d => Data_Promise_reject(Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_115(), $3), a2: {a1: '.', a2: {h: 0}}}}), $5c, $5d);
2032
+ default: return $54 => $55 => Data_Promise_reject(Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_114(), $3), a2: {a1: '.', a2: {h: 0}}}}), $54, $55);
1941
2033
  }
1942
2034
  }
1943
- default: return $72 => $73 => Data_Promise_reject(Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_115(), $3), a2: {a1: '.', a2: {h: 0}}}}), $72, $73);
2035
+ default: return $6a => $6b => Data_Promise_reject(Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_114(), $3), a2: {a1: '.', a2: {h: 0}}}}), $6a, $6b);
1944
2036
  }
1945
2037
  }
1946
2038
  case 'pulls': {
@@ -1954,27 +2046,27 @@ function Main_handleConfiguredArgs($0, $1, $2, $3) {
1954
2046
  case undefined: {
1955
2047
  switch($3.a2.a2.a2.a2.h) {
1956
2048
  case 0: {
1957
- const $8d = Prelude_Types_x3cx2ax3e_Applicative_Maybe(Prelude_Types_x3cx2ax3e_Applicative_Maybe({a1: $93 => $94 => ({a1: $93, a2: $94})}, Main_n__7140_3746_parseLim($1, $2, $3.a2.a2.a1, $3.a2.a2.a2.a1, $0)($3.a2.a2.a1)), Main_n__7140_3747_parsePg($1, $2, $3.a2.a2.a1, $3.a2.a2.a2.a1, $0, $3.a2.a2.a2.a1));
1958
- return $a8 => $a9 => {
1959
- switch($8d.h) {
1960
- case undefined: return Data_Promise_x3ex3ex3d_Monad_Promise(FFI_GitHub_listPullRequestsJsonStr($2, $0.a2, $0.a3, {h: 0}, $8d.a1.a1, $8d.a1.a2), pullsJsonStr => Prelude_IO_putStr(csegen_21(), pullsJsonStr), $a8, $a9);
1961
- case 0: return Data_Promise_pure_Applicative_Promise(undefined, $a8, $a9);
2049
+ const $85 = Prelude_Types_x3cx2ax3e_Applicative_Maybe(Prelude_Types_x3cx2ax3e_Applicative_Maybe({a1: $8b => $8c => ({a1: $8b, a2: $8c})}, Main_n__7204_2634_parseLim($1, $2, $3.a2.a2.a1, $3.a2.a2.a2.a1, $0)($3.a2.a2.a1)), Main_n__7204_2635_parsePg($1, $2, $3.a2.a2.a1, $3.a2.a2.a2.a1, $0, $3.a2.a2.a2.a1));
2050
+ return $a0 => $a1 => {
2051
+ switch($85.h) {
2052
+ case undefined: return Data_Promise_x3ex3ex3d_Monad_Promise(FFI_GitHub_listPullRequestsJsonStr($2, $0.a2, $0.a3, {h: 0}, $85.a1.a1, $85.a1.a2), pullsJsonStr => Prelude_IO_putStr(csegen_21(), pullsJsonStr), $a0, $a1);
2053
+ case 0: return Data_Promise_pure_Applicative_Promise(undefined, $a0, $a1);
1962
2054
  }
1963
2055
  };
1964
2056
  }
1965
- default: return $c2 => $c3 => Data_Promise_reject(Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_115(), $3), a2: {a1: '.', a2: {h: 0}}}}), $c2, $c3);
2057
+ default: return $ba => $bb => Data_Promise_reject(Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_114(), $3), a2: {a1: '.', a2: {h: 0}}}}), $ba, $bb);
1966
2058
  }
1967
2059
  }
1968
- default: return $d8 => $d9 => Data_Promise_reject(Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_115(), $3), a2: {a1: '.', a2: {h: 0}}}}), $d8, $d9);
2060
+ default: return $d0 => $d1 => Data_Promise_reject(Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_114(), $3), a2: {a1: '.', a2: {h: 0}}}}), $d0, $d1);
1969
2061
  }
1970
2062
  }
1971
- default: return $ee => $ef => Data_Promise_reject(Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_115(), $3), a2: {a1: '.', a2: {h: 0}}}}), $ee, $ef);
2063
+ default: return $e6 => $e7 => Data_Promise_reject(Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_114(), $3), a2: {a1: '.', a2: {h: 0}}}}), $e6, $e7);
1972
2064
  }
1973
2065
  }
1974
- default: return $104 => $105 => Data_Promise_reject(Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_115(), $3), a2: {a1: '.', a2: {h: 0}}}}), $104, $105);
2066
+ default: return $fc => $fd => Data_Promise_reject(Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_114(), $3), a2: {a1: '.', a2: {h: 0}}}}), $fc, $fd);
1975
2067
  }
1976
2068
  }
1977
- default: return $11a => $11b => Data_Promise_reject(Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_115(), $3), a2: {a1: '.', a2: {h: 0}}}}), $11a, $11b);
2069
+ default: return $112 => $113 => Data_Promise_reject(Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_114(), $3), a2: {a1: '.', a2: {h: 0}}}}), $112, $113);
1978
2070
  }
1979
2071
  }
1980
2072
  case 'user': {
@@ -1982,159 +2074,138 @@ function Main_handleConfiguredArgs($0, $1, $2, $3) {
1982
2074
  case undefined: {
1983
2075
  switch($3.a2.a1) {
1984
2076
  case '--json': {
1985
- return $132 => {
2077
+ return $12a => {
1986
2078
  switch($3.a2.a2.h) {
1987
2079
  case undefined: {
1988
- return $134 => {
2080
+ return $12c => {
1989
2081
  switch($3.a2.a2.a2.h) {
1990
- case 0: return Data_Promise_x3ex3ex3d_Monad_Promise(FFI_GitHub_getUser($2)($3.a2.a2.a1), $13d => Prelude_IO_print({a1: csegen_21(), a2: {a1: x => Language_JSON_Data_show_Show_JSON(x), a2: d => x => Language_JSON_Data_showPrec_Show_JSON(d, x)}}, Data_User_json($13d)), $132, $134);
1991
- default: return Data_Promise_reject(Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_115(), $3), a2: {a1: '.', a2: {h: 0}}}}), $132, $134);
2082
+ case 0: return Data_Promise_x3ex3ex3d_Monad_Promise(FFI_GitHub_getUser($2)($3.a2.a2.a1), $135 => Prelude_IO_print({a1: csegen_21(), a2: {a1: x => Language_JSON_Data_show_Show_JSON(x), a2: d => x => Language_JSON_Data_showPrec_Show_JSON(d, x)}}, Data_User_json($135)), $12a, $12c);
2083
+ default: return Data_Promise_reject(Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_114(), $3), a2: {a1: '.', a2: {h: 0}}}}), $12a, $12c);
1992
2084
  }
1993
2085
  };
1994
2086
  }
1995
- default: return $163 => Data_Promise_reject(Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_115(), $3), a2: {a1: '.', a2: {h: 0}}}}), $132, $163);
2087
+ default: return $15b => Data_Promise_reject(Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_114(), $3), a2: {a1: '.', a2: {h: 0}}}}), $12a, $15b);
1996
2088
  }
1997
2089
  };
1998
2090
  }
1999
- default: return $178 => $179 => Data_Promise_reject(Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_115(), $3), a2: {a1: '.', a2: {h: 0}}}}), $178, $179);
2091
+ default: return $170 => $171 => Data_Promise_reject(Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_114(), $3), a2: {a1: '.', a2: {h: 0}}}}), $170, $171);
2000
2092
  }
2001
2093
  }
2002
- default: return $18e => $18f => Data_Promise_reject(Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_115(), $3), a2: {a1: '.', a2: {h: 0}}}}), $18e, $18f);
2094
+ default: return $186 => $187 => Data_Promise_reject(Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_114(), $3), a2: {a1: '.', a2: {h: 0}}}}), $186, $187);
2003
2095
  }
2004
2096
  }
2005
2097
  case 'whoami': {
2006
- return $1a4 => $1a5 => {
2098
+ return $19c => $19d => {
2007
2099
  switch($3.a2.h) {
2008
- case 0: return User_Me_printInfoOnSelf($0, $2, $1, $1a4, $1a5);
2009
- default: return Data_Promise_reject(Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_115(), $3), a2: {a1: '.', a2: {h: 0}}}}), $1a4, $1a5);
2100
+ case 0: return User_Me_printInfoOnSelf($0, $2, $1, $19c, $19d);
2101
+ default: return Data_Promise_reject(Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_114(), $3), a2: {a1: '.', a2: {h: 0}}}}), $19c, $19d);
2010
2102
  }
2011
2103
  };
2012
2104
  }
2013
2105
  case 'sync': {
2014
- return $1c1 => $1c2 => {
2106
+ return $1b9 => $1ba => {
2015
2107
  switch($3.a2.h) {
2016
- case 0: return Data_Promise_map_Functor_Promise($1c6 => (undefined), $1c8 => $1c9 => Config_syncConfig($0, $2, 1, $1c8, $1c9), $1c1, $1c2);
2017
- default: return Data_Promise_reject(Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_115(), $3), a2: {a1: '.', a2: {h: 0}}}}), $1c1, $1c2);
2108
+ case 0: return Data_Promise_map_Functor_Promise($1be => (undefined), $1c0 => $1c1 => Config_syncConfig($0, $2, 1, $1c0, $1c1), $1b9, $1ba);
2109
+ default: return Data_Promise_reject(Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_114(), $3), a2: {a1: '.', a2: {h: 0}}}}), $1b9, $1ba);
2018
2110
  }
2019
2111
  };
2020
2112
  }
2021
2113
  case 'branch': {
2022
- return $1e6 => {
2114
+ return $1de => {
2023
2115
  switch($3.a2.h) {
2024
- case 0: return $1e8 => Main_printCurrentBranchURI($0, $1, $1e6, $1e8);
2025
- default: return $1ee => Data_Promise_reject(Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_115(), $3), a2: {a1: '.', a2: {h: 0}}}}), $1e6, $1ee);
2116
+ case 0: return $1e0 => Main_printCurrentBranchURI($0, $1, $1de, $1e0);
2117
+ default: return $1e6 => Data_Promise_reject(Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_114(), $3), a2: {a1: '.', a2: {h: 0}}}}), $1de, $1e6);
2026
2118
  }
2027
2119
  };
2028
2120
  }
2029
2121
  case 'pr': {
2030
- return $203 => $204 => {
2122
+ return $1fb => $1fc => {
2031
2123
  switch($3.a2.h) {
2032
2124
  case 0: {
2033
- const $21f = $220 => {
2034
- switch($220.h) {
2125
+ const $217 = $218 => {
2126
+ switch($218.h) {
2035
2127
  case undefined: {
2036
- switch($220.a1) {
2037
- case 0: return Prelude_IO_putStrLn(csegen_21(), Data_PullRequest_rf__webURI($0, $220.a2));
2038
- default: return csegen_128();
2128
+ switch($218.a1) {
2129
+ case 0: return Prelude_IO_putStrLn(csegen_21(), Data_PullRequest_rf__webURI($0, $218.a2));
2130
+ default: return csegen_129();
2039
2131
  }
2040
2132
  }
2041
- default: return csegen_128();
2133
+ default: return csegen_129();
2042
2134
  }
2043
2135
  };
2044
- return Data_Promise_x3ex3ex3d_Monad_Promise($208 => $209 => Data_Promise_x3ex3ex3d_Monad_Promise($20c => $20d => FFI_Git_currentBranch($1, $20c, $20d), $213 => $214 => $215 => PullRequest_identifyOrCreatePR($0, $1, $2, $213, $214, $215), $208, $209), $21f, $203, $204);
2136
+ return Data_Promise_x3ex3ex3d_Monad_Promise($200 => $201 => Data_Promise_x3ex3ex3d_Monad_Promise($204 => $205 => FFI_Git_currentBranch($1, $204, $205), $20b => $20c => $20d => PullRequest_identifyOrCreatePR($0, $1, $2, $20b, $20c, $20d), $200, $201), $217, $1fb, $1fc);
2045
2137
  }
2046
- default: return Data_Promise_reject(Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_115(), $3), a2: {a1: '.', a2: {h: 0}}}}), $203, $204);
2138
+ default: return Data_Promise_reject(Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_114(), $3), a2: {a1: '.', a2: {h: 0}}}}), $1fb, $1fc);
2047
2139
  }
2048
2140
  };
2049
2141
  }
2050
2142
  case 'reflect': {
2051
- return $242 => $243 => {
2143
+ return $23a => $23b => {
2052
2144
  switch($3.a2.h) {
2053
- case 0: return User_Reflect_reflectOnSelf($0, $2, $242, $243);
2054
- default: return Data_Promise_reject(Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_115(), $3), a2: {a1: '.', a2: {h: 0}}}}), $242, $243);
2145
+ case 0: return User_Reflect_reflectOnSelf($0, $2, $23a, $23b);
2146
+ default: return Data_Promise_reject(Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_114(), $3), a2: {a1: '.', a2: {h: 0}}}}), $23a, $23b);
2055
2147
  }
2056
2148
  };
2057
2149
  }
2058
- case 'config': {
2059
- switch($3.a2.h) {
2060
- case undefined: {
2061
- return $25f => {
2062
- switch($3.a2.a2.h) {
2063
- case 0: return $261 => Data_Promise_x3ex3ex3d_Monad_Promise($264 => Config_getConfig($0, $3.a2.a1, $264), value => Prelude_IO_putStrLn(csegen_21(), value), $25f, $261);
2064
- case undefined: {
2065
- return $270 => {
2066
- switch($3.a2.a2.a2.h) {
2067
- case 0: return Data_Promise_map_Functor_Promise($274 => (undefined), Config_setConfig($0, $3.a2.a1, $3.a2.a2.a1), $25f, $270);
2068
- default: return Data_Promise_reject(Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_115(), $3), a2: {a1: '.', a2: {h: 0}}}}), $25f, $270);
2069
- }
2070
- };
2071
- }
2072
- default: return $290 => Data_Promise_reject(Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_115(), $3), a2: {a1: '.', a2: {h: 0}}}}), $25f, $290);
2073
- }
2074
- };
2075
- }
2076
- default: return $2a5 => $2a6 => Data_Promise_reject(Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_115(), $3), a2: {a1: '.', a2: {h: 0}}}}), $2a5, $2a6);
2077
- }
2078
- }
2079
2150
  case 'contribute': {
2080
- const $2bb = Main_parseContributeArgs($3.a2);
2081
- switch($2bb.h) {
2082
- case 1: return $2be => $2bf => Main_contribute($0, $1, $2, $2bb.a1, $2be, $2bf);
2083
- case 0: return Main_exitError(csegen_21(), $2bb.a1);
2151
+ const $256 = Main_parseContributeArgs($3.a2);
2152
+ switch($256.h) {
2153
+ case 1: return $259 => $25a => Main_contribute($0, $1, $2, $256.a1, $259, $25a);
2154
+ case 0: return Main_exitError(csegen_21(), $256.a1);
2084
2155
  }
2085
2156
  }
2086
2157
  case 'list': {
2087
2158
  switch($3.a2.h) {
2088
- case 0: return $2cc => $2cd => Data_Promise_reject('The list command expects the name of a GitHub Team as an argument.', $2cc, $2cd);
2159
+ case 0: return $267 => $268 => Data_Promise_reject('The list command expects the name of a GitHub Team as an argument.', $267, $268);
2089
2160
  case undefined: {
2090
- return $2d2 => {
2161
+ return $26d => {
2091
2162
  switch($3.a2.a2.h) {
2092
- case 0: return $2d4 => Main_listTeam($0, $2, $3.a2.a1, $2d2, $2d4);
2093
- default: return $2db => Data_Promise_reject(Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_115(), $3), a2: {a1: '.', a2: {h: 0}}}}), $2d2, $2db);
2163
+ case 0: return $26f => Main_listTeam($0, $2, $3.a2.a1, $26d, $26f);
2164
+ default: return $276 => Data_Promise_reject(Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_114(), $3), a2: {a1: '.', a2: {h: 0}}}}), $26d, $276);
2094
2165
  }
2095
2166
  };
2096
2167
  }
2097
- default: return $2f0 => $2f1 => Data_Promise_reject(Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_115(), $3), a2: {a1: '.', a2: {h: 0}}}}), $2f0, $2f1);
2168
+ default: return $28b => $28c => Data_Promise_reject(Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_114(), $3), a2: {a1: '.', a2: {h: 0}}}}), $28b, $28c);
2098
2169
  }
2099
2170
  }
2100
2171
  case 'graph': {
2101
2172
  switch($3.a2.h) {
2102
- case 0: return $307 => $308 => Data_Promise_reject('The graph command expects the name of a GitHub Team as an argument.', $307, $308);
2173
+ case 0: return $2a2 => $2a3 => Data_Promise_reject('The graph command expects the name of a GitHub Team as an argument.', $2a2, $2a3);
2103
2174
  case undefined: {
2104
- return $30d => {
2175
+ return $2a8 => {
2105
2176
  switch($3.a2.a2.h) {
2106
- case 0: return $30f => Main_graphTeam($0, $2, $3.a2.a1, $30d, $30f);
2107
- default: return $316 => Data_Promise_reject(Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_115(), $3), a2: {a1: '.', a2: {h: 0}}}}), $30d, $316);
2177
+ case 0: return $2aa => Main_graphTeam($0, $2, $3.a2.a1, $2a8, $2aa);
2178
+ default: return $2b1 => Data_Promise_reject(Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_114(), $3), a2: {a1: '.', a2: {h: 0}}}}), $2a8, $2b1);
2108
2179
  }
2109
2180
  };
2110
2181
  }
2111
- default: return $32b => $32c => Data_Promise_reject(Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_115(), $3), a2: {a1: '.', a2: {h: 0}}}}), $32b, $32c);
2182
+ default: return $2c6 => $2c7 => Data_Promise_reject(Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_114(), $3), a2: {a1: '.', a2: {h: 0}}}}), $2c6, $2c7);
2112
2183
  }
2113
2184
  }
2114
2185
  case 'assign': {
2115
2186
  switch($3.a2.h) {
2116
- case 0: return $342 => $343 => Data_Promise_reject('The assign commaand expects one or more names of GitHub Teams or Users as arguments.', $342, $343);
2187
+ case 0: return $2dd => $2de => Data_Promise_reject('The assign commaand expects one or more names of GitHub Teams or Users as arguments.', $2dd, $2de);
2117
2188
  case undefined: {
2118
2189
  switch($3.a2.a1) {
2119
2190
  case '--dry': {
2120
- return $349 => {
2191
+ return $2e4 => {
2121
2192
  switch($3.a2.a2.h) {
2122
- case 0: return $34b => Data_Promise_reject('The assign commaand expects one or more names of GitHub Teams or Users as arguments.', $349, $34b);
2123
- case undefined: return $350 => Main_assign($0, $1, $2, {a1: $3.a2.a2.a1, a2: $3.a2.a2.a2}, 1, $349, $350);
2124
- default: return $35b => Main_assign($0, $1, $2, {a1: $3.a2.a1, a2: $3.a2.a2}, 0, $349, $35b);
2193
+ case 0: return $2e6 => Data_Promise_reject('The assign commaand expects one or more names of GitHub Teams or Users as arguments.', $2e4, $2e6);
2194
+ case undefined: return $2eb => Main_assign($0, $1, $2, {a1: $3.a2.a2.a1, a2: $3.a2.a2.a2}, 1, $2e4, $2eb);
2195
+ default: return $2f6 => Main_assign($0, $1, $2, {a1: $3.a2.a1, a2: $3.a2.a2}, 0, $2e4, $2f6);
2125
2196
  }
2126
2197
  };
2127
2198
  }
2128
- default: return $366 => $367 => Main_assign($0, $1, $2, {a1: $3.a2.a1, a2: $3.a2.a2}, 0, $366, $367);
2199
+ default: return $301 => $302 => Main_assign($0, $1, $2, {a1: $3.a2.a1, a2: $3.a2.a2}, 0, $301, $302);
2129
2200
  }
2130
2201
  }
2131
- default: return $372 => $373 => Data_Promise_reject(Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_115(), $3), a2: {a1: '.', a2: {h: 0}}}}), $372, $373);
2202
+ default: return $30d => $30e => Data_Promise_reject(Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_114(), $3), a2: {a1: '.', a2: {h: 0}}}}), $30d, $30e);
2132
2203
  }
2133
2204
  }
2134
- default: return $388 => $389 => Data_Promise_reject(Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_115(), $3), a2: {a1: '.', a2: {h: 0}}}}), $388, $389);
2205
+ default: return $323 => $324 => Data_Promise_reject(Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_114(), $3), a2: {a1: '.', a2: {h: 0}}}}), $323, $324);
2135
2206
  }
2136
2207
  }
2137
- default: return $39e => $39f => Data_Promise_reject(Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_115(), $3), a2: {a1: '.', a2: {h: 0}}}}), $39e, $39f);
2208
+ default: return $339 => $33a => Data_Promise_reject(Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_114(), $3), a2: {a1: '.', a2: {h: 0}}}}), $339, $33a);
2138
2209
  }
2139
2210
  }
2140
2211
 
@@ -2149,30 +2220,30 @@ function Main_handleArgs($0, $1, $2, $3, $4) {
2149
2220
  case undefined: {
2150
2221
  switch($4.a2.a2.a2.h) {
2151
2222
  case 0: return Main_bashCompletion(csegen_59(), $4.a2.a1, $4.a2.a2.a1);
2152
- default: return Main_resolvex27x27($11 => $12 => Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Interfaces_x3dx3cx3c(csegen_15(), $19 => $1a => $1b => Config_syncIfOld($1, $19, $1a, $1b), $22 => $23 => Config_loadOrCreateConfig($0, $1, $2, $3, $22, $23)), _ => Main_handleConfiguredArgs(_, $0, $1, $4), $11, $12));
2223
+ default: return Main_resolvex27x27($11 => $12 => Data_Promise_x3ex3ex3d_Monad_Promise($15 => $16 => Config_loadOrCreateConfig($0, $1, $2, $3, $15, $16), config => Main_handleConfiguredArgs(config, $0, $1, $4), $11, $12));
2153
2224
  }
2154
2225
  }
2155
- default: return Main_resolvex27x27($35 => $36 => Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Interfaces_x3dx3cx3c(csegen_15(), $3d => $3e => $3f => Config_syncIfOld($1, $3d, $3e, $3f), $46 => $47 => Config_loadOrCreateConfig($0, $1, $2, $3, $46, $47)), _ => Main_handleConfiguredArgs(_, $0, $1, $4), $35, $36));
2226
+ default: return Main_resolvex27x27($28 => $29 => Data_Promise_x3ex3ex3d_Monad_Promise($2c => $2d => Config_loadOrCreateConfig($0, $1, $2, $3, $2c, $2d), config => Main_handleConfiguredArgs(config, $0, $1, $4), $28, $29));
2156
2227
  }
2157
2228
  }
2158
- default: return Main_resolvex27x27($59 => $5a => Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Interfaces_x3dx3cx3c(csegen_15(), $61 => $62 => $63 => Config_syncIfOld($1, $61, $62, $63), $6a => $6b => Config_loadOrCreateConfig($0, $1, $2, $3, $6a, $6b)), _ => Main_handleConfiguredArgs(_, $0, $1, $4), $59, $5a));
2229
+ default: return Main_resolvex27x27($3f => $40 => Data_Promise_x3ex3ex3d_Monad_Promise($43 => $44 => Config_loadOrCreateConfig($0, $1, $2, $3, $43, $44), config => Main_handleConfiguredArgs(config, $0, $1, $4), $3f, $40));
2159
2230
  }
2160
2231
  }
2161
2232
  case '--bash-completion-script': {
2162
2233
  switch($4.a2.h) {
2163
2234
  case 0: return Prelude_IO_putStrLn(csegen_59(), BashCompletion_script());
2164
- default: return Main_resolvex27x27($83 => $84 => Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Interfaces_x3dx3cx3c(csegen_15(), $8b => $8c => $8d => Config_syncIfOld($1, $8b, $8c, $8d), $94 => $95 => Config_loadOrCreateConfig($0, $1, $2, $3, $94, $95)), _ => Main_handleConfiguredArgs(_, $0, $1, $4), $83, $84));
2235
+ default: return Main_resolvex27x27($5c => $5d => Data_Promise_x3ex3ex3d_Monad_Promise($60 => $61 => Config_loadOrCreateConfig($0, $1, $2, $3, $60, $61), config => Main_handleConfiguredArgs(config, $0, $1, $4), $5c, $5d));
2165
2236
  }
2166
2237
  }
2167
- default: return Main_resolvex27x27($a7 => $a8 => Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Interfaces_x3dx3cx3c(csegen_15(), $af => $b0 => $b1 => Config_syncIfOld($1, $af, $b0, $b1), $b8 => $b9 => Config_loadOrCreateConfig($0, $1, $2, $3, $b8, $b9)), _ => Main_handleConfiguredArgs(_, $0, $1, $4), $a7, $a8));
2238
+ default: return Main_resolvex27x27($73 => $74 => Data_Promise_x3ex3ex3d_Monad_Promise($77 => $78 => Config_loadOrCreateConfig($0, $1, $2, $3, $77, $78), config => Main_handleConfiguredArgs(config, $0, $1, $4), $73, $74));
2168
2239
  }
2169
2240
  }
2170
- default: return Main_resolvex27x27($cb => $cc => Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Interfaces_x3dx3cx3c(csegen_15(), $d3 => $d4 => $d5 => Config_syncIfOld($1, $d3, $d4, $d5), $dc => $dd => Config_loadOrCreateConfig($0, $1, $2, $3, $dc, $dd)), _ => Main_handleConfiguredArgs(_, $0, $1, $4), $cb, $cc));
2241
+ default: return Main_resolvex27x27($8a => $8b => Data_Promise_x3ex3ex3d_Monad_Promise($8e => $8f => Config_loadOrCreateConfig($0, $1, $2, $3, $8e, $8f), config => Main_handleConfiguredArgs(config, $0, $1, $4), $8a, $8b));
2171
2242
  }
2172
2243
  }
2173
2244
 
2174
2245
  function Main_graphTeam($0, $1, $2, $3, $4) {
2175
- return Data_Promise_x3ex3ex3d_Monad_Promise(FFI_GitHub_listTeamMembers($1, $0.a2, $2), teamMemberLogins => $d => $e => Data_Promise_x3ex3ex3d_Monad_Promise($11 => $12 => PullRequest_listReviewers($0, $1, 4n, csegen_134(), $11, $12), $1c => $1d => $1e => $1f => Data_Promise_liftIO_HasIO_Promise(Text_PrettyPrint_Prettyprinter_Render_Terminal_putDoc(Main_n__6498_3045_maybeDecorated($1, $2, $0, Reviewer_reviewsGraph(csegen_111(), {a1: ann => $2f => Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String($2f), a2: ann => $33 => $34 => Text_PrettyPrint_Prettyprinter_Doc_prettyPrec_Pretty_String($33, $34)}, $1c.a2, $1c.a1, teamMemberLogins))), $1d, $1e, $1f), $d, $e), $3, $4);
2246
+ return Data_Promise_x3ex3ex3d_Monad_Promise(FFI_GitHub_listTeamMembers($1, $0.a2, $2), teamMemberLogins => $d => $e => Data_Promise_x3ex3ex3d_Monad_Promise($11 => $12 => PullRequest_listReviewers($0, $1, 4n, csegen_134(), $11, $12), $1c => Util_renderIO($0, csegen_21(), Reviewer_reviewsGraph(csegen_110(), {a1: ann => $28 => Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String($28), a2: ann => $2c => $2d => Text_PrettyPrint_Prettyprinter_Doc_prettyPrec_Pretty_String($2c, $2d)}, $1c.a2, $1c.a1, teamMemberLogins)), $d, $e), $3, $4);
2176
2247
  }
2177
2248
 
2178
2249
  function Main_exitError($0, $1) {
@@ -2212,21 +2283,21 @@ function Main_contribute($0, $1, $2, $3, $4, $5) {
2212
2283
  };
2213
2284
  const $35 = Prelude_Types_List_filter($37, openPrs);
2214
2285
  const $3e = Data_List_partition($41 => Data_PullRequest_isRequestedReviewer(myLogin, $41), $35);
2215
- return Main_case__contribute_3289($1, $2, $3, $0, openPrs, myLogin, $21, $2f, $35, $3e, Prelude_Interfaces_mapHom({a1: d => b => c => a => $55 => $56 => $57 => ({a1: $55($57.a1), a2: $56($57.a2)}), a2: b => c => a => $60 => $61 => ({a1: $60($61.a1), a2: $61.a2}), a3: a => d => b => $68 => $69 => ({a1: $69.a1, a2: $68($69.a2)})}, $70 => Data_List_sortBy($73 => $74 => Prelude_Basics_on(csegen_141(), $79 => $79.a2, $73, $74), $70), $3e));
2286
+ return Main_case__contribute_2186($1, $2, $3, $0, openPrs, myLogin, $21, $2f, $35, $3e, Prelude_Interfaces_mapHom({a1: d => b => c => a => $55 => $56 => $57 => ({a1: $55($57.a1), a2: $56($57.a2)}), a2: b => c => a => $60 => $61 => ({a1: $60($61.a1), a2: $61.a2}), a3: a => d => b => $68 => $69 => ({a1: $69.a1, a2: $68($69.a2)})}, $70 => Data_List_sortBy($73 => $74 => Prelude_Basics_on(csegen_141(), $79 => $79.a2, $73, $74), $70), $3e));
2216
2287
  };
2217
- return Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Interfaces_x3cx24x3e(csegen_103(), csegen_139(), FFI_GitHub_getSelf($2)), $20, $14, $15);
2288
+ return Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Interfaces_x3cx24x3e(csegen_102(), csegen_139(), FFI_GitHub_getSelf($2)), $20, $14, $15);
2218
2289
  };
2219
2290
  return Data_Promise_x3ex3ex3d_Monad_Promise(FFI_GitHub_listPullRequests($2, $0.a2, $0.a3, {a1: 0}, csegen_134(), 0n), $13, $4, $5);
2220
2291
  }
2221
2292
 
2222
2293
  function Main_bashCompletion($0, $1, $2) {
2223
- const $3 = Prelude_Types_maybe(() => Main_n__6095_2643_configuredOpts($0, $2, $1), () => $b => $0.a1.a1.a2(undefined)($b), BashCompletion_cmdOpts($1, $2));
2294
+ const $3 = Prelude_Types_maybe(() => Main_n__6195_1583_configuredOpts($0, $2, $1), () => $b => $0.a1.a1.a2(undefined)($b), BashCompletion_cmdOpts($1, $2));
2224
2295
  return $0.a1.a2(undefined)(undefined)($3)($21 => Prelude_IO_putStr($0, Data_String_fastUnlines($21)));
2225
2296
  }
2226
2297
 
2227
2298
  function Main_assign($0, $1, $2, $3, $4, $5, $6) {
2228
2299
  return Data_Promise_x3ex3ex3d_Monad_Promise($9 => $a => Data_Promise_x3ex3ex3d_Monad_Promise($d => $e => FFI_Git_currentBranch($1, $d, $e), $14 => $15 => $16 => PullRequest_identifyOrCreatePR($0, $1, $2, $14, $15, $16), $9, $a), $21 => $22 => $24 => {
2229
- const $25 = Main_n__6225_2781_partitionedArgs($0, $1, $2, $4, $3);
2300
+ const $25 = Main_n__6325_1721_partitionedArgs($0, $1, $2, $4, $3);
2230
2301
  return PullRequest_requestReviewers($0, $2, $21.a2, $25.a2, $25.a1, $4, $22, $24);
2231
2302
  }, $5, $6);
2232
2303
  }
@@ -2235,99 +2306,11 @@ function Main_x3cx7cx7cx3e($0, $1, $2, $3) {
2235
2306
  return $0.a3(undefined)($1($3))(() => $2($3));
2236
2307
  }
2237
2308
 
2238
- function User_Reflect_case__casex20blockx20inx20reflectOnSelf_2238($0, $1, $2, $3, $4, $5, $6, $7, $8, $9) {
2239
- const $b = Prelude_Interfaces_mapHom({a1: d => b => c => a => $f => $10 => $11 => ({a1: $f($11.a1), a2: $10($11.a2)}), a2: b => c => a => $1a => $1b => ({a1: $1a($1b.a1), a2: $1b.a2}), a3: a => d => b => $22 => $23 => ({a1: $23.a1, a2: $22($23.a2)})}, $2a => Data_List_headx27(Data_List_sort({a1: {a1: $31 => $32 => Data_Date_x3dx3d_Eq_Date($31, $32), a2: $37 => $38 => Data_Date_x2fx3d_Eq_Date($37, $38)}, a2: $3d => $3e => Data_Date_compare_Ord_Date($3d, $3e), a3: $43 => $44 => Data_Date_x3c_Ord_Date($43, $44), a4: $49 => $4a => Data_Date_x3e_Ord_Date($49, $4a), a5: $4f => $50 => Data_Date_x3cx3d_Ord_Date($4f, $50), a6: $55 => $56 => Data_Date_x3ex3d_Ord_Date($55, $56), a7: $5b => $5c => Data_Date_max_Ord_Date($5b, $5c), a8: $61 => $62 => Data_Date_min_Ord_Date($61, $62)}, Prelude_Types_map_Functor_List(csegen_156(), $2a))), {a1: $7, a2: $9.a1});
2240
- return Prelude_IO_putStrLn(csegen_21(), Util_renderString($0, User_Reflect_print(Prelude_Types_String_length(User_Reflect_intro()), Prelude_Types_List_lengthTR($4), Prelude_Types_List_lengthTR($9.a1), Prelude_Types_List_lengthTR($9.a2), Prelude_Types_List_lengthTR($8), Prelude_Types_List_lengthTR($7), $5, $b.a1, $b.a2)));
2241
- }
2242
-
2243
- function User_Reflect_n__5346_1432_ital($0, $1) {
2244
- return Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_italic(), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String($1));
2245
- }
2246
-
2247
- function User_Me_n__6258_2372_handleUnsetEmail($0, $1, $2, $3) {
2248
- switch($3) {
2249
- case '': return 'Not set';
2250
- default: return $3;
2251
- }
2252
- }
2253
-
2254
- const User_Reflect_rightTitle = __lazy(function () {
2255
- return 'authored';
2256
- });
2257
-
2258
- const User_Reflect_reviewDetailsCount = __lazy(function () {
2259
- return 25n;
2260
- });
2261
-
2262
- function User_replicatex27($0, $1, $2) {
2263
- return Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_color($0), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(Data_String_replicate($1, $2)));
2264
- }
2265
-
2266
- function User_Reflect_reflectOnSelf($0, $1, $2, $3) {
2267
- const $c = prs => $d => $e => {
2268
- const $19 = myLogin => $1a => $1b => {
2269
- const $37 = reviews => {
2270
- const $38 = Prelude_Types_map_Functor_Maybe(csegen_159(), Data_List_headx27(Data_List_sortBy($41 => $42 => Prelude_Basics_on(csegen_141(), csegen_159(), $41, $42), reviews)));
2271
- const $4b = PullRequest_tuple(prs);
2272
- const $4e = Prelude_Interfaces_mapHom({a1: d => b => c => a => $52 => $53 => $54 => ({a1: $52($54.a1), a2: $53($54.a2)}), a2: b => c => a => $5d => $5e => ({a1: $5d($5e.a1), a2: $5e.a2}), a3: a => d => b => $65 => $66 => ({a1: $66.a1, a2: $65($66.a2)})}, $6d => Prelude_Types_List_filter($70 => Prelude_EqOrd_x3dx3d_Eq_String($70.a3, myLogin), $6d), $4b);
2273
- return User_Reflect_case__casex20blockx20inx20reflectOnSelf_2238($0, $1, prs, myLogin, reviews, $38, $4b, $4e.a1, $4e.a2, Prelude_Interfaces_mapHom({a1: d => b => c => a => $85 => $86 => $87 => ({a1: $85($87.a1), a2: $86($87.a2)}), a2: b => c => a => $90 => $91 => ({a1: $90($91.a1), a2: $91.a2}), a3: a => d => b => $98 => $99 => ({a1: $99.a1, a2: $98($99.a2)})}, $a0 => Prelude_Types_List_filter($a3 => Prelude_Interfaces_any(csegen_77(), $a8 => Prelude_EqOrd_x3dx3d_Eq_String($a8, myLogin), $a3.a5), $a0), $4b));
2274
- };
2275
- return Data_Promise_x3ex3ex3d_Monad_Promise(PullRequest_reviewsForUser($0, $1, myLogin, Data_List_take(User_Reflect_reviewDetailsCount(), Prelude_Types_List_reverse(Data_List_sortBy($2b => $2c => Prelude_Basics_on(csegen_141(), csegen_156(), $2b, $2c), PullRequest_combined(prs))))), $37, $1a, $1b);
2276
- };
2277
- return Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Interfaces_x3cx24x3e(csegen_103(), csegen_139(), FFI_GitHub_getSelf($1)), $19, $d, $e);
2278
- };
2279
- return Data_Promise_x3ex3ex3d_Monad_Promise(PullRequest_listPartitionedPRs($0, $1, 4n, User_Reflect_prCount()), $c, $2, $3);
2280
- }
2281
-
2282
- function User_Me_printInfoOnSelf($0, $1, $2, $3, $4) {
2283
- return Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Interfaces_x3cx24x3e(csegen_103(), $b => User_Me_n__6258_2372_handleUnsetEmail($0, $1, $2, $b), $12 => $13 => FFI_Git_userEmail($2, $12, $13)), gitEmail => $19 => $1a => Data_Promise_x3ex3ex3d_Monad_Promise(FFI_GitHub_getSelf($1), githubUser => $20 => $21 => Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Interfaces_x3cx24x3e(csegen_103(), csegen_112(), FFI_GitHub_listMyTeams($1)), githubTeams => Prelude_Interfaces_x3ex3e(csegen_15(), Prelude_IO_putStrLn(csegen_21(), Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Git Email: ', a2: {a1: gitEmail, a2: {h: 0}}})), () => Prelude_Interfaces_x3ex3e(csegen_15(), csegen_161(), () => Prelude_Interfaces_x3ex3e(csegen_15(), Prelude_IO_putStrLn(csegen_21(), Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'GitHub Name: ', a2: {a1: githubUser.a2, a2: {h: 0}}})), () => Prelude_Interfaces_x3ex3e(csegen_15(), Prelude_IO_putStrLn(csegen_21(), Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'GitHub Login: ', a2: {a1: githubUser.a1, a2: {h: 0}}})), () => Prelude_Interfaces_x3ex3e(csegen_15(), csegen_161(), () => Prelude_Interfaces_x3ex3e(csegen_15(), Prelude_IO_putStrLn(csegen_21(), 'GitHub Teams:'), () => Prelude_Interfaces_traverse_(csegen_9(), csegen_77(), $83 => Prelude_IO_putStrLn(csegen_21(), $83), githubTeams))))))), $20, $21), $19, $1a), $3, $4);
2284
- }
2285
-
2286
- function User_Reflect_print($0, $1, $2, $3, $4, $5, $6, $7, $8) {
2287
- return Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {a1: User_Reflect_graph($0, $1, $2, $3, $4, $5), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {a1: User_Reflect_details($0, $1, $2, $3, $4, $5, $6, $7, $8), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {h: 0}}}}}});
2288
- }
2289
-
2290
- const User_Reflect_prCount = __lazy(function () {
2291
- return csegen_134();
2292
- });
2293
-
2294
- const User_Reflect_leftTitle = __lazy(function () {
2295
- return 'requested';
2296
- });
2297
-
2298
- const User_Reflect_intro = __lazy(function () {
2299
- return Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Your current pull request summary (out of the past ', a2: {a1: Data_Fin_show_Show_x28Finx20x24nx29(User_Reflect_prCount()), a2: {a1: ' PRs):', a2: {h: 0}}}});
2300
- });
2301
-
2302
- function User_Reflect_header($0) {
2303
- return Text_PrettyPrint_Prettyprinter_Doc_indent(Prelude_Cast_cast_Cast_Nat_Int($0), Text_PrettyPrint_Prettyprinter_Doc_hsep({a1: User_Reflect_n__5346_1432_ital($0, User_Reflect_leftTitle()), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(' '), a2: {a1: User_Reflect_n__5346_1432_ital($0, User_Reflect_rightTitle()), a2: {h: 0}}}}));
2304
- }
2305
-
2306
- function User_Reflect_graph($0, $1, $2, $3, $4, $5) {
2307
- const $6 = ($2+$3);
2308
- const $9 = ($5+$4);
2309
- const $c = Prelude_Types_foldr_Foldable_List(csegen_167(), Prelude_Types_String_length(User_Reflect_leftTitle()), {a1: ($6+$1), a2: {a1: $9, a2: {h: 0}}});
2310
- const $1b = Prelude_Types_foldr_Foldable_List(csegen_167(), Prelude_Types_String_length(User_Reflect_rightTitle()), {a1: $6, a2: {a1: $9, a2: {h: 0}}});
2311
- const $28 = (($c+$1b)+3n);
2312
- const $2d = ((Prelude_Cast_cast_Cast_Nat_Double($0)/2.0)-(Prelude_Cast_cast_Cast_Nat_Double($28)/2.0));
2313
- const $38 = (Prelude_Cast_cast_Cast_Double_Nat($2d)+Prelude_Types_prim__integerToNat(($c-Prelude_Types_String_length(User_Reflect_leftTitle()))));
2314
- const $44 = (Prelude_Cast_cast_Cast_Double_Nat($2d)+Prelude_Types_prim__integerToNat(($c-($6+$1))));
2315
- return Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: User_Reflect_header($38), a2: {a1: User_Reflect_chart($0, $1, $2, $3, $4, $5, $44), a2: {h: 0}}});
2316
- }
2317
-
2318
- function User_Reflect_details($0, $1, $2, $3, $4, $5, $6, $7, $8) {
2319
- return Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(User_Reflect_intro()), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_underline(), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('Requested Reviews:')), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_indent(2, Text_PrettyPrint_Prettyprinter_Doc_vsep(Data_List_catMaybes({a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('unreviewed:')}, a2: {a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_indent(2, Text_PrettyPrint_Prettyprinter_Doc_vsep(Data_List_catMaybes({a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_hsep({a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('open:'), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_color(3), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_Nat($2)), a2: {h: 0}}})}, a2: {a1: Prelude_Interfaces_x3cx26x3e(csegen_18(), $8, csegen_169()), 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_Interfaces_x3cx26x3e(csegen_18(), $6, 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}}}))), 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_Interfaces_x3cx26x3e(csegen_18(), $7, csegen_169()), 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_Interfaces_concat(csegen_62(), csegen_77(), {a1: '*review count (not PR count) of most recent ', a2: {a1: Data_Fin_show_Show_x28Finx20x24nx29(User_Reflect_reviewDetailsCount()), a2: {a1: ' PRs.', a2: {h: 0}}}}))), a2: {h: 0}}}}}}}}}});
2320
- }
2321
-
2322
- function User_Reflect_chart($0, $1, $2, $3, $4, $5, $6) {
2323
- return Text_PrettyPrint_Prettyprinter_Doc_indent(Prelude_Cast_cast_Cast_Nat_Int($6), Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29(Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29(User_replicatex27(2, $1, '\u{b7}'), User_replicatex27(1, $3, '\u{25e6}')), User_replicatex27(3, $2, '<')), Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('|'), Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29(User_replicatex27(3, $5, '>'), User_replicatex27(2, $4, '\u{b7}')))));
2324
- }
2325
-
2326
- const Util_n__4424_1177_startOver = __lazy(function () {
2309
+ const Util_n__4503_1237_startOver = __lazy(function () {
2327
2310
  return {a1: 0, a2: {h: 0}};
2328
2311
  });
2329
2312
 
2330
- function Util_n__4424_1178_guardSuccess($0) {
2313
+ function Util_n__4503_1238_guardSuccess($0) {
2331
2314
  switch($0.h) {
2332
2315
  case undefined: {
2333
2316
  switch($0.a1) {
@@ -2340,12 +2323,12 @@ function Util_n__4424_1178_guardSuccess($0) {
2340
2323
  }
2341
2324
  }
2342
2325
 
2343
- function Util_n__4424_1179_go($0, $1) {
2326
+ function Util_n__4503_1239_go($0, $1) {
2344
2327
  switch($0.a1) {
2345
2328
  case 0: {
2346
2329
  switch(Prelude_Types_isAlpha($1)) {
2347
2330
  case 1: return {a1: 1, a2: {a1: $1, a2: $0.a2}};
2348
- case 0: return Util_n__4424_1177_startOver();
2331
+ case 0: return Util_n__4503_1237_startOver();
2349
2332
  }
2350
2333
  }
2351
2334
  case 1: {
@@ -2354,7 +2337,7 @@ function Util_n__4424_1179_go($0, $1) {
2354
2337
  default: {
2355
2338
  switch(Prelude_Types_isAlpha($1)) {
2356
2339
  case 1: return {a1: 1, a2: {a1: $1, a2: $0.a2}};
2357
- case 0: return Util_n__4424_1177_startOver();
2340
+ case 0: return Util_n__4503_1237_startOver();
2358
2341
  }
2359
2342
  }
2360
2343
  }
@@ -2362,7 +2345,7 @@ function Util_n__4424_1179_go($0, $1) {
2362
2345
  case 2: {
2363
2346
  switch(Prelude_Types_isDigit($1)) {
2364
2347
  case 1: return {a1: 3, a2: {a1: $1, a2: $0.a2}};
2365
- case 0: return Util_n__4424_1177_startOver();
2348
+ case 0: return Util_n__4503_1237_startOver();
2366
2349
  }
2367
2350
  }
2368
2351
  case 3: {
@@ -2375,7 +2358,7 @@ function Util_n__4424_1179_go($0, $1) {
2375
2358
  }
2376
2359
  }
2377
2360
 
2378
- function Util_n__4311_1068_getMoreLines($0, $1, $2) {
2361
+ function Util_n__4390_1128_getMoreLines($0, $1, $2) {
2379
2362
  switch($2.h) {
2380
2363
  case 0: return $0.a1.a1.a2(undefined)(Prelude_Types_List_reverse($1));
2381
2364
  case undefined: {
@@ -2386,13 +2369,13 @@ function Util_n__4311_1068_getMoreLines($0, $1, $2) {
2386
2369
  case '': {
2387
2370
  switch(line) {
2388
2371
  case '': return $0.a1.a1.a2(undefined)(Prelude_Types_List_reverse($1.a2));
2389
- default: return Util_n__4311_1068_getMoreLines($0, {a1: line, a2: $1}, $2.a1());
2372
+ default: return Util_n__4390_1128_getMoreLines($0, {a1: line, a2: $1}, $2.a1());
2390
2373
  }
2391
2374
  }
2392
- default: return Util_n__4311_1068_getMoreLines($0, {a1: line, a2: $1}, $2.a1());
2375
+ default: return Util_n__4390_1128_getMoreLines($0, {a1: line, a2: $1}, $2.a1());
2393
2376
  }
2394
2377
  }
2395
- default: return Util_n__4311_1068_getMoreLines($0, {a1: line, a2: $1}, $2.a1());
2378
+ default: return Util_n__4390_1128_getMoreLines($0, {a1: line, a2: $1}, $2.a1());
2396
2379
  }
2397
2380
  };
2398
2381
  return $0.a1.a2(undefined)(undefined)(Prelude_Interfaces_x3cx24x3e($0.a1.a1.a1, $1c => Data_String_trim($1c), Prelude_IO_getLine($0)))($22);
@@ -2416,12 +2399,28 @@ function Util_renderString($0, $1) {
2416
2399
  return Text_PrettyPrint_Prettyprinter_Render_Terminal_renderString($3);
2417
2400
  }
2418
2401
 
2402
+ function Util_renderIO($0, $1, $2) {
2403
+ let $9;
2404
+ switch(Data_Config_rf__colors($0)) {
2405
+ case 1: {
2406
+ $9 = $2;
2407
+ break;
2408
+ }
2409
+ case 0: {
2410
+ $9 = Text_PrettyPrint_Prettyprinter_Doc_unAnnotate($2);
2411
+ break;
2412
+ }
2413
+ }
2414
+ const $7 = Text_PrettyPrint_Prettyprinter_Render_Terminal_putDoc($9);
2415
+ return $1.a2(undefined)($7);
2416
+ }
2417
+
2419
2418
  function Util_parseJiraPrefix($0) {
2420
- return Prelude_Types_map_Functor_Maybe($3 => Prelude_Types_fastPack(Prelude_Types_List_reverse($3)), Util_n__4424_1178_guardSuccess(Prelude_Types_foldl_Foldable_List($d => $e => Util_n__4424_1179_go($d, $e), Util_n__4424_1177_startOver(), Prelude_Types_fastUnpack($0))));
2419
+ return Prelude_Types_map_Functor_Maybe($3 => Prelude_Types_fastPack(Prelude_Types_List_reverse($3)), Util_n__4503_1238_guardSuccess(Prelude_Types_foldl_Foldable_List($d => $e => Util_n__4503_1239_go($d, $e), Util_n__4503_1237_startOver(), Prelude_Types_fastUnpack($0))));
2421
2420
  }
2422
2421
 
2423
2422
  function Util_getManyLines($0, $1) {
2424
- return Util_n__4311_1068_getMoreLines($0, {h: 0}, $1);
2423
+ return Util_n__4390_1128_getMoreLines($0, {h: 0}, $1);
2425
2424
  }
2426
2425
 
2427
2426
  function Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4235_5087_writeOutput($0, $1, $2, $3) {
@@ -2435,7 +2434,7 @@ function Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4235_5084_push($0, $1
2435
2434
  function Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4235_5086_pop($0, $1, $2) {
2436
2435
  const $9 = $a => {
2437
2436
  switch($a.h) {
2438
- case undefined: return Prelude_Interfaces_x3ex3e(csegen_193(), $10 => ($1.value=$a.a2), () => $16 => ({a1: $a.a1}));
2437
+ case undefined: return Prelude_Interfaces_x3ex3e(csegen_159(), $10 => ($1.value=$a.a2), () => $16 => ({a1: $a.a1}));
2439
2438
  case 0: return $18 => ({h: 0});
2440
2439
  }
2441
2440
  };
@@ -2455,16 +2454,16 @@ function Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4235_5085_peek($0, $1
2455
2454
  function Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4235_5088_go($0, $1, $2, $3) {
2456
2455
  switch($3.h) {
2457
2456
  case 0: return $5 => (undefined);
2458
- case 1: return Prelude_Interfaces_x3ex3e(csegen_193(), $a => Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4235_5087_writeOutput($0, $2, Data_String_singleton($3.a1), $a), () => Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4235_5088_go($0, $1, $2, $3.a2()));
2459
- case 2: return Prelude_Interfaces_x3ex3e(csegen_193(), $1d => Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4235_5087_writeOutput($0, $2, $3.a2, $1d), () => Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4235_5088_go($0, $1, $2, $3.a3()));
2460
- case 3: return Prelude_Interfaces_x3ex3e(csegen_193(), $2e => Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4235_5087_writeOutput($0, $2, (Data_String_singleton('\n')+Text_PrettyPrint_Prettyprinter_Doc_textSpaces($3.a1)), $2e), () => Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4235_5088_go($0, $1, $2, $3.a2));
2457
+ case 1: return Prelude_Interfaces_x3ex3e(csegen_159(), $a => Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4235_5087_writeOutput($0, $2, Data_String_singleton($3.a1), $a), () => Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4235_5088_go($0, $1, $2, $3.a2()));
2458
+ case 2: return Prelude_Interfaces_x3ex3e(csegen_159(), $1d => Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4235_5087_writeOutput($0, $2, $3.a2, $1d), () => Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4235_5088_go($0, $1, $2, $3.a3()));
2459
+ case 3: return Prelude_Interfaces_x3ex3e(csegen_159(), $2e => Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4235_5087_writeOutput($0, $2, (Data_String_singleton('\n')+Text_PrettyPrint_Prettyprinter_Doc_textSpaces($3.a1)), $2e), () => Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4235_5088_go($0, $1, $2, $3.a2));
2461
2460
  case 4: {
2462
2461
  return $40 => {
2463
2462
  const $48 = $49 => {
2464
2463
  switch($49.h) {
2465
2464
  case undefined: {
2466
2465
  const $4b = Prelude_Types_List_tailRecAppend($3.a1, $49.a1);
2467
- return Prelude_Interfaces_x3ex3e(csegen_193(), $53 => Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4235_5084_push($0, $1, $4b, $53), () => Prelude_Interfaces_x3ex3e(csegen_193(), $5e => Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4235_5087_writeOutput($0, $2, Control_ANSI_SGR_escapeSGR($4b), $5e), () => Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4235_5088_go($0, $1, $2, $3.a2)));
2466
+ return Prelude_Interfaces_x3ex3e(csegen_159(), $53 => Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4235_5084_push($0, $1, $4b, $53), () => Prelude_Interfaces_x3ex3e(csegen_159(), $5e => Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4235_5087_writeOutput($0, $2, Control_ANSI_SGR_escapeSGR($4b), $5e), () => Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4235_5088_go($0, $1, $2, $3.a2)));
2468
2467
  }
2469
2468
  case 0: return $6c => ($1.value={h: 0});
2470
2469
  }
@@ -2477,7 +2476,7 @@ function Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4235_5088_go($0, $1,
2477
2476
  const $7a = _ => $7b => {
2478
2477
  const $83 = $84 => {
2479
2478
  switch($84.h) {
2480
- case undefined: return Prelude_Interfaces_x3ex3e(csegen_193(), $8a => Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4235_5087_writeOutput($0, $2, Control_ANSI_SGR_escapeSGR({a1: {h: 0}, a2: $84.a1}), $8a), () => Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4235_5088_go($0, $1, $2, $3.a1));
2479
+ case undefined: return Prelude_Interfaces_x3ex3e(csegen_159(), $8a => Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4235_5087_writeOutput($0, $2, Control_ANSI_SGR_escapeSGR({a1: {h: 0}, a2: $84.a1}), $8a), () => Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4235_5088_go($0, $1, $2, $3.a1));
2481
2480
  case 0: return $9a => ($1.value={h: 0});
2482
2481
  }
2483
2482
  };
@@ -2494,7 +2493,7 @@ const Text_PrettyPrint_Prettyprinter_Render_Terminal_underline = __lazy(function
2494
2493
  });
2495
2494
 
2496
2495
  function Text_PrettyPrint_Prettyprinter_Render_Terminal_renderString($0) {
2497
- return Data_Maybe_fromMaybe(() => '<internal pretty printing error>', Control_Monad_ST_runST($6 => $7 => Control_Monad_ST_x3ex3ex3d_Monad_x28STx20x24sx29($a => Control_Monad_ST_newSTRef({a1: {h: 0}, a2: {h: 0}}, $a), styleStackRef => $11 => Control_Monad_ST_x3ex3ex3d_Monad_x28STx20x24sx29($14 => Control_Monad_ST_newSTRef('', $14), outputRef => Prelude_Interfaces_x3ex3e(csegen_193(), Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4235_5088_go($0, styleStackRef, outputRef, $0), () => $23 => {
2496
+ return Data_Maybe_fromMaybe(() => '<internal pretty printing error>', Control_Monad_ST_runST($6 => $7 => Control_Monad_ST_x3ex3ex3d_Monad_x28STx20x24sx29($a => Control_Monad_ST_newSTRef({a1: {h: 0}, a2: {h: 0}}, $a), styleStackRef => $11 => Control_Monad_ST_x3ex3ex3d_Monad_x28STx20x24sx29($14 => Control_Monad_ST_newSTRef('', $14), outputRef => Prelude_Interfaces_x3ex3e(csegen_159(), Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4235_5088_go($0, styleStackRef, outputRef, $0), () => $23 => {
2498
2497
  const $2a = $2b => {
2499
2498
  switch($2b.h) {
2500
2499
  case 0: return $2d => ({h: 0});
@@ -2738,7 +2737,7 @@ function Text_PrettyPrint_Prettyprinter_Doc_hsep($0) {
2738
2737
  }
2739
2738
 
2740
2739
  function Text_PrettyPrint_Prettyprinter_Doc_hcat($0) {
2741
- return Text_PrettyPrint_Prettyprinter_Doc_concatWith(csegen_206(), $0);
2740
+ return Text_PrettyPrint_Prettyprinter_Doc_concatWith(csegen_172(), $0);
2742
2741
  }
2743
2742
 
2744
2743
  function Text_PrettyPrint_Prettyprinter_Doc_hang($0, $1) {
@@ -2783,10 +2782,10 @@ function Text_PrettyPrint_Prettyprinter_Doc_encloseSep($0, $1, $2, $3) {
2783
2782
  case undefined: {
2784
2783
  switch($3.a2.h) {
2785
2784
  case 0: return Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29(Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29($0, $3.a1), $1);
2786
- default: return Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29(Text_PrettyPrint_Prettyprinter_Doc_cat(Data_List_zipWith_Zippable_List(csegen_206(), {a1: $0, a2: Data_List_replicate(Prelude_Types_prim__integerToNat((Prelude_Types_List_lengthTR($3)-1n)), $2)}, $3)), $1);
2785
+ default: return Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29(Text_PrettyPrint_Prettyprinter_Doc_cat(Data_List_zipWith_Zippable_List(csegen_172(), {a1: $0, a2: Data_List_replicate(Prelude_Types_prim__integerToNat((Prelude_Types_List_lengthTR($3)-1n)), $2)}, $3)), $1);
2787
2786
  }
2788
2787
  }
2789
- default: return Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29(Text_PrettyPrint_Prettyprinter_Doc_cat(Data_List_zipWith_Zippable_List(csegen_206(), {a1: $0, a2: Data_List_replicate(Prelude_Types_prim__integerToNat((Prelude_Types_List_lengthTR($3)-1n)), $2)}, $3)), $1);
2788
+ default: return Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29(Text_PrettyPrint_Prettyprinter_Doc_cat(Data_List_zipWith_Zippable_List(csegen_172(), {a1: $0, a2: Data_List_replicate(Prelude_Types_prim__integerToNat((Prelude_Types_List_lengthTR($3)-1n)), $2)}, $3)), $1);
2790
2789
  }
2791
2790
  }
2792
2791
 
@@ -3013,11 +3012,11 @@ function Data_String_lines($0) {
3013
3012
  }
3014
3013
 
3015
3014
  function Data_String_isSuffixOf($0, $1) {
3016
- return Data_List_isSuffixOf(csegen_210(), Prelude_Types_fastUnpack($0), Prelude_Types_fastUnpack($1));
3015
+ return Data_List_isSuffixOf(csegen_176(), Prelude_Types_fastUnpack($0), Prelude_Types_fastUnpack($1));
3017
3016
  }
3018
3017
 
3019
3018
  function Data_String_isPrefixOf($0, $1) {
3020
- return Data_List_isPrefixOf(csegen_210(), Prelude_Types_fastUnpack($0), Prelude_Types_fastUnpack($1));
3019
+ return Data_List_isPrefixOf(csegen_176(), Prelude_Types_fastUnpack($0), Prelude_Types_fastUnpack($1));
3021
3020
  }
3022
3021
 
3023
3022
  function Data_String_indent($0, $1) {
@@ -3122,7 +3121,7 @@ function Prelude_Types_n__9361_8543_hexChars($0) {
3122
3121
  function Prelude_Types_traverse_Traversable_List($0, $1, $2) {
3123
3122
  switch($2.h) {
3124
3123
  case 0: return $0.a2(undefined)({h: 0});
3125
- case undefined: return $0.a3(undefined)(undefined)($0.a3(undefined)(undefined)($0.a2(undefined)(csegen_226()))($1($2.a1)))(Prelude_Types_traverse_Traversable_List($0, $1, $2.a2));
3124
+ case undefined: return $0.a3(undefined)(undefined)($0.a3(undefined)(undefined)($0.a2(undefined)(csegen_192()))($1($2.a1)))(Prelude_Types_traverse_Traversable_List($0, $1, $2.a2));
3126
3125
  }
3127
3126
  }
3128
3127
 
@@ -3134,11 +3133,11 @@ function Prelude_Types_traverse_Traversable_x28Eitherx20x24ex29($0, $1, $2) {
3134
3133
  }
3135
3134
 
3136
3135
  function Prelude_Types_toList_Foldable_Maybe($0) {
3137
- return Prelude_Types_foldr_Foldable_Maybe(csegen_226(), {h: 0}, $0);
3136
+ return Prelude_Types_foldr_Foldable_Maybe(csegen_192(), {h: 0}, $0);
3138
3137
  }
3139
3138
 
3140
3139
  function Prelude_Types_toList_Foldable_x28Eitherx20x24ex29($0) {
3141
- return Prelude_Types_foldr_Foldable_x28Eitherx20x24ex29(csegen_226(), {h: 0}, $0);
3140
+ return Prelude_Types_foldr_Foldable_x28Eitherx20x24ex29(csegen_192(), {h: 0}, $0);
3142
3141
  }
3143
3142
 
3144
3143
  function Prelude_Types_rangeFromTo_Range_x24a($0, $1, $2) {
@@ -3257,7 +3256,7 @@ function Prelude_Types_foldr_Foldable_x28Eitherx20x24ex29($0, $1, $2) {
3257
3256
  }
3258
3257
 
3259
3258
  function Prelude_Types_foldl_Foldable_x28Eitherx20x24ex29($0, $1, $2) {
3260
- return Prelude_Types_foldr_Foldable_x28Eitherx20x24ex29($6 => $7 => Prelude_Basics_flip(csegen_227(), $c => Prelude_Basics_flip($0, $6, $c), $7), $13 => $13, $2)($1);
3259
+ return Prelude_Types_foldr_Foldable_x28Eitherx20x24ex29($6 => $7 => Prelude_Basics_flip(csegen_193(), $c => Prelude_Basics_flip($0, $6, $c), $7), $13 => $13, $2)($1);
3261
3260
  }
3262
3261
 
3263
3262
  function Prelude_Types_foldlM_Foldable_List($0, $1, $2, $3) {
@@ -3466,7 +3465,7 @@ function Prelude_Types_isLower($0) {
3466
3465
  }
3467
3466
 
3468
3467
  function Prelude_Types_isHexDigit($0) {
3469
- return Prelude_Types_elem(csegen_77(), csegen_210(), Prelude_Types_toUpper($0), Prelude_Types_n__9361_8543_hexChars($0));
3468
+ return Prelude_Types_elem(csegen_77(), csegen_176(), Prelude_Types_toUpper($0), Prelude_Types_n__9361_8543_hexChars($0));
3470
3469
  }
3471
3470
 
3472
3471
  function Prelude_Types_isDigit($0) {
@@ -3890,10 +3889,6 @@ function Prelude_Interfaces_when($0, $1, $2) {
3890
3889
  }
3891
3890
  }
3892
3891
 
3893
- function Prelude_Interfaces_traverse_($0, $1, $2, $3) {
3894
- return $1.a1(undefined)(undefined)($d => $e => Prelude_Interfaces_x2ax3e($0, $2($d), $e))($0.a2(undefined)(undefined))($3);
3895
- }
3896
-
3897
3892
  function Prelude_Interfaces_mapHom($0, $1, $2) {
3898
3893
  return $0.a1(undefined)(undefined)(undefined)(undefined)($1)($1)($2);
3899
3894
  }
@@ -4770,7 +4765,7 @@ function Control_ANSI_SGR_cast_Cast_Blink_String($0) {
4770
4765
  }
4771
4766
 
4772
4767
  function Control_ANSI_SGR_escapeSGR($0) {
4773
- return ('\u{1b}['+(Prelude_Interfaces_concat(csegen_62(), csegen_77(), Data_List_intersperse(';', Prelude_Interfaces_x3cx24x3e(csegen_119(), $11 => Control_ANSI_SGR_n__3202_2726_toCode($0, $11), $0)))+'m'));
4768
+ return ('\u{1b}['+(Prelude_Interfaces_concat(csegen_62(), csegen_77(), Data_List_intersperse(';', Prelude_Interfaces_x3cx24x3e(csegen_118(), $11 => Control_ANSI_SGR_n__3202_2726_toCode($0, $11), $0)))+'m'));
4774
4769
  }
4775
4770
 
4776
4771
  const Text_PrettyPrint_Prettyprinter_Symbols_rparen = __lazy(function () {
@@ -4799,18 +4794,24 @@ const Data_Fuel_forever = __lazy(function () {
4799
4794
  return {a1: () => Data_Fuel_forever()};
4800
4795
  });
4801
4796
 
4802
- function Data_Config_n__5186_7922_parseConfigJson($0, $1) {
4797
+ function Data_Config_n__5095_7865_personalAccessToken($0) {
4798
+ return Prelude_Types_maybe(() => 'Not set (will use $GITHUB_PAT environment variable)', () => $4 => Data_Config_show_Show_x28Hiddenx20x24ax29($4), $0.a10);
4799
+ }
4800
+
4801
+ function Data_Config_n__5476_8233_parseConfigJson($0, $1) {
4803
4802
  switch($1.h) {
4804
4803
  case 5: {
4805
4804
  const $18 = $19 => {
4806
- const $26 = $27 => $28 => $29 => $2a => {
4807
- switch($2a.h) {
4808
- case 0: return {h: 0, a1: $2a.a1};
4809
- case 1: return {h: 1, a1: $29($2a.a1)};
4805
+ const $23 = Data_List_lookup(csegen_94(), 'defaultRemote', $1.a1);
4806
+ const $29 = Data_List_lookup(csegen_94(), 'githubPAT', $1.a1);
4807
+ const $32 = $33 => $34 => $35 => $36 => {
4808
+ switch($36.h) {
4809
+ case 0: return {h: 0, a1: $36.a1};
4810
+ case 1: return {h: 1, a1: $35($36.a1)};
4810
4811
  }
4811
4812
  };
4812
- const $24 = Prelude_Interfaces_x3cx24x3e($26, $31 => Prelude_Cast_cast_Cast_Integer_Bits32($31), Language_JSON_Accessors_integer($19.a1));
4813
- return Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29($24, ua => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_string($19.a2.a1), o => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_string($19.a2.a2.a1), r => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_string($19.a2.a2.a2.a1), mb => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_bool($19.a2.a2.a2.a2.a1), at => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_bool($19.a2.a2.a2.a2.a2.a1), ca => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_array($55 => Language_JSON_Accessors_string($55), $19.a2.a2.a2.a2.a2.a2.a1), ts => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_array($5e => Language_JSON_Accessors_string($5e), $19.a2.a2.a2.a2.a2.a2.a2.a1), om => ({h: 1, a1: {a1: ua, a2: o, a3: r, a4: mb, a5: at, a6: ca, a7: ts, a8: om, a9: $0}})))))))));
4813
+ const $30 = Prelude_Interfaces_x3cx24x3e($32, $3d => Prelude_Cast_cast_Cast_Integer_Bits32($3d), Language_JSON_Accessors_integer($19.a1));
4814
+ return Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29($30, ua => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_string($19.a2.a1), o => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_string($19.a2.a2.a1), r => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Prelude_Types_maybe(() => ({h: 1, a1: {h: 0}}), () => csegen_241(), $23), dr => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_string($19.a2.a2.a2.a1), mb => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_bool($19.a2.a2.a2.a2.a1), at => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_bool($19.a2.a2.a2.a2.a2.a1), ca => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_array($6a => Language_JSON_Accessors_string($6a), $19.a2.a2.a2.a2.a2.a2.a1), ts => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_array($73 => Language_JSON_Accessors_string($73), $19.a2.a2.a2.a2.a2.a2.a2.a1), om => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Prelude_Types_maybe(() => ({h: 1, a1: {h: 0}}), () => csegen_241(), $29), gp => ({h: 1, a1: {a1: ua, a2: o, a3: r, a4: dr, a5: mb, a6: at, a7: ca, a8: ts, a9: om, a10: Prelude_Types_map_Functor_Maybe($8e => $8e, gp), a11: $0}})))))))))));
4814
4815
  };
4815
4816
  return Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_lookupAll({a1: 'updatedAt', a2: {a1: 'org', a2: {a1: 'repo', a2: {a1: 'mainBranch', a2: {a1: 'assignTeams', a2: {a1: 'commentOnAssign', a2: {a1: 'teamSlugs', a2: {a1: 'orgMembers', a2: {h: 0}}}}}}}}}, $1.a1), $18);
4816
4817
  }
@@ -4819,8 +4820,16 @@ function Data_Config_n__5186_7922_parseConfigJson($0, $1) {
4819
4820
  }
4820
4821
  }
4821
4822
 
4823
+ function Data_Config_n__5095_7864_defaultRemote($0) {
4824
+ return Prelude_Types_maybe(() => 'Not set (defaults to \"origin\")', () => $4 => Prelude_Show_show_Show_String($4), $0.a4);
4825
+ }
4826
+
4822
4827
  function Data_Config_show_Show_Config($0) {
4823
- return Data_String_fastUnlines({a1: Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: ' updatedAt: ', a2: {a1: Prelude_Show_show_Show_Bits32($0.a1), a2: {h: 0}}}), a2: {a1: Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: ' org: ', a2: {a1: Prelude_Show_show_Show_String($0.a2), a2: {h: 0}}}), a2: {a1: Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: ' repo: ', a2: {a1: Prelude_Show_show_Show_String($0.a3), a2: {h: 0}}}), a2: {a1: Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: ' mainBranch: ', a2: {a1: Prelude_Show_show_Show_String($0.a4), a2: {h: 0}}}), a2: {a1: Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: ' assignTeams: ', a2: {a1: Prelude_Show_show_Show_Bool($0.a5), a2: {h: 0}}}), a2: {a1: Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'commentOnAssign: ', a2: {a1: Prelude_Show_show_Show_Bool($0.a6), a2: {h: 0}}}), a2: {a1: Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: ' teamSlugs: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_115(), $0.a7), a2: {h: 0}}}), a2: {a1: Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: ' orgMembers: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_115(), $0.a8), a2: {h: 0}}}), a2: {h: 0}}}}}}}}});
4828
+ return Data_String_fastUnlines({a1: Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: ' updatedAt: ', a2: {a1: Prelude_Show_show_Show_Bits32($0.a1), a2: {h: 0}}}), a2: {a1: Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: ' org: ', a2: {a1: Prelude_Show_show_Show_String($0.a2), a2: {h: 0}}}), a2: {a1: Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: ' repo: ', a2: {a1: Prelude_Show_show_Show_String($0.a3), a2: {h: 0}}}), a2: {a1: Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: ' defaultRemote: ', a2: {a1: Data_Config_n__5095_7864_defaultRemote($0), a2: {h: 0}}}), a2: {a1: Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: ' mainBranch: ', a2: {a1: Prelude_Show_show_Show_String($0.a5), a2: {h: 0}}}), a2: {a1: Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: ' assignTeams: ', a2: {a1: Prelude_Show_show_Show_Bool($0.a6), a2: {h: 0}}}), a2: {a1: Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'commentOnAssign: ', a2: {a1: Prelude_Show_show_Show_Bool($0.a7), a2: {h: 0}}}), a2: {a1: Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: ' teamSlugs: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_114(), $0.a8), a2: {h: 0}}}), a2: {a1: Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: ' orgMembers: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_114(), $0.a9), a2: {h: 0}}}), a2: {a1: Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: ' githubPAT: ', a2: {a1: Data_Config_n__5095_7865_personalAccessToken($0), a2: {h: 0}}}), a2: {h: 0}}}}}}}}}}});
4829
+ }
4830
+
4831
+ function Data_Config_show_Show_x28Hiddenx20x24ax29($0) {
4832
+ return 'xxxxxxxx (hidden)';
4824
4833
  }
4825
4834
 
4826
4835
  function Data_Config_showPrec_Show_Config($0, $1) {
@@ -4828,19 +4837,19 @@ function Data_Config_showPrec_Show_Config($0, $1) {
4828
4837
  }
4829
4838
 
4830
4839
  function Data_Config_rf__filepath($0) {
4831
- return $0.a9.a1;
4840
+ return $0.a11.a1;
4832
4841
  }
4833
4842
 
4834
4843
  function Data_Config_rf__editor($0) {
4835
- return $0.a9.a3;
4844
+ return $0.a11.a3;
4836
4845
  }
4837
4846
 
4838
4847
  function Data_Config_rf__colors($0) {
4839
- return $0.a9.a2;
4848
+ return $0.a11.a2;
4840
4849
  }
4841
4850
 
4842
4851
  const Data_Config_settableProps = __lazy(function () {
4843
- return {a1: 'assignTeams', a2: {a1: 'commentOnAssign', a2: {h: 0}}};
4852
+ return {a1: 'assignTeams', a2: {a1: 'commentOnAssign', a2: {a1: 'defaultRemote', a2: {a1: 'githubPAT', a2: {h: 0}}}}};
4844
4853
  });
4845
4854
 
4846
4855
  function Data_Config_parseConfig($0, $1) {
@@ -4862,12 +4871,12 @@ function Data_Config_parseConfig($0, $1) {
4862
4871
  }
4863
4872
  };
4864
4873
  const $4 = {a1: $5, a2: a => $d => ({h: 1, a1: $d}), a3: $f};
4865
- const $3 = {a1: $4, a2: csegen_278(), a3: csegen_279()};
4866
- return Prelude_Interfaces_x3ex3dx3e($3, csegen_280(), $20 => Data_Config_n__5186_7922_parseConfigJson($0, $20), $1);
4874
+ const $3 = {a1: $4, a2: csegen_247(), a3: csegen_248()};
4875
+ return Prelude_Interfaces_x3ex3dx3e($3, csegen_249(), $20 => Data_Config_n__5476_8233_parseConfigJson($0, $20), $1);
4867
4876
  }
4868
4877
 
4869
4878
  function Data_Config_json($0) {
4870
- return {h: 5, a1: {a1: {a1: 'mainBranch', a2: {h: 3, a1: $0.a4}}, a2: {a1: {a1: 'assignTeams', a2: {h: 1, a1: $0.a5}}, a2: {a1: {a1: 'commentOnAssign', a2: {h: 1, a1: $0.a6}}, a2: {a1: {a1: 'org', a2: {h: 3, a1: $0.a2}}, a2: {a1: {a1: 'orgMembers', a2: {h: 4, a1: Prelude_Interfaces_x3cx24x3e(csegen_119(), $1f => ({h: 3, a1: $1f}), Data_List_sort(csegen_111(), $0.a8))}}, a2: {a1: {a1: 'repo', a2: {h: 3, a1: $0.a3}}, a2: {a1: {a1: 'teamSlugs', a2: {h: 4, a1: Prelude_Interfaces_x3cx24x3e(csegen_119(), $34 => ({h: 3, a1: $34}), Data_List_sort(csegen_111(), $0.a7))}}, a2: {a1: {a1: 'updatedAt', a2: {h: 2, a1: Prelude_Cast_cast_Cast_Bits32_Double($0.a1)}}, a2: {h: 0}}}}}}}}}};
4879
+ return {h: 5, a1: {a1: {a1: 'assignTeams', a2: {h: 1, a1: $0.a6}}, a2: {a1: {a1: 'commentOnAssign', a2: {h: 1, a1: $0.a7}}, a2: {a1: {a1: 'org', a2: {h: 3, a1: $0.a2}}, a2: {a1: {a1: 'repo', a2: {h: 3, a1: $0.a3}}, a2: {a1: {a1: 'defaultRemote', a2: Prelude_Types_maybe(() => ({h: 0}), () => $1d => ({h: 3, a1: $1d}), $0.a4)}, a2: {a1: {a1: 'mainBranch', a2: {h: 3, a1: $0.a5}}, a2: {a1: {a1: 'orgMembers', a2: {h: 4, a1: Prelude_Interfaces_x3cx24x3e(csegen_118(), $2e => ({h: 3, a1: $2e}), Data_List_sort(csegen_110(), $0.a9))}}, a2: {a1: {a1: 'teamSlugs', a2: {h: 4, a1: Prelude_Interfaces_x3cx24x3e(csegen_118(), $3e => ({h: 3, a1: $3e}), Data_List_sort(csegen_110(), $0.a8))}}, a2: {a1: {a1: 'githubPAT', a2: Prelude_Types_maybe(() => ({h: 0}), () => $4c => ({h: 3, a1: $4c}), $0.a10)}, a2: {a1: {a1: 'updatedAt', a2: {h: 2, a1: Prelude_Cast_cast_Cast_Bits32_Double($0.a1)}}, a2: {h: 0}}}}}}}}}}}};
4871
4880
  }
4872
4881
 
4873
4882
  const Data_Config_filename = __lazy(function () {
@@ -4885,6 +4894,21 @@ function Language_JSON_Accessors_string($0) {
4885
4894
  }
4886
4895
  }
4887
4896
 
4897
+ function Language_JSON_Accessors_optional($0, $1) {
4898
+ switch($1.h) {
4899
+ case 0: return {h: 1, a1: {h: 0}};
4900
+ default: {
4901
+ const $5 = $6 => $7 => $8 => $9 => {
4902
+ switch($9.h) {
4903
+ case 0: return {h: 0, a1: $9.a1};
4904
+ case 1: return {h: 1, a1: $8($9.a1)};
4905
+ }
4906
+ };
4907
+ return Prelude_Interfaces_x3cx24x3e($5, $10 => ({a1: $10}), $0($1));
4908
+ }
4909
+ }
4910
+ }
4911
+
4888
4912
  function Language_JSON_Accessors_object($0) {
4889
4913
  switch($0.h) {
4890
4914
  case 5: return {h: 1, a1: $0.a1};
@@ -4991,17 +5015,17 @@ function Text_Bounded_mergeBounds($0, $1) {
4991
5015
  switch($1.h) {
4992
5016
  case undefined: {
4993
5017
  switch($1.a2) {
4994
- case 1: return Prelude_Interfaces_x3cx24x3e(csegen_283(), $e => $1.a1, $0);
5018
+ case 1: return Prelude_Interfaces_x3cx24x3e(csegen_252(), $e => $1.a1, $0);
4995
5019
  default: {
4996
- const $10 = Prelude_EqOrd_min_Ord_x28x7cx28x28Builtinx2ePairx20x24ax29x20x24bx29x2cx28x28Builtinx2eMkPairx20x24ax29x20x24bx29x7cx29(csegen_294(), csegen_294(), Text_Bounded_start($0), Text_Bounded_start($1));
4997
- const $1c = Prelude_EqOrd_max_Ord_x28x7cx28x28Builtinx2ePairx20x24ax29x20x24bx29x2cx28x28Builtinx2eMkPairx20x24ax29x20x24bx29x7cx29(csegen_294(), csegen_294(), Text_Bounded_end($0), Text_Bounded_end($1));
5020
+ const $10 = Prelude_EqOrd_min_Ord_x28x7cx28x28Builtinx2ePairx20x24ax29x20x24bx29x2cx28x28Builtinx2eMkPairx20x24ax29x20x24bx29x7cx29(csegen_263(), csegen_263(), Text_Bounded_start($0), Text_Bounded_start($1));
5021
+ const $1c = Prelude_EqOrd_max_Ord_x28x7cx28x28Builtinx2ePairx20x24ax29x20x24bx29x2cx28x28Builtinx2eMkPairx20x24ax29x20x24bx29x7cx29(csegen_263(), csegen_263(), Text_Bounded_end($0), Text_Bounded_end($1));
4998
5022
  return {a1: $1.a1, a2: 0, a3: {a1: $10.a1, a2: $10.a2, a3: $1c.a1, a4: $1c.a2}};
4999
5023
  }
5000
5024
  }
5001
5025
  }
5002
5026
  default: {
5003
- const $30 = Prelude_EqOrd_min_Ord_x28x7cx28x28Builtinx2ePairx20x24ax29x20x24bx29x2cx28x28Builtinx2eMkPairx20x24ax29x20x24bx29x7cx29(csegen_294(), csegen_294(), Text_Bounded_start($0), Text_Bounded_start($1));
5004
- const $3c = Prelude_EqOrd_max_Ord_x28x7cx28x28Builtinx2ePairx20x24ax29x20x24bx29x2cx28x28Builtinx2eMkPairx20x24ax29x20x24bx29x7cx29(csegen_294(), csegen_294(), Text_Bounded_end($0), Text_Bounded_end($1));
5027
+ const $30 = Prelude_EqOrd_min_Ord_x28x7cx28x28Builtinx2ePairx20x24ax29x20x24bx29x2cx28x28Builtinx2eMkPairx20x24ax29x20x24bx29x7cx29(csegen_263(), csegen_263(), Text_Bounded_start($0), Text_Bounded_start($1));
5028
+ const $3c = Prelude_EqOrd_max_Ord_x28x7cx28x28Builtinx2ePairx20x24ax29x20x24bx29x2cx28x28Builtinx2eMkPairx20x24ax29x20x24bx29x7cx29(csegen_263(), csegen_263(), Text_Bounded_end($0), Text_Bounded_end($1));
5005
5029
  return {a1: $1.a1, a2: 0, a3: {a1: $30.a1, a2: $30.a2, a3: $3c.a1, a4: $3c.a2}};
5006
5030
  }
5007
5031
  }
@@ -5012,17 +5036,17 @@ function Text_Bounded_mergeBounds($0, $1) {
5012
5036
  switch($1.h) {
5013
5037
  case undefined: {
5014
5038
  switch($1.a2) {
5015
- case 1: return Prelude_Interfaces_x3cx24x3e(csegen_283(), $56 => $1.a1, $0);
5039
+ case 1: return Prelude_Interfaces_x3cx24x3e(csegen_252(), $56 => $1.a1, $0);
5016
5040
  default: {
5017
- const $58 = Prelude_EqOrd_min_Ord_x28x7cx28x28Builtinx2ePairx20x24ax29x20x24bx29x2cx28x28Builtinx2eMkPairx20x24ax29x20x24bx29x7cx29(csegen_294(), csegen_294(), Text_Bounded_start($0), Text_Bounded_start($1));
5018
- const $64 = Prelude_EqOrd_max_Ord_x28x7cx28x28Builtinx2ePairx20x24ax29x20x24bx29x2cx28x28Builtinx2eMkPairx20x24ax29x20x24bx29x7cx29(csegen_294(), csegen_294(), Text_Bounded_end($0), Text_Bounded_end($1));
5041
+ const $58 = Prelude_EqOrd_min_Ord_x28x7cx28x28Builtinx2ePairx20x24ax29x20x24bx29x2cx28x28Builtinx2eMkPairx20x24ax29x20x24bx29x7cx29(csegen_263(), csegen_263(), Text_Bounded_start($0), Text_Bounded_start($1));
5042
+ const $64 = Prelude_EqOrd_max_Ord_x28x7cx28x28Builtinx2ePairx20x24ax29x20x24bx29x2cx28x28Builtinx2eMkPairx20x24ax29x20x24bx29x7cx29(csegen_263(), csegen_263(), Text_Bounded_end($0), Text_Bounded_end($1));
5019
5043
  return {a1: $1.a1, a2: 0, a3: {a1: $58.a1, a2: $58.a2, a3: $64.a1, a4: $64.a2}};
5020
5044
  }
5021
5045
  }
5022
5046
  }
5023
5047
  default: {
5024
- const $78 = Prelude_EqOrd_min_Ord_x28x7cx28x28Builtinx2ePairx20x24ax29x20x24bx29x2cx28x28Builtinx2eMkPairx20x24ax29x20x24bx29x7cx29(csegen_294(), csegen_294(), Text_Bounded_start($0), Text_Bounded_start($1));
5025
- const $84 = Prelude_EqOrd_max_Ord_x28x7cx28x28Builtinx2ePairx20x24ax29x20x24bx29x2cx28x28Builtinx2eMkPairx20x24ax29x20x24bx29x7cx29(csegen_294(), csegen_294(), Text_Bounded_end($0), Text_Bounded_end($1));
5048
+ const $78 = Prelude_EqOrd_min_Ord_x28x7cx28x28Builtinx2ePairx20x24ax29x20x24bx29x2cx28x28Builtinx2eMkPairx20x24ax29x20x24bx29x7cx29(csegen_263(), csegen_263(), Text_Bounded_start($0), Text_Bounded_start($1));
5049
+ const $84 = Prelude_EqOrd_max_Ord_x28x7cx28x28Builtinx2ePairx20x24ax29x20x24bx29x2cx28x28Builtinx2eMkPairx20x24ax29x20x24bx29x7cx29(csegen_263(), csegen_263(), Text_Bounded_end($0), Text_Bounded_end($1));
5026
5050
  return {a1: $1.a1, a2: 0, a3: {a1: $78.a1, a2: $78.a2, a3: $84.a1, a4: $84.a2}};
5027
5051
  }
5028
5052
  }
@@ -5241,7 +5265,7 @@ const Language_JSON_Parser_string = __lazy(function () {
5241
5265
  });
5242
5266
 
5243
5267
  const Language_JSON_Parser_rawString = __lazy(function () {
5244
- return {h: 8, a1: 0, a2: Text_Parser_match(csegen_302(), csegen_305(), {h: 2}), a3: () => mstr => {
5268
+ return {h: 8, a1: 0, a2: Text_Parser_match(csegen_271(), csegen_274(), {h: 2}), a3: () => mstr => {
5245
5269
  switch(mstr.h) {
5246
5270
  case undefined: return {h: 0, a1: mstr.a1};
5247
5271
  case 0: return {h: 4, a1: {h: 0}, a2: 0, a3: 'invalid string'};
@@ -5250,7 +5274,7 @@ const Language_JSON_Parser_rawString = __lazy(function () {
5250
5274
  });
5251
5275
 
5252
5276
  function Language_JSON_Parser_punct($0) {
5253
- return Text_Parser_match(csegen_302(), csegen_305(), {h: 4, a1: $0});
5277
+ return Text_Parser_match(csegen_271(), csegen_274(), {h: 4, a1: $0});
5254
5278
  }
5255
5279
 
5256
5280
  function Language_JSON_Parser_parseJSON($0) {
@@ -5283,11 +5307,11 @@ const Language_JSON_Parser_object = __lazy(function () {
5283
5307
  });
5284
5308
 
5285
5309
  const Language_JSON_Parser_number = __lazy(function () {
5286
- return Text_Parser_Core_map_Functor_x28x28x28Grammarx20x24statex29x20x24tokx29x20x24cx29(1, $3 => ({h: 2, a1: $3}), Text_Parser_match(csegen_302(), csegen_305(), {h: 1}));
5310
+ return Text_Parser_Core_map_Functor_x28x28x28Grammarx20x24statex29x20x24tokx29x20x24cx29(1, $3 => ({h: 2, a1: $3}), Text_Parser_match(csegen_271(), csegen_274(), {h: 1}));
5287
5311
  });
5288
5312
 
5289
5313
  const Language_JSON_Parser_null = __lazy(function () {
5290
- return Text_Parser_Core_map_Functor_x28x28x28Grammarx20x24statex29x20x24tokx29x20x24cx29(1, $3 => ({h: 0}), Text_Parser_match(csegen_302(), csegen_305(), {h: 3}));
5314
+ return Text_Parser_Core_map_Functor_x28x28x28Grammarx20x24statex29x20x24tokx29x20x24cx29(1, $3 => ({h: 0}), Text_Parser_match(csegen_271(), csegen_274(), {h: 3}));
5291
5315
  });
5292
5316
 
5293
5317
  const Language_JSON_Parser_json = __lazy(function () {
@@ -5295,7 +5319,7 @@ const Language_JSON_Parser_json = __lazy(function () {
5295
5319
  });
5296
5320
 
5297
5321
  const Language_JSON_Parser_boolean = __lazy(function () {
5298
- return Text_Parser_Core_map_Functor_x28x28x28Grammarx20x24statex29x20x24tokx29x20x24cx29(1, $3 => ({h: 1, a1: $3}), Text_Parser_match(csegen_302(), csegen_305(), {h: 0}));
5322
+ return Text_Parser_Core_map_Functor_x28x28x28Grammarx20x24statex29x20x24tokx29x20x24cx29(1, $3 => ({h: 1, a1: $3}), Text_Parser_match(csegen_271(), csegen_274(), {h: 0}));
5299
5323
  });
5300
5324
 
5301
5325
  const Language_JSON_Parser_array = __lazy(function () {
@@ -5471,7 +5495,7 @@ function Text_Lexer_opt($0) {
5471
5495
  }
5472
5496
 
5473
5497
  function Text_Lexer_oneOf($0) {
5474
- return Text_Lexer_Core_pred(x => Prelude_Types_elem(csegen_77(), csegen_210(), x, Prelude_Types_fastUnpack($0)));
5498
+ return Text_Lexer_Core_pred(x => Prelude_Types_elem(csegen_77(), csegen_176(), x, Prelude_Types_fastUnpack($0)));
5475
5499
  }
5476
5500
 
5477
5501
  function Text_Lexer_non($0) {
@@ -5748,11 +5772,11 @@ function Language_JSON_String_Tokens_charValue($0) {
5748
5772
  }
5749
5773
 
5750
5774
  const Language_JSON_String_Parser_stringChar = __lazy(function () {
5751
- return {h: 12, a1: 1, a2: 1, a3: Text_Parser_match(csegen_341(), csegen_344(), 1), a4: () => ({h: 12, a1: 1, a2: 1, a3: Text_Parser_match(csegen_341(), csegen_344(), 2), a4: () => Text_Parser_match(csegen_341(), csegen_344(), 3)})};
5775
+ return {h: 12, a1: 1, a2: 1, a3: Text_Parser_match(csegen_310(), csegen_313(), 1), a4: () => ({h: 12, a1: 1, a2: 1, a3: Text_Parser_match(csegen_310(), csegen_313(), 2), a4: () => Text_Parser_match(csegen_310(), csegen_313(), 3)})};
5752
5776
  });
5753
5777
 
5754
5778
  const Language_JSON_String_Parser_quotedString = __lazy(function () {
5755
- const $0 = Text_Parser_match(csegen_341(), csegen_344(), 0);
5779
+ const $0 = Text_Parser_match(csegen_310(), csegen_313(), 0);
5756
5780
  return {h: 8, a1: 0, a2: Text_Parser_between(0, $0, $0, Text_Parser_many(Language_JSON_String_Parser_stringChar())), a3: () => chars => ({h: 11, a1: 0, a2: 0, a3: {h: 3}, a4: {h: 0, a1: Prelude_Types_fastPack(chars)}})};
5757
5781
  });
5758
5782
 
@@ -5814,7 +5838,7 @@ function Text_Parser_between($0, $1, $2, $3) {
5814
5838
  function Text_Parser_Core_case__doParse_5194($0, $1, $2, $3, $4, $5) {
5815
5839
  switch($5.h) {
5816
5840
  case 0: return {h: 0, a1: $5.a1, a2: $5.a2, a3: $5.a3};
5817
- case 1: return {h: 1, a1: $5.a1, a2: $5.a2, a3: Prelude_Interfaces_x3cx24x3e(csegen_360(), $11 => $5.a3, $5.a3), a4: $5.a4};
5841
+ case 1: return {h: 1, a1: $5.a1, a2: $5.a2, a3: Prelude_Interfaces_x3cx24x3e(csegen_329(), $11 => $5.a3, $5.a3), a4: $5.a4};
5818
5842
  }
5819
5843
  }
5820
5844
 
@@ -6238,12 +6262,12 @@ function Text_Parser_Core_doParse($0, $1, $2, $3, $4) {
6238
6262
  case 7: return Text_Parser_Core_case__doParse_4048($0, $1, $3.a1, $4, $2, Text_Parser_Core_doParse($0, $1, $2, $3.a1, $4));
6239
6263
  case 1: {
6240
6264
  switch($4.h) {
6241
- case 0: return {h: 0, a1: $2, a2: 0, a3: csegen_362()};
6265
+ case 0: return {h: 0, a1: $2, a2: 0, a3: csegen_331()};
6242
6266
  case undefined: {
6243
6267
  const $44 = $3.a2($4.a1.a1);
6244
6268
  switch($44.h) {
6245
6269
  case 0: return {h: 0, a1: $2, a2: 0, a3: {a1: {a1: $3.a1, a2: {a1: $4.a1.a3}}, a2: {h: 0}}};
6246
- case undefined: return {h: 1, a1: $1, a2: $2, a3: Prelude_Interfaces_x3cx24x3e(csegen_360(), $58 => $44.a1, $4.a1), a4: $4.a2};
6270
+ case undefined: return {h: 1, a1: $1, a2: $2, a3: Prelude_Interfaces_x3cx24x3e(csegen_329(), $58 => $44.a1, $4.a1), a4: $4.a2};
6247
6271
  }
6248
6272
  }
6249
6273
  }
@@ -6256,7 +6280,7 @@ function Text_Parser_Core_doParse($0, $1, $2, $3, $4) {
6256
6280
  }
6257
6281
  case 2: {
6258
6282
  switch($4.h) {
6259
- case 0: return {h: 0, a1: $2, a2: 0, a3: csegen_362()};
6283
+ case 0: return {h: 0, a1: $2, a2: 0, a3: csegen_331()};
6260
6284
  case undefined: {
6261
6285
  switch($3.a2($4.a1.a1)) {
6262
6286
  case 1: return {h: 1, a1: $1, a2: $2, a3: Text_Bounded_removeIrrelevance($4.a1), a4: {a1: $4.a1, a2: $4.a2}};
@@ -6285,7 +6309,7 @@ function Text_Parser_Core_doParse($0, $1, $2, $3, $4) {
6285
6309
  case 13: return Text_Parser_Core_case__doParse_5194($0, $1, $3.a1, $4, $2, Text_Parser_Core_doParse($0, $1, $2, $3.a1, $4));
6286
6310
  case 14: {
6287
6311
  switch($4.h) {
6288
- case 0: return {h: 0, a1: $2, a2: 0, a3: csegen_362()};
6312
+ case 0: return {h: 0, a1: $2, a2: 0, a3: csegen_331()};
6289
6313
  case undefined: return {h: 1, a1: $1, a2: $2, a3: Text_Bounded_irrelevantBounds($4.a1.a3), a4: {a1: $4.a1, a2: $4.a2}};
6290
6314
  }
6291
6315
  }
@@ -6391,7 +6415,7 @@ function Decidable_Equality_decEq_DecEq_FromEqx24a($0, $1, $2) {
6391
6415
  }
6392
6416
 
6393
6417
  function Decidable_Equality_decEq_DecEq_Char($0, $1) {
6394
- return Decidable_Equality_decEq_DecEq_FromEqx24a(csegen_210(), $0, $1);
6418
+ return Decidable_Equality_decEq_DecEq_FromEqx24a(csegen_176(), $0, $1);
6395
6419
  }
6396
6420
 
6397
6421
  function Data_Either_maybeToEither($0, $1) {
@@ -6401,6 +6425,137 @@ function Data_Either_maybeToEither($0, $1) {
6401
6425
  }
6402
6426
  }
6403
6427
 
6428
+ function User_Reflect_case__casex20blockx20inx20reflectOnSelf_2298($0, $1, $2, $3, $4, $5, $6, $7, $8, $9) {
6429
+ const $b = Prelude_Interfaces_mapHom({a1: d => b => c => a => $f => $10 => $11 => ({a1: $f($11.a1), a2: $10($11.a2)}), a2: b => c => a => $1a => $1b => ({a1: $1a($1b.a1), a2: $1b.a2}), a3: a => d => b => $22 => $23 => ({a1: $23.a1, a2: $22($23.a2)})}, $2a => Data_List_headx27(Data_List_sort({a1: {a1: $31 => $32 => Data_Date_x3dx3d_Eq_Date($31, $32), a2: $37 => $38 => Data_Date_x2fx3d_Eq_Date($37, $38)}, a2: $3d => $3e => Data_Date_compare_Ord_Date($3d, $3e), a3: $43 => $44 => Data_Date_x3c_Ord_Date($43, $44), a4: $49 => $4a => Data_Date_x3e_Ord_Date($49, $4a), a5: $4f => $50 => Data_Date_x3cx3d_Ord_Date($4f, $50), a6: $55 => $56 => Data_Date_x3ex3d_Ord_Date($55, $56), a7: $5b => $5c => Data_Date_max_Ord_Date($5b, $5c), a8: $61 => $62 => Data_Date_min_Ord_Date($61, $62)}, Prelude_Types_map_Functor_List(csegen_383(), $2a))), {a1: $7, a2: $9.a1});
6430
+ return Util_renderIO($0, csegen_21(), User_Reflect_print(Prelude_Types_String_length(User_Reflect_intro()), Prelude_Types_List_lengthTR($4), Prelude_Types_List_lengthTR($9.a1), Prelude_Types_List_lengthTR($9.a2), Prelude_Types_List_lengthTR($8), Prelude_Types_List_lengthTR($7), $5, $b.a1, $b.a2));
6431
+ }
6432
+
6433
+ function User_Me_n__6283_2415_ul($0, $1, $2, $3) {
6434
+ return Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_underline(), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String($3));
6435
+ }
6436
+
6437
+ function User_Me_n__6283_2421_teams($0, $1, $2) {
6438
+ return Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: User_Me_n__6283_2415_ul($0, $1, $2, 'GitHub Teams:'), a2: Prelude_Types_map_Functor_List($e => User_Me_n__6283_2416_it($0, $1, $2, $e), $0)});
6439
+ }
6440
+
6441
+ function User_Me_n__6283_2420_login($0, $1, $2) {
6442
+ return Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('GitHub Login:'), User_Me_n__6283_2417_green($0, $1, $2, $1.a1));
6443
+ }
6444
+
6445
+ function User_Reflect_n__5376_1492_ital($0, $1) {
6446
+ return Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_italic(), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String($1));
6447
+ }
6448
+
6449
+ function User_Me_n__6283_2416_it($0, $1, $2, $3) {
6450
+ return Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_italic(), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String($3));
6451
+ }
6452
+
6453
+ function User_Me_n__6423_2571_handleUnsetEmail($0, $1, $2, $3) {
6454
+ switch($3) {
6455
+ case '': return {h: 0};
6456
+ default: return {a1: $3};
6457
+ }
6458
+ }
6459
+
6460
+ function User_Me_n__6283_2417_green($0, $1, $2, $3) {
6461
+ return Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_color(2), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String($3));
6462
+ }
6463
+
6464
+ function User_Me_n__6283_2419_fullName($0, $1, $2) {
6465
+ return Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('GitHub Name:'), User_Me_n__6283_2417_green($0, $1, $2, $1.a2));
6466
+ }
6467
+
6468
+ function User_Me_n__6283_2418_email($0, $1, $2) {
6469
+ let $7;
6470
+ switch($2.h) {
6471
+ case undefined: {
6472
+ $7 = User_Me_n__6283_2417_green($0, $1, $2, $2.a1);
6473
+ break;
6474
+ }
6475
+ case 0: {
6476
+ $7 = User_Me_n__6283_2416_it($0, $1, $2, 'Not set');
6477
+ break;
6478
+ }
6479
+ }
6480
+ return Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('Git Email:'), $7);
6481
+ }
6482
+
6483
+ const User_Reflect_rightTitle = __lazy(function () {
6484
+ return 'authored';
6485
+ });
6486
+
6487
+ const User_Reflect_reviewDetailsCount = __lazy(function () {
6488
+ return 25n;
6489
+ });
6490
+
6491
+ function User_replicatex27($0, $1, $2) {
6492
+ return Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_color($0), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(Data_String_replicate($1, $2)));
6493
+ }
6494
+
6495
+ function User_Reflect_reflectOnSelf($0, $1, $2, $3) {
6496
+ const $c = prs => $d => $e => {
6497
+ const $19 = myLogin => $1a => $1b => {
6498
+ const $37 = reviews => {
6499
+ const $38 = Prelude_Types_map_Functor_Maybe(csegen_386(), Data_List_headx27(Data_List_sortBy($41 => $42 => Prelude_Basics_on(csegen_141(), csegen_386(), $41, $42), reviews)));
6500
+ const $4b = PullRequest_tuple(prs);
6501
+ const $4e = Prelude_Interfaces_mapHom({a1: d => b => c => a => $52 => $53 => $54 => ({a1: $52($54.a1), a2: $53($54.a2)}), a2: b => c => a => $5d => $5e => ({a1: $5d($5e.a1), a2: $5e.a2}), a3: a => d => b => $65 => $66 => ({a1: $66.a1, a2: $65($66.a2)})}, $6d => Prelude_Types_List_filter($70 => Prelude_EqOrd_x3dx3d_Eq_String($70.a3, myLogin), $6d), $4b);
6502
+ return User_Reflect_case__casex20blockx20inx20reflectOnSelf_2298($0, $1, prs, myLogin, reviews, $38, $4b, $4e.a1, $4e.a2, Prelude_Interfaces_mapHom({a1: d => b => c => a => $85 => $86 => $87 => ({a1: $85($87.a1), a2: $86($87.a2)}), a2: b => c => a => $90 => $91 => ({a1: $90($91.a1), a2: $91.a2}), a3: a => d => b => $98 => $99 => ({a1: $99.a1, a2: $98($99.a2)})}, $a0 => Prelude_Types_List_filter($a3 => Prelude_Interfaces_any(csegen_77(), $a8 => Prelude_EqOrd_x3dx3d_Eq_String($a8, myLogin), $a3.a5), $a0), $4b));
6503
+ };
6504
+ return Data_Promise_x3ex3ex3d_Monad_Promise(PullRequest_reviewsForUser($0, $1, myLogin, Data_List_take(User_Reflect_reviewDetailsCount(), Prelude_Types_List_reverse(Data_List_sortBy($2b => $2c => Prelude_Basics_on(csegen_141(), csegen_383(), $2b, $2c), PullRequest_combined(prs))))), $37, $1a, $1b);
6505
+ };
6506
+ return Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Interfaces_x3cx24x3e(csegen_102(), csegen_139(), FFI_GitHub_getSelf($1)), $19, $d, $e);
6507
+ };
6508
+ return Data_Promise_x3ex3ex3d_Monad_Promise(PullRequest_listPartitionedPRs($0, $1, 4n, User_Reflect_prCount()), $c, $2, $3);
6509
+ }
6510
+
6511
+ function User_Me_printInfoOnSelf($0, $1, $2, $3, $4) {
6512
+ return Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Interfaces_x3cx24x3e(csegen_102(), $b => User_Me_n__6423_2571_handleUnsetEmail($0, $1, $2, $b), $12 => $13 => FFI_Git_userEmail($2, $12, $13)), gitEmail => $19 => $1a => Data_Promise_x3ex3ex3d_Monad_Promise(FFI_GitHub_getSelf($1), githubUser => $20 => $21 => Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Interfaces_x3cx24x3e(csegen_102(), csegen_111(), FFI_GitHub_listMyTeams($1)), githubTeams => Util_renderIO($0, csegen_21(), User_Me_print(gitEmail, githubUser, githubTeams)), $20, $21), $19, $1a), $3, $4);
6513
+ }
6514
+
6515
+ function User_Reflect_print($0, $1, $2, $3, $4, $5, $6, $7, $8) {
6516
+ return Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {a1: User_Reflect_graph($0, $1, $2, $3, $4, $5), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {a1: User_Reflect_details($0, $1, $2, $3, $4, $5, $6, $7, $8), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {h: 0}}}}}});
6517
+ }
6518
+
6519
+ function User_Me_print($0, $1, $2) {
6520
+ return Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {a1: User_Me_n__6283_2418_email($2, $1, $0), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {a1: User_Me_n__6283_2419_fullName($2, $1, $0), a2: {a1: User_Me_n__6283_2420_login($2, $1, $0), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {a1: User_Me_n__6283_2421_teams($2, $1, $0), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {h: 0}}}}}}}}});
6521
+ }
6522
+
6523
+ const User_Reflect_prCount = __lazy(function () {
6524
+ return csegen_134();
6525
+ });
6526
+
6527
+ const User_Reflect_leftTitle = __lazy(function () {
6528
+ return 'requested';
6529
+ });
6530
+
6531
+ const User_Reflect_intro = __lazy(function () {
6532
+ return Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Your current pull request summary (out of the past ', a2: {a1: Data_Fin_show_Show_x28Finx20x24nx29(User_Reflect_prCount()), a2: {a1: ' PRs):', a2: {h: 0}}}});
6533
+ });
6534
+
6535
+ function User_Reflect_header($0) {
6536
+ return Text_PrettyPrint_Prettyprinter_Doc_indent(Prelude_Cast_cast_Cast_Nat_Int($0), Text_PrettyPrint_Prettyprinter_Doc_hsep({a1: User_Reflect_n__5376_1492_ital($0, User_Reflect_leftTitle()), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(' '), a2: {a1: User_Reflect_n__5376_1492_ital($0, User_Reflect_rightTitle()), a2: {h: 0}}}}));
6537
+ }
6538
+
6539
+ function User_Reflect_graph($0, $1, $2, $3, $4, $5) {
6540
+ const $6 = ($2+$3);
6541
+ const $9 = ($5+$4);
6542
+ const $c = Prelude_Types_foldr_Foldable_List(csegen_391(), Prelude_Types_String_length(User_Reflect_leftTitle()), {a1: ($6+$1), a2: {a1: $9, a2: {h: 0}}});
6543
+ const $1b = Prelude_Types_foldr_Foldable_List(csegen_391(), Prelude_Types_String_length(User_Reflect_rightTitle()), {a1: $6, a2: {a1: $9, a2: {h: 0}}});
6544
+ const $28 = (($c+$1b)+3n);
6545
+ const $2d = ((Prelude_Cast_cast_Cast_Nat_Double($0)/2.0)-(Prelude_Cast_cast_Cast_Nat_Double($28)/2.0));
6546
+ const $38 = (Prelude_Cast_cast_Cast_Double_Nat($2d)+Prelude_Types_prim__integerToNat(($c-Prelude_Types_String_length(User_Reflect_leftTitle()))));
6547
+ const $44 = (Prelude_Cast_cast_Cast_Double_Nat($2d)+Prelude_Types_prim__integerToNat(($c-($6+$1))));
6548
+ return Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: User_Reflect_header($38), a2: {a1: User_Reflect_chart($0, $1, $2, $3, $4, $5, $44), a2: {h: 0}}});
6549
+ }
6550
+
6551
+ function User_Reflect_details($0, $1, $2, $3, $4, $5, $6, $7, $8) {
6552
+ return Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(User_Reflect_intro()), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_underline(), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('Requested Reviews:')), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_indent(2, Text_PrettyPrint_Prettyprinter_Doc_vsep(Data_List_catMaybes({a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('unreviewed:')}, a2: {a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_indent(2, Text_PrettyPrint_Prettyprinter_Doc_vsep(Data_List_catMaybes({a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_hsep({a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('open:'), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_color(3), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_Nat($2)), a2: {h: 0}}})}, a2: {a1: Prelude_Interfaces_x3cx26x3e(csegen_18(), $8, csegen_393()), 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_Interfaces_x3cx26x3e(csegen_18(), $6, 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}}}))), 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_Interfaces_x3cx26x3e(csegen_18(), $7, csegen_393()), 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_Interfaces_concat(csegen_62(), csegen_77(), {a1: '*review count (not PR count) of most recent ', a2: {a1: Data_Fin_show_Show_x28Finx20x24nx29(User_Reflect_reviewDetailsCount()), a2: {a1: ' PRs.', a2: {h: 0}}}}))), a2: {h: 0}}}}}}}}}});
6553
+ }
6554
+
6555
+ function User_Reflect_chart($0, $1, $2, $3, $4, $5, $6) {
6556
+ return Text_PrettyPrint_Prettyprinter_Doc_indent(Prelude_Cast_cast_Cast_Nat_Int($6), Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29(Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29(User_replicatex27(2, $1, '\u{b7}'), User_replicatex27(1, $3, '\u{25e6}')), User_replicatex27(3, $2, '<')), Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('|'), Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29(User_replicatex27(3, $5, '>'), User_replicatex27(2, $4, '\u{b7}')))));
6557
+ }
6558
+
6404
6559
  function PullRequest_with__withx20blockx20inx20listPartitionedPRs_1206($0, $1, $2, $3, $4, $5, $6, $7) {
6405
6560
  switch($2.h) {
6406
6561
  case 1: return $9 => PullRequest_partitionx27(Data_Pagination_metaPages($0, 1n, $4, 1n, $4), $7, $9);
@@ -6413,114 +6568,107 @@ function PullRequest_with__listPartitionedPRs_1144($0, $1, $2, $3, $4) {
6413
6568
  case 1: return $7 => $8 => Data_Promise_pure_Applicative_Promise(PullRequest_empty(), $7, $8);
6414
6569
  default: {
6415
6570
  switch($2.a2.h) {
6416
- case 1: return Prelude_Interfaces_x3cx24x3e(csegen_103(), $13 => PullRequest_partition($13), FFI_GitHub_listPullRequests($3, $4.a2, $4.a3, {h: 0}, $0, 0n));
6571
+ case 1: return Prelude_Interfaces_x3cx24x3e(csegen_102(), $13 => PullRequest_partition($13), FFI_GitHub_listPullRequests($3, $4.a2, $4.a3, {h: 0}, $0, 0n));
6417
6572
  default: return $22 => PullRequest_with__withx20blockx20inx20listPartitionedPRs_1206($0, $1, Data_Nat_isLTE(($1+1n), $0), $3, $2.a1.a1, $2.a2.a1, $4, $22);
6418
6573
  }
6419
6574
  }
6420
6575
  }
6421
6576
  }
6422
6577
 
6423
- function PullRequest_case__identifyOrCreatePRx2ccreatePR_2359($0, $1, $2, $3, $4, $5) {
6578
+ function PullRequest_case__identifyOrCreatePRx2ccreatePR_2353($0, $1, $2, $3, $4, $5) {
6424
6579
  switch($5.h) {
6425
6580
  case undefined: return ($5.a1+$5.a2);
6426
- default: return $3.a4;
6581
+ default: return $3.a5;
6427
6582
  }
6428
6583
  }
6429
6584
 
6430
- function PullRequest_n__6847_1429_userNotice($0, $1, $2, $3, $4, $5, $6) {
6585
+ function PullRequest_n__6887_1428_userNotice($0, $1, $2, $3, $4, $5, $6) {
6431
6586
  switch($6.h) {
6432
6587
  case 0: {
6433
6588
  switch($2.h) {
6434
6589
  case 0: return 'no users';
6435
- default: return Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: PullRequest_n__6847_1428_csv($0, $1, $2, $3, $4, $5, $2), a2: {h: 0}});
6590
+ default: return Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: PullRequest_n__6887_1427_csv($0, $1, $2, $3, $4, $5, $2), a2: {h: 0}});
6436
6591
  }
6437
6592
  }
6438
- case undefined: return Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: PullRequest_n__6847_1428_csv($0, $1, $2, $3, $4, $5, {a1: $6.a1, a2: $2}), a2: {h: 0}});
6593
+ case undefined: return Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: PullRequest_n__6887_1427_csv($0, $1, $2, $3, $4, $5, {a1: $6.a1, a2: $2}), a2: {h: 0}});
6439
6594
  }
6440
6595
  }
6441
6596
 
6442
- function PullRequest_n__6847_1430_teamNotice($0, $1, $2, $3, $4, $5, $6) {
6597
+ function PullRequest_n__6887_1429_teamNotice($0, $1, $2, $3, $4, $5, $6) {
6443
6598
  switch($6.h) {
6444
6599
  case 0: return '';
6445
6600
  case undefined: {
6446
6601
  switch($6.a2.h) {
6447
- case 0: return Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: ' and team ', a2: {a1: PullRequest_n__6847_1428_csv($0, $1, $2, $3, $4, $5, {a1: $6.a1, a2: {h: 0}}), a2: {h: 0}}});
6448
- default: return Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: ' and teams ', a2: {a1: PullRequest_n__6847_1428_csv($0, $1, $2, $3, $4, $5, $6), a2: {h: 0}}});
6602
+ case 0: return Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: ' and team ', a2: {a1: PullRequest_n__6887_1427_csv($0, $1, $2, $3, $4, $5, {a1: $6.a1, a2: {h: 0}}), a2: {h: 0}}});
6603
+ default: return Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: ' and teams ', a2: {a1: PullRequest_n__6887_1427_csv($0, $1, $2, $3, $4, $5, $6), a2: {h: 0}}});
6449
6604
  }
6450
6605
  }
6451
- default: return Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: ' and teams ', a2: {a1: PullRequest_n__6847_1428_csv($0, $1, $2, $3, $4, $5, $6), a2: {h: 0}}});
6606
+ default: return Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: ' and teams ', a2: {a1: PullRequest_n__6887_1427_csv($0, $1, $2, $3, $4, $5, $6), a2: {h: 0}}});
6452
6607
  }
6453
6608
  }
6454
6609
 
6455
- function PullRequest_n__7478_2030_prepareDescriptionFile($0, $1, $2, $3, $4) {
6456
- return $4.a1.a2(undefined)(undefined)(System_File_Meta_exists($4, '.github/PULL_REQUEST_TEMPLATE.md'))($12 => Prelude_Interfaces_when($4.a1.a1, $12, () => $4.a1.a1.a1(undefined)(undefined)($23 => (undefined))(System_File_copyFile($4, '.github/PULL_REQUEST_TEMPLATE.md', 'pr_description.tmp.md'))));
6610
+ function PullRequest_n__7500_2016_prepareDescriptionFile($0, $1, $2, $3, $4, $5) {
6611
+ return $4.a1.a2(undefined)(undefined)(System_File_Meta_exists($4, $5))($13 => Prelude_Interfaces_when($4.a1.a1, $13, () => $4.a1.a1.a1(undefined)(undefined)($24 => (undefined))(System_File_copyFile($4, $5, 'pr_description.tmp.md'))));
6457
6612
  }
6458
6613
 
6459
- function PullRequest_n__6847_1431_prComment($0, $1, $2, $3, $4, $5, $6) {
6614
+ function PullRequest_n__6887_1430_prComment($0, $1, $2, $3, $4, $5, $6) {
6460
6615
  return Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: ':musical_note: Harmoniously assigned @', a2: {a1: $6, a2: {a1: ' to review this PR.', a2: {h: 0}}}});
6461
6616
  }
6462
6617
 
6463
- function PullRequest_n__6847_1427_maybeDecorate($0, $1, $2, $3, $4, $5, $6) {
6464
- const $7 = $8 => {
6465
- switch(Data_Config_rf__colors($5)) {
6466
- case 1: return $8;
6467
- case 0: return Text_PrettyPrint_Prettyprinter_Doc_unAnnotate($8);
6468
- }
6469
- };
6470
- return Text_PrettyPrint_Prettyprinter_Render_Terminal_renderString(Text_PrettyPrint_Prettyprinter_Doc_layoutPretty(Text_PrettyPrint_Prettyprinter_Doc_defaultLayoutOptions(), $7($6)));
6471
- }
6472
-
6473
- function PullRequest_n__7478_2029_inlineDescription($0, $1, $2, $3, $4) {
6618
+ function PullRequest_n__7500_2015_inlineDescription($0, $1, $2, $3, $4) {
6474
6619
  return Prelude_Interfaces_x3ex3e($4.a1, Prelude_IO_putStrLn($4, 'What would you like the description to be (two blank lines to finish)?'), () => Prelude_Interfaces_x3cx24x3e($4.a1.a1.a1, $13 => Data_String_fastUnlines($13), Util_getManyLines($4, Data_Fuel_limit(Prelude_Types_prim__integerToNat(100n)))));
6475
6620
  }
6476
6621
 
6477
- function PullRequest_n__6740_1302_forkedReviews($0, $1, $2, $3, $4) {
6622
+ function PullRequest_n__6780_1302_forkedReviews($0, $1, $2, $3, $4) {
6478
6623
  return FFI_Concurrency_fork(csegen_21(), ('reviews --json '+Prelude_Show_show_Show_Integer($4.a1)));
6479
6624
  }
6480
6625
 
6481
- function PullRequest_n__7478_2031_editorDescription($0, $1, $2, $3, $4, $5) {
6482
- const $10 = () => {
6483
- const $27 = $28 => {
6484
- switch($28) {
6485
- case 0: return $4.a1.a2(undefined)(undefined)(System_File_ReadWrite_readFile($4, 'pr_description.tmp.md'))(description => Prelude_Interfaces_x3ex3e($4.a1, $4.a1.a2(undefined)(undefined)(System_File_Meta_exists($4, 'pr_description.tmp.md'))($48 => Prelude_Interfaces_when($4.a1.a1, $48, () => System_File_Node_removeFile($4, 'pr_description.tmp.md'))), () => $4.a1.a1.a2(undefined)(description)));
6486
- default: return $4.a1.a1.a2(undefined)({h: 0, a1: {h: 0, a1: $28}});
6626
+ function PullRequest_n__7500_2017_editorDescription($0, $1, $2, $3, $4, $5, $6) {
6627
+ const $12 = () => {
6628
+ const $29 = $2a => {
6629
+ switch($2a) {
6630
+ case 0: return $4.a1.a2(undefined)(undefined)(System_File_ReadWrite_readFile($4, 'pr_description.tmp.md'))(description => Prelude_Interfaces_x3ex3e($4.a1, $4.a1.a2(undefined)(undefined)(System_File_Meta_exists($4, 'pr_description.tmp.md'))($4a => Prelude_Interfaces_when($4.a1.a1, $4a, () => System_File_Node_removeFile($4, 'pr_description.tmp.md'))), () => $4.a1.a1.a2(undefined)(description)));
6631
+ default: return $4.a1.a1.a2(undefined)({h: 0, a1: {h: 0, a1: $2a}});
6487
6632
  }
6488
6633
  };
6489
- return $4.a1.a2(undefined)(undefined)(System_Node_system($4, Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: $5, a2: {a1: ' pr_description.tmp.md', a2: {h: 0}}})))($27);
6634
+ return $4.a1.a2(undefined)(undefined)(System_Node_system($4, Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: $5, a2: {a1: ' pr_description.tmp.md', a2: {h: 0}}})))($29);
6490
6635
  };
6491
- return Prelude_Interfaces_x3ex3e($4.a1, PullRequest_n__7478_2030_prepareDescriptionFile($0, $1, $2, $3, $4), $10);
6636
+ return Prelude_Interfaces_x3ex3e($4.a1, PullRequest_n__7500_2016_prepareDescriptionFile($0, $1, $2, $3, $4, $6), $12);
6492
6637
  }
6493
6638
 
6494
- function PullRequest_n__6847_1428_csv($0, $1, $2, $3, $4, $5, $6) {
6495
- return PullRequest_n__6847_1427_maybeDecorate($0, $1, $2, $3, $4, $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_map_Functor_List(csegen_405(), $6)));
6639
+ function PullRequest_n__6887_1427_csv($0, $1, $2, $3, $4, $5, $6) {
6640
+ 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_map_Functor_List(csegen_405(), $6)));
6496
6641
  }
6497
6642
 
6498
- function PullRequest_n__7478_2032_createPR($0, $1, $2, $3) {
6499
- return Prelude_Interfaces_x3ex3e(csegen_15(), $8 => $9 => Data_Promise_x3ex3ex3d_Monad_Promise($c => $d => FFI_Git_remoteTrackingBranch($0, $c, $d), $13 => Prelude_Interfaces_when(csegen_9(), Prelude_Types_x3dx3d_Eq_x28Maybex20x24ax29(csegen_94(), $13, {h: 0}), () => Prelude_Interfaces_x3ex3e(csegen_15(), Prelude_IO_putStrLn(csegen_21(), 'Creating a new remote branch...'), () => $27 => $28 => FFI_Git_pushNewBranch($0, 'origin', $2, $27, $28))), $8, $9), () => Prelude_Interfaces_x3ex3e(csegen_15(), Prelude_IO_putStrLn(csegen_21(), Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Creating a new PR for the current branch (', a2: {a1: $2, a2: {a1: ').', a2: {h: 0}}}})), () => Prelude_Interfaces_x3ex3e(csegen_15(), Prelude_IO_putStrLn(csegen_21(), Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'What branch are you merging into (ENTER for default: ', a2: {a1: $3.a4, a2: {a1: ')?', a2: {h: 0}}}})), () => $5d => $5e => {
6500
- const $6a = baseBranchInput => {
6501
- const $6b = PullRequest_case__identifyOrCreatePRx2ccreatePR_2359($0, $1, $2, $3, baseBranchInput, Data_String_strM(baseBranchInput));
6502
- const $7e = Data_Maybe_fromMaybe(() => '', Prelude_Interfaces_x3cx24x3e(csegen_18(), $86 => ($86+' - '), Util_parseJiraPrefix($2)));
6503
- const $7d = () => Prelude_Interfaces_x3ex3e(csegen_15(), Prelude_IO_putStr(csegen_21(), $7e), () => $95 => $96 => {
6504
- const $a4 = title => $a5 => $a6 => {
6505
- const $a9 = Data_Config_rf__editor($3);
6506
- let $a8;
6507
- switch($a9.h) {
6508
- case 0: {
6509
- $a8 = PullRequest_n__7478_2029_inlineDescription($0, $1, $2, $3, csegen_21());
6510
- break;
6511
- }
6512
- case undefined: {
6513
- $a8 = Prelude_Interfaces_x3cx24x3e(csegen_103(), $b7 => Prelude_Types_either(() => $ba => '', () => $bc => $bc, $b7), PullRequest_n__7478_2031_editorDescription($0, $1, $2, $3, csegen_21(), $a9.a1));
6514
- break;
6643
+ function PullRequest_n__7500_2018_createPR($0, $1, $2, $3) {
6644
+ return Prelude_Interfaces_x3ex3e(csegen_15(), $8 => $9 => Data_Promise_x3ex3ex3d_Monad_Promise($c => $d => FFI_Git_remoteTrackingBranch($0, $c, $d), $13 => Prelude_Interfaces_when(csegen_9(), Prelude_Types_x3dx3d_Eq_x28Maybex20x24ax29(csegen_94(), $13, {h: 0}), () => Prelude_Interfaces_x3ex3e(csegen_15(), Prelude_IO_putStrLn(csegen_21(), 'Creating a new remote branch...'), () => $27 => $28 => FFI_Git_pushNewBranch($0, Data_Maybe_fromMaybe(() => 'origin', $3.a4), $2, $27, $28))), $8, $9), () => Prelude_Interfaces_x3ex3e(csegen_15(), Prelude_IO_putStrLn(csegen_21(), Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Creating a new PR for the current branch (', a2: {a1: $2, a2: {a1: ').', a2: {h: 0}}}})), () => Prelude_Interfaces_x3ex3e(csegen_15(), Prelude_IO_putStrLn(csegen_21(), Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'What branch are you merging into (ENTER for default: ', a2: {a1: $3.a5, a2: {a1: ')?', a2: {h: 0}}}})), () => $61 => $62 => {
6645
+ const $6e = baseBranchInput => {
6646
+ const $6f = PullRequest_case__identifyOrCreatePRx2ccreatePR_2353($0, $1, $2, $3, baseBranchInput, Data_String_strM(baseBranchInput));
6647
+ const $82 = Data_Maybe_fromMaybe(() => '', Prelude_Interfaces_x3cx24x3e(csegen_18(), $8a => ($8a+' - '), Util_parseJiraPrefix($2)));
6648
+ const $81 = () => Prelude_Interfaces_x3ex3e(csegen_15(), Prelude_IO_putStr(csegen_21(), $82), () => $99 => $9a => {
6649
+ const $a8 = title => $a9 => $aa => {
6650
+ const $b0 = templateFilePath => $b1 => $b2 => {
6651
+ const $b5 = Data_Config_rf__editor($3);
6652
+ let $b4;
6653
+ switch($b5.h) {
6654
+ case 0: {
6655
+ $b4 = PullRequest_n__7500_2015_inlineDescription($0, $1, $2, $3, csegen_21());
6656
+ break;
6657
+ }
6658
+ case undefined: {
6659
+ $b4 = Prelude_Interfaces_x3cx24x3e(csegen_102(), $c3 => Prelude_Types_either(() => $c6 => '', () => $c8 => $c8, $c3), PullRequest_n__7500_2017_editorDescription($0, $1, $2, $3, csegen_21(), $b5.a1, templateFilePath));
6660
+ break;
6661
+ }
6515
6662
  }
6516
- }
6517
- return Data_Promise_x3ex3ex3d_Monad_Promise($a8, description => Prelude_Interfaces_x3ex3e(csegen_15(), Prelude_IO_putStrLn(csegen_21(), 'Creating PR...'), () => Prelude_Interfaces_x3ex3e(csegen_15(), Prelude_IO_putStrLn(csegen_21(), $2), () => FFI_GitHub_createPR($1, $3.a2, $3.a3, $2, $6b, title, description))), $a5, $a6);
6663
+ return Data_Promise_x3ex3ex3d_Monad_Promise($b4, description => Prelude_Interfaces_x3ex3e(csegen_15(), Prelude_IO_putStrLn(csegen_21(), 'Creating PR...'), () => Prelude_Interfaces_x3ex3e(csegen_15(), Prelude_IO_putStrLn(csegen_21(), $2), () => FFI_GitHub_createPR($1, $3.a2, $3.a3, $2, $6f, title, description))), $b1, $b2);
6664
+ };
6665
+ return Data_Promise_x3ex3ex3d_Monad_Promise(PullRequest_relativeToRoot($0, '.github/PULL_REQUEST_TEMPLATE.md'), $b0, $a9, $aa);
6518
6666
  };
6519
- return Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Interfaces_x3cx24x3e(csegen_103(), $9d => ($7e+Data_String_trim($9d)), csegen_407()), $a4, $95, $96);
6667
+ return Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Interfaces_x3cx24x3e(csegen_102(), $a1 => ($82+Data_String_trim($a1)), csegen_407()), $a8, $99, $9a);
6520
6668
  });
6521
- return Prelude_Interfaces_x3ex3e(csegen_15(), Prelude_IO_putStrLn(csegen_21(), 'What would you like the title to be?'), $7d);
6669
+ return Prelude_Interfaces_x3ex3e(csegen_15(), Prelude_IO_putStrLn(csegen_21(), 'What would you like the title to be?'), $81);
6522
6670
  };
6523
- return Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Interfaces_x3cx24x3e(csegen_103(), $65 => Data_String_trim($65), csegen_407()), $6a, $5d, $5e);
6671
+ return Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Interfaces_x3cx24x3e(csegen_102(), $69 => Data_String_trim($69), csegen_407()), $6e, $61, $62);
6524
6672
  })));
6525
6673
  }
6526
6674
 
@@ -6573,23 +6721,23 @@ function PullRequest_reviewsForUser($0, $1, $2, $3) {
6573
6721
  };
6574
6722
  const $32 = {a1: $33, a2: a => $3b => ({h: 1, a1: $3b}), a3: $3d};
6575
6723
  const $30 = Prelude_Types_traverse_Traversable_List($32, $48 => Language_JSON_Accessors_array($4b => Data_Review_parseReview($4b), $48), reviewsJson);
6576
- return Data_Promise_either(csegen_115(), $30, $2b, $2c);
6724
+ return Data_Promise_either(csegen_114(), $30, $2b, $2c);
6577
6725
  };
6578
6726
  return Data_Promise_x3ex3ex3d_Monad_Promise($2a, reviews => $53 => $54 => Data_Promise_pure_Applicative_Promise(Prelude_Types_List_filter($59 => Data_Review_isAuthor($2, $59), Prelude_Types_join_Monad_List(reviews)), $53, $54), $27, $28);
6579
6727
  };
6580
- return Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Interfaces_x3dx3cx3c(csegen_15(), csegen_113(), Prelude_Types_traverse_Traversable_List(csegen_9(), $1e => PullRequest_n__6740_1302_forkedReviews($1, $3, $2, $0, $1e), $4)), $26, $10, $11);
6728
+ return Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Interfaces_x3dx3cx3c(csegen_15(), csegen_112(), Prelude_Types_traverse_Traversable_List(csegen_9(), $1e => PullRequest_n__6780_1302_forkedReviews($1, $3, $2, $0, $1e), $4)), $26, $10, $11);
6581
6729
  };
6582
6730
  }
6583
6731
 
6584
6732
  function PullRequest_requestReviewers($0, $1, $2, $3, $4, $5, $6, $7) {
6585
6733
  const $14 = $15 => $16 => $17 => {
6586
6734
  const $2e = teamMembers => {
6587
- const $2f = Reviewer_chooseReviewers(csegen_111(), $15.a2, $15.a1, teamMembers, {h: 0}, $2.a3);
6735
+ const $2f = Reviewer_chooseReviewers(csegen_110(), $15.a2, $15.a1, teamMembers, {h: 0}, $2.a3);
6588
6736
  return $39 => $3a => {
6589
6737
  const $41 = chosenUser => {
6590
6738
  const $42 = Prelude_Types_List_tailRecAppend(Prelude_Types_toList_Foldable_Maybe(chosenUser), $4);
6591
6739
  let $48;
6592
- switch($0.a5) {
6740
+ switch($0.a6) {
6593
6741
  case 1: {
6594
6742
  $48 = $3;
6595
6743
  break;
@@ -6610,20 +6758,20 @@ function PullRequest_requestReviewers($0, $1, $2, $3, $4, $5, $6, $7) {
6610
6758
  break;
6611
6759
  }
6612
6760
  }
6613
- const $4e = Prelude_Interfaces_when(csegen_9(), $52, () => Prelude_Interfaces_x3ex3e(csegen_15(), $59 => $5a => Data_Promise_map_Functor_Promise($5d => (undefined), FFI_GitHub_addPullReviewers($1, $0.a2, $0.a3, $2.a1, $42, $48), $59, $5a), () => Prelude_Interfaces_when(csegen_9(), $0.a6, () => $72 => $73 => {
6761
+ const $4e = Prelude_Interfaces_when(csegen_9(), $52, () => Prelude_Interfaces_x3ex3e(csegen_15(), $59 => $5a => Data_Promise_map_Functor_Promise($5d => (undefined), FFI_GitHub_addPullReviewers($1, $0.a2, $0.a3, $2.a1, $42, $48), $59, $5a), () => Prelude_Interfaces_when(csegen_9(), $0.a7, () => $72 => $73 => {
6614
6762
  switch(chosenUser.h) {
6615
- case undefined: return FFI_GitHub_createComment($1, $0.a2, $0.a3, $2.a1, PullRequest_n__6847_1431_prComment($1, $5, $4, $3, $2, $0, chosenUser.a1), $72, $73);
6763
+ case undefined: return FFI_GitHub_createComment($1, $0.a2, $0.a3, $2.a1, PullRequest_n__6887_1430_prComment($1, $5, $4, $3, $2, $0, chosenUser.a1), $72, $73);
6616
6764
  case 0: return Data_Promise_pure_Applicative_Promise(undefined, $72, $73);
6617
6765
  }
6618
6766
  })));
6619
6767
  let $8c;
6620
6768
  switch(Prelude_Types_null_Foldable_List($42)) {
6621
6769
  case 1: {
6622
- $8c = () => Prelude_IO_putStrLn(csegen_21(), PullRequest_n__6847_1427_maybeDecorate($1, $5, $4, $3, $2, $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: {h: 0}}})));
6770
+ $8c = () => Prelude_IO_putStrLn(csegen_21(), 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: {h: 0}}})));
6623
6771
  break;
6624
6772
  }
6625
6773
  case 0: {
6626
- $8c = () => Prelude_IO_putStrLn(csegen_21(), PullRequest_n__6847_1427_maybeDecorate($1, $5, $4, $3, $2, $0, Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Assigned ', a2: {a1: PullRequest_n__6847_1429_userNotice($1, $5, $4, $3, $2, $0, chosenUser), a2: {a1: PullRequest_n__6847_1430_teamNotice($1, $5, $4, $3, $2, $0, $48), a2: {a1: ' to the open PR ', a2: {h: 0}}}}})), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'for the current branch (', a2: {a1: Data_PullRequest_rf__webURI($0, $2), a2: {a1: ').', a2: {h: 0}}}})), a2: {h: 0}}})));
6774
+ $8c = () => Prelude_IO_putStrLn(csegen_21(), Util_renderString($0, Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Assigned ', a2: {a1: PullRequest_n__6887_1428_userNotice($1, $5, $4, $3, $2, $0, chosenUser), a2: {a1: PullRequest_n__6887_1429_teamNotice($1, $5, $4, $3, $2, $0, $48), a2: {a1: ' to the open PR ', a2: {h: 0}}}}})), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'for the current branch (', a2: {a1: Data_PullRequest_rf__webURI($0, $2), a2: {a1: ').', a2: {h: 0}}}})), a2: {h: 0}}})));
6627
6775
  break;
6628
6776
  }
6629
6777
  }
@@ -6632,11 +6780,15 @@ function PullRequest_requestReviewers($0, $1, $2, $3, $4, $5, $6, $7) {
6632
6780
  return Data_Promise_x3ex3ex3d_Monad_Promise(Reviewer_randomReviewer(csegen_21(), $2f), $41, $39, $3a);
6633
6781
  };
6634
6782
  };
6635
- return Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Interfaces_x3cx24x3e(csegen_103(), $1f => Prelude_Types_join_Monad_List($1f), Prelude_Types_traverse_Traversable_List(csegen_9(), $27 => FFI_GitHub_listTeamMembers($1, $0.a2, $27), $3)), $2e, $16, $17);
6783
+ return Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Interfaces_x3cx24x3e(csegen_102(), $1f => Prelude_Types_join_Monad_List($1f), Prelude_Types_traverse_Traversable_List(csegen_9(), $27 => FFI_GitHub_listTeamMembers($1, $0.a2, $27), $3)), $2e, $16, $17);
6636
6784
  };
6637
6785
  return Data_Promise_x3ex3ex3d_Monad_Promise($a => $b => PullRequest_listReviewers($0, $1, 4n, csegen_134(), $a, $b), $14, $6, $7);
6638
6786
  }
6639
6787
 
6788
+ function PullRequest_relativeToRoot($0, $1) {
6789
+ return Prelude_Interfaces_x3cx26x3e(csegen_102(), $6 => $7 => FFI_Git_rootDir($0, $6, $7), $d => ($d+Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: '/', a2: {a1: $1, a2: {h: 0}}})));
6790
+ }
6791
+
6640
6792
  function PullRequest_partitionx27($0, $1, $2) {
6641
6793
  const $40 = prJsons => $41 => $42 => {
6642
6794
  const $44 = $45 => $46 => {
@@ -6659,7 +6811,7 @@ function PullRequest_partitionx27($0, $1, $2) {
6659
6811
  };
6660
6812
  const $4c = {a1: $4d, a2: a => $55 => ({h: 1, a1: $55}), a3: $57};
6661
6813
  const $4a = Prelude_Types_traverse_Traversable_List($4c, csegen_437(), prJsons);
6662
- return Data_Promise_either(csegen_115(), $4a, $45, $46);
6814
+ return Data_Promise_either(csegen_114(), $4a, $45, $46);
6663
6815
  };
6664
6816
  return Data_Promise_x3ex3ex3d_Monad_Promise($44, pulls => $67 => $68 => Data_Promise_pure_Applicative_Promise(PullRequest_partition(Prelude_Types_join_Monad_List(pulls)), $67, $68), $41, $42);
6665
6817
  };
@@ -6685,12 +6837,12 @@ function PullRequest_identifyOrCreatePR($0, $1, $2, $3, $4, $5) {
6685
6837
  return $12 => $13 => {
6686
6838
  switch($10.a2.h) {
6687
6839
  case 0: return Data_Promise_pure_Applicative_Promise({a1: 0, a2: $10.a1}, $12, $13);
6688
- default: return Data_Promise_reject('Multiple PRs for the current brach. We only handle 1 PR per branch currently.', $12, $13);
6840
+ default: return Data_Promise_reject('Multiple PRs for the current brach. Harmony only handles 1 PR per branch currently.', $12, $13);
6689
6841
  }
6690
6842
  };
6691
6843
  }
6692
- case 0: return Prelude_Interfaces_x3cx24x3e(csegen_103(), $23 => ({a1: 1, a2: $23}), PullRequest_n__7478_2032_createPR($1, $2, $3, $0));
6693
- default: return $2c => $2d => Data_Promise_reject('Multiple PRs for the current brach. We only handle 1 PR per branch currently.', $2c, $2d);
6844
+ case 0: return Prelude_Interfaces_x3cx24x3e(csegen_102(), $23 => ({a1: 1, a2: $23}), PullRequest_n__7500_2018_createPR($1, $2, $3, $0));
6845
+ default: return $2c => $2d => Data_Promise_reject('Multiple PRs for the current brach. Harmony only handles 1 PR per branch currently.', $2c, $2d);
6694
6846
  }
6695
6847
  };
6696
6848
  return Data_Promise_x3ex3ex3d_Monad_Promise(FFI_GitHub_listPRsForBranch($2, $0.a2, $0.a3, $3), $f, $4, $5);
@@ -6765,7 +6917,7 @@ function System_File_ReadWrite_readLinesOnto($0, $1, $2, $3, $4) {
6765
6917
  }
6766
6918
  };
6767
6919
  const $26 = {a1: $27, a2: a => $2f => ({h: 1, a1: $2f}), a3: $31};
6768
- const $25 = {a1: $26, a2: csegen_278(), a3: csegen_279()};
6920
+ const $25 = {a1: $26, a2: csegen_247(), a3: csegen_248()};
6769
6921
  const $40 = b => a => func => $41 => {
6770
6922
  switch($41.h) {
6771
6923
  case 0: return {h: 0, a1: $41.a1};
@@ -7121,63 +7273,63 @@ function System_Node_system($0, $1) {
7121
7273
  return $0.a2(undefined)($7 => System_Node_prim__system($1, $7));
7122
7274
  }
7123
7275
 
7124
- function Reviewer_with__scoredReviewersx2czipReviewsx2ccalc_1698($0, $1, $2, $3, $4, $5, $6, $7, $8, $9, $a, $b, $c, $d, $e) {
7276
+ function Reviewer_with__scoredReviewersx2czipReviewsx2ccalc_1758($0, $1, $2, $3, $4, $5, $6, $7, $8, $9, $a, $b, $c, $d, $e) {
7125
7277
  switch($c.h) {
7126
7278
  case 0: return ($e+$d);
7127
7279
  case 1: return Prelude_Types_prim__integerToNat(($e-$d));
7128
7280
  }
7129
7281
  }
7130
7282
 
7131
- function Reviewer_n__5324_2083_yellowDot($0, $1, $2, $3, $4) {
7283
+ function Reviewer_n__5330_2143_yellowDot($0, $1, $2, $3, $4) {
7132
7284
  return Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_color(3), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('\u{b7}'));
7133
7285
  }
7134
7286
 
7135
- function Reviewer_n__4747_1531_weightReviews($0, $1, $2, $3, $4, $5) {
7287
+ function Reviewer_n__4753_1591_weightReviews($0, $1, $2, $3, $4, $5) {
7136
7288
  const $6 = Data_List_groupAllWith($0, $a => $a, $5);
7137
7289
  const $10 = xs => {
7138
7290
  const $11 = (Prelude_Types_List_lengthTR(Data_List1_forget(xs))*$4);
7139
7291
  return {a1: xs.a1, a2: $11, a3: $11};
7140
7292
  };
7141
- return Prelude_Interfaces_x3cx26x3e(csegen_119(), $6, $10);
7293
+ return Prelude_Interfaces_x3cx26x3e(csegen_118(), $6, $10);
7142
7294
  }
7143
7295
 
7144
- function Reviewer_n__4747_1532_sortx27($0, $1, $2, $3, $4) {
7296
+ function Reviewer_n__4753_1592_sortx27($0, $1, $2, $3, $4) {
7145
7297
  return Data_List_sortBy($7 => $8 => Prelude_Basics_on($b => $c => Prelude_EqOrd_compare_Ord_Integer($b, $c), $11 => $11.a3, $7, $8), $4);
7146
7298
  }
7147
7299
 
7148
- function Reviewer_n__5324_2084_redDot($0, $1, $2, $3, $4) {
7300
+ function Reviewer_n__5330_2144_redDot($0, $1, $2, $3, $4) {
7149
7301
  return Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_color(1), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('\u{25e6}'));
7150
7302
  }
7151
7303
 
7152
- function Reviewer_n__5324_2085_header($0, $1, $2, $3, $4) {
7153
- return Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('Weighted review workload.'), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('4x the numbewr of open review requests'), Text_PrettyPrint_Prettyprinter_Symbols_parens(Reviewer_n__5324_2083_yellowDot($0, $1, $2, $3, $4))), a2: {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(Reviewer_n__5324_2084_redDot($0, $1, $2, $3, $4))), a2: {a1: Text_PrettyPrint_Prettyprinter_Symbols_parens(Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Reviewer_n__5324_2084_redDot($0, $1, $2, $3, $4), Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('overlayed on'), Reviewer_n__5324_2083_yellowDot($0, $1, $2, $3, $4)))), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {h: 0}}}}}}}});
7304
+ function Reviewer_n__5330_2145_header($0, $1, $2, $3, $4) {
7305
+ return Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('Weighted review workload.'), a2: {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(Reviewer_n__5330_2143_yellowDot($0, $1, $2, $3, $4))), a2: {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(Reviewer_n__5330_2144_redDot($0, $1, $2, $3, $4))), a2: {a1: Text_PrettyPrint_Prettyprinter_Symbols_parens(Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Reviewer_n__5330_2144_redDot($0, $1, $2, $3, $4), Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('overlayed on'), Reviewer_n__5330_2143_yellowDot($0, $1, $2, $3, $4)))), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {h: 0}}}}}}}});
7154
7306
  }
7155
7307
 
7156
- function Reviewer_n__5324_2087_graphOne($0, $1, $2, $3, $4, $5, $6) {
7308
+ function Reviewer_n__5330_2147_graphOne($0, $1, $2, $3, $4, $5, $6) {
7157
7309
  const $8 = Prelude_Types_prim__integerToNat(($5-$6.a2));
7158
7310
  const $d = Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_italic(), $1.a1(undefined)($6.a1));
7159
7311
  const $17 = Prelude_Types_prim__integerToNat(($6.a2-$6.a3));
7160
7312
  const $1c = Prelude_Types_prim__integerToNat(($5-$6.a3));
7161
- return Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Reviewer_n__5324_2086_bar($0, $1, $2, $3, $4, $8, $6.a3, Prelude_Types_min_Ord_Nat($1c, $17)), $d);
7313
+ return Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Reviewer_n__5330_2146_bar($0, $1, $2, $3, $4, $8, $6.a3, Prelude_Types_min_Ord_Nat($1c, $17)), $d);
7162
7314
  }
7163
7315
 
7164
- function Reviewer_n__5324_2088_graph($0, $1, $2, $3, $4, $5, $6) {
7165
- return Text_PrettyPrint_Prettyprinter_Doc_vsep(Prelude_Types_map_Functor_List($b => Reviewer_n__5324_2087_graphOne($0, $1, $2, $3, $4, $5, $b), $6));
7316
+ function Reviewer_n__5330_2148_graph($0, $1, $2, $3, $4, $5, $6) {
7317
+ return Text_PrettyPrint_Prettyprinter_Doc_vsep(Prelude_Types_map_Functor_List($b => Reviewer_n__5330_2147_graphOne($0, $1, $2, $3, $4, $5, $b), $6));
7166
7318
  }
7167
7319
 
7168
- function Reviewer_n__4774_1688_calc($0, $1, $2, $3, $4, $5, $6, $7, $8, $9, $a, $b, $c, $d) {
7169
- return Reviewer_with__scoredReviewersx2czipReviewsx2ccalc_1698(undefined, $0, $1, $2, $3, $4, $5, $6, $8, $9, $a, $b, $a, $d, $c);
7320
+ function Reviewer_n__4780_1748_calc($0, $1, $2, $3, $4, $5, $6, $7, $8, $9, $a, $b, $c, $d) {
7321
+ return Reviewer_with__scoredReviewersx2czipReviewsx2ccalc_1758(undefined, $0, $1, $2, $3, $4, $5, $6, $8, $9, $a, $b, $a, $d, $c);
7170
7322
  }
7171
7323
 
7172
- function Reviewer_n__5324_2086_bar($0, $1, $2, $3, $4, $5, $6, $7) {
7324
+ function Reviewer_n__5330_2146_bar($0, $1, $2, $3, $4, $5, $6, $7) {
7173
7325
  return Text_PrettyPrint_Prettyprinter_Doc_indent(Prelude_Cast_cast_Cast_Nat_Int($5), Text_PrettyPrint_Prettyprinter_Doc_hcat({a1: Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_color(1), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(Data_String_replicate($7, '\u{25e6}'))), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_color(3), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(Data_String_replicate($6, '\u{b7}'))), a2: {h: 0}}}));
7174
7326
  }
7175
7327
 
7176
7328
  function Reviewer_scoredReviewers($0, $1, $2, $3) {
7177
- const $4 = Reviewer_n__4747_1531_weightReviews($0, $3, $2, $1, 1n, $1);
7178
- const $c = Reviewer_n__4747_1531_weightReviews($0, $3, $2, $1, 4n, $2);
7179
- const $14 = Reviewer_n__4747_1536_zipReviews($0, $3, $2, $1, $c, $4, {h: 1, a1: $0, a2: $3, a3: $2, a4: $1}, 0);
7180
- return Reviewer_n__4747_1532_sortx27($0, $3, $2, $1, Reviewer_n__4747_1536_zipReviews($0, $3, $2, $1, $14, Reviewer_n__4747_1531_weightReviews($0, $3, $2, $1, 0n, $3), {h: 0, a1: $0, a2: $3, a3: $2, a4: $1}, 1));
7329
+ const $4 = Reviewer_n__4753_1591_weightReviews($0, $3, $2, $1, 1n, $1);
7330
+ const $c = Reviewer_n__4753_1591_weightReviews($0, $3, $2, $1, 4n, $2);
7331
+ const $14 = Reviewer_n__4753_1596_zipReviews($0, $3, $2, $1, $c, $4, {h: 1, a1: $0, a2: $3, a3: $2, a4: $1}, 0);
7332
+ return Reviewer_n__4753_1592_sortx27($0, $3, $2, $1, Reviewer_n__4753_1596_zipReviews($0, $3, $2, $1, $14, Reviewer_n__4753_1591_weightReviews($0, $3, $2, $1, 0n, $3), {h: 0, a1: $0, a2: $3, a3: $2, a4: $1}, 1));
7181
7333
  }
7182
7334
 
7183
7335
  function Reviewer_reviewsGraph($0, $1, $2, $3, $4) {
@@ -7197,8 +7349,8 @@ function Reviewer_reviewsGraph($0, $1, $2, $3, $4) {
7197
7349
  break;
7198
7350
  }
7199
7351
  }
7200
- const $28 = Reviewer_n__5324_2088_graph($0, $1, $4, $3, $2, $2f, $5);
7201
- const $1f = Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29(Reviewer_n__5324_2085_header($0, $1, $4, $3, $2), $28);
7352
+ const $28 = Reviewer_n__5330_2148_graph($0, $1, $4, $3, $2, $2f, $5);
7353
+ const $1f = Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29(Reviewer_n__5330_2145_header($0, $1, $4, $3, $2), $28);
7202
7354
  return Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29($1f, Text_PrettyPrint_Prettyprinter_Doc_line());
7203
7355
  }
7204
7356
  }
@@ -7222,7 +7374,7 @@ function Reviewer_chooseReviewers($0, $1, $2, $3, $4, $5) {
7222
7374
  case 0: return {h: 0};
7223
7375
  case undefined: {
7224
7376
  const $1a = Data_List_takeWhile($1d => (($1d.a3===$12.a1.a3)?1:0), $12.a2);
7225
- const $22 = Prelude_Interfaces_x3cx24x3e(csegen_119(), $27 => Reviewer_loginScore($27), $1a);
7377
+ const $22 = Prelude_Interfaces_x3cx24x3e(csegen_118(), $27 => Reviewer_loginScore($27), $1a);
7226
7378
  return {a1: {a1: $12.a1.a1, a2: $12.a1.a3}, a2: $22};
7227
7379
  }
7228
7380
  }
@@ -7279,11 +7431,11 @@ function FFI_GitHub_octokit($0) {
7279
7431
  }
7280
7432
 
7281
7433
  function FFI_GitHub_listTeams($0, $1) {
7282
- return Prelude_Interfaces_x3cx24x3e(csegen_103(), $6 => Data_String_lines($6), $a => $b => FFI_promiseIO($e => $f => $10 => FFI_GitHub_prim__listTeams($0, $1, $e, $f, $10), $a, $b));
7434
+ return Prelude_Interfaces_x3cx24x3e(csegen_102(), $6 => Data_String_lines($6), $a => $b => FFI_promiseIO($e => $f => $10 => FFI_GitHub_prim__listTeams($0, $1, $e, $f, $10), $a, $b));
7283
7435
  }
7284
7436
 
7285
7437
  function FFI_GitHub_listTeamMembers($0, $1, $2) {
7286
- return Prelude_Interfaces_x3cx24x3e(csegen_103(), $7 => Data_String_lines($7), $b => $c => FFI_promiseIO($f => $10 => $11 => FFI_GitHub_prim__listTeamMembers($0, $1, $2, $f, $10, $11), $b, $c));
7438
+ return Prelude_Interfaces_x3cx24x3e(csegen_102(), $7 => Data_String_lines($7), $b => $c => FFI_promiseIO($f => $10 => $11 => FFI_GitHub_prim__listTeamMembers($0, $1, $2, $f, $10, $11), $b, $c));
7287
7439
  }
7288
7440
 
7289
7441
  function FFI_GitHub_listPullReviewsJsonStr($0, $1, $2, $3, $4, $5) {
@@ -7306,11 +7458,11 @@ function FFI_GitHub_listPRsForBranch($0, $1, $2, $3) {
7306
7458
  }
7307
7459
 
7308
7460
  function FFI_GitHub_listOrgMembers($0, $1) {
7309
- return Prelude_Interfaces_x3cx24x3e(csegen_103(), $6 => Data_String_lines($6), $a => $b => FFI_promiseIO($e => $f => $10 => FFI_GitHub_prim__listOrgMembers($0, $1, $e, $f, $10), $a, $b));
7461
+ return Prelude_Interfaces_x3cx24x3e(csegen_102(), $6 => Data_String_lines($6), $a => $b => FFI_promiseIO($e => $f => $10 => FFI_GitHub_prim__listOrgMembers($0, $1, $e, $f, $10), $a, $b));
7310
7462
  }
7311
7463
 
7312
7464
  function FFI_GitHub_listMyTeams($0) {
7313
- return Prelude_Interfaces_x3cx24x3e(csegen_103(), $5 => Data_String_lines($5), $9 => $a => FFI_promiseIO($d => $e => $f => FFI_GitHub_prim__listMyTeams($0, $d, $e, $f), $9, $a));
7465
+ return Prelude_Interfaces_x3cx24x3e(csegen_102(), $5 => Data_String_lines($5), $9 => $a => FFI_promiseIO($d => $e => $f => FFI_GitHub_prim__listMyTeams($0, $d, $e, $f), $9, $a));
7314
7466
  }
7315
7467
 
7316
7468
  function FFI_GitHub_getUser($0) {
@@ -7326,7 +7478,7 @@ function FFI_GitHub_getRepoDefaultBranch($0, $1, $2, $3, $4) {
7326
7478
  }
7327
7479
 
7328
7480
  function FFI_GitHub_createPR($0, $1, $2, $3, $4, $5, $6) {
7329
- return Prelude_Interfaces_x3dx3cx3c(csegen_15(), $b => $c => $d => Data_Promise_either(csegen_115(), Data_PullRequest_parsePullRequestString($b), $c, $d), $17 => $18 => FFI_promiseIO($1b => $1c => $1d => FFI_GitHub_prim__createPR($0, $1, $2, $3, $4, $5, $6, $1b, $1c, $1d), $17, $18));
7481
+ return Prelude_Interfaces_x3dx3cx3c(csegen_15(), $b => $c => $d => Data_Promise_either(csegen_114(), Data_PullRequest_parsePullRequestString($b), $c, $d), $17 => $18 => FFI_promiseIO($1b => $1c => $1d => FFI_GitHub_prim__createPR($0, $1, $2, $3, $4, $5, $6, $1b, $1c, $1d), $17, $18));
7330
7482
  }
7331
7483
 
7332
7484
  function FFI_GitHub_createComment($0, $1, $2, $3, $4, $5, $6) {
@@ -7334,7 +7486,7 @@ function FFI_GitHub_createComment($0, $1, $2, $3, $4, $5, $6) {
7334
7486
  }
7335
7487
 
7336
7488
  function FFI_GitHub_addPullReviewers($0, $1, $2, $3, $4, $5) {
7337
- return Prelude_Interfaces_x3cx24x3e(csegen_103(), $a => Data_String_lines($a), $e => $f => FFI_promiseIO($12 => $13 => $14 => FFI_GitHub_prim__addPullReviewers($0, $1, $2, $3, Data_String_Extra_join(',', csegen_77(), $4), Data_String_Extra_join(',', csegen_77(), $5), $12, $13, $14), $e, $f));
7489
+ return Prelude_Interfaces_x3cx24x3e(csegen_102(), $a => Data_String_lines($a), $e => $f => FFI_promiseIO($12 => $13 => $14 => FFI_GitHub_prim__addPullReviewers($0, $1, $2, $3, Data_String_Extra_join(',', csegen_77(), $4), Data_String_Extra_join(',', csegen_77(), $5), $12, $13, $14), $e, $f));
7338
7490
  }
7339
7491
 
7340
7492
  function FFI_promiseIO($0, $1, $2) {
@@ -7412,8 +7564,8 @@ function Data_User_parseUserString($0) {
7412
7564
  }
7413
7565
  };
7414
7566
  const $3 = {a1: $4, a2: a => $c => ({h: 1, a1: $c}), a3: $e};
7415
- const $2 = {a1: $3, a2: csegen_278(), a3: csegen_279()};
7416
- return Prelude_Interfaces_x3ex3dx3e($2, csegen_280(), $1f => Data_User_parseUser($1f), $0);
7567
+ const $2 = {a1: $3, a2: csegen_247(), a3: csegen_248()};
7568
+ return Prelude_Interfaces_x3ex3dx3e($2, csegen_249(), $1f => Data_User_parseUser($1f), $0);
7417
7569
  }
7418
7570
 
7419
7571
  function Data_User_parseUser($0) {
@@ -7460,7 +7612,7 @@ function Data_Review_parseReview($0) {
7460
7612
  }
7461
7613
  };
7462
7614
  const $20 = {a1: $21, a2: a => $29 => ({h: 1, a1: $29}), a3: $2b};
7463
- const $1f = {a1: $20, a2: csegen_278(), a3: csegen_279()};
7615
+ const $1f = {a1: $20, a2: csegen_247(), a3: csegen_248()};
7464
7616
  const $1d = Prelude_Interfaces_x3dx3cx3c($1f, $3a => Data_Review_parseState($3a), Language_JSON_Accessors_string($12.a2.a1));
7465
7617
  const $40 = state => {
7466
7618
  const $46 = b => a => func => $47 => {
@@ -7481,7 +7633,7 @@ function Data_Review_parseReview($0) {
7481
7633
  }
7482
7634
  };
7483
7635
  const $45 = {a1: $46, a2: a => $4e => ({h: 1, a1: $4e}), a3: $50};
7484
- const $44 = {a1: $45, a2: csegen_278(), a3: csegen_279()};
7636
+ const $44 = {a1: $45, a2: csegen_247(), a3: csegen_248()};
7485
7637
  const $42 = Prelude_Interfaces_x3dx3cx3c($44, $5f => Data_Review_parseDateTime($5f), Language_JSON_Accessors_string($12.a2.a2.a1));
7486
7638
  return Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29($42, submittedAt => ({h: 1, a1: {a1: submittedAt, a2: author, a3: state}}));
7487
7639
  };
@@ -7734,8 +7886,8 @@ function Data_PullRequest_parsePullRequestsString($0) {
7734
7886
  }
7735
7887
  };
7736
7888
  const $3 = {a1: $4, a2: a => $c => ({h: 1, a1: $c}), a3: $e};
7737
- const $2 = {a1: $3, a2: csegen_278(), a3: csegen_279()};
7738
- return Prelude_Interfaces_x3ex3dx3e($2, csegen_280(), csegen_437(), $0);
7889
+ const $2 = {a1: $3, a2: csegen_247(), a3: csegen_248()};
7890
+ return Prelude_Interfaces_x3ex3dx3e($2, csegen_249(), csegen_437(), $0);
7739
7891
  }
7740
7892
 
7741
7893
  function Data_PullRequest_parsePullRequestString($0) {
@@ -7757,8 +7909,8 @@ function Data_PullRequest_parsePullRequestString($0) {
7757
7909
  }
7758
7910
  };
7759
7911
  const $3 = {a1: $4, a2: a => $c => ({h: 1, a1: $c}), a3: $e};
7760
- const $2 = {a1: $3, a2: csegen_278(), a3: csegen_279()};
7761
- return Prelude_Interfaces_x3ex3dx3e($2, csegen_280(), $1f => Data_PullRequest_parsePR($1f), $0);
7912
+ const $2 = {a1: $3, a2: csegen_247(), a3: csegen_248()};
7913
+ return Prelude_Interfaces_x3ex3dx3e($2, csegen_249(), $1f => Data_PullRequest_parsePR($1f), $0);
7762
7914
  }
7763
7915
 
7764
7916
  function Data_PullRequest_parsePR($0) {
@@ -7784,7 +7936,7 @@ function Data_PullRequest_parsePR($0) {
7784
7936
  }
7785
7937
  };
7786
7938
  const $2e = {a1: $2f, a2: a => $37 => ({h: 1, a1: $37}), a3: $39};
7787
- const $2d = {a1: $2e, a2: csegen_278(), a3: csegen_279()};
7939
+ const $2d = {a1: $2e, a2: csegen_247(), a3: csegen_248()};
7788
7940
  const $2b = Prelude_Interfaces_x3dx3cx3c($2d, $48 => Data_PullRequest_parseState($48), Language_JSON_Accessors_string($18.a2.a2.a1));
7789
7941
  const $4e = state => {
7790
7942
  const $54 = b => a => func => $55 => {
@@ -7805,7 +7957,7 @@ function Data_PullRequest_parsePR($0) {
7805
7957
  }
7806
7958
  };
7807
7959
  const $53 = {a1: $54, a2: a => $5c => ({h: 1, a1: $5c}), a3: $5e};
7808
- const $52 = {a1: $53, a2: csegen_278(), a3: csegen_279()};
7960
+ const $52 = {a1: $53, a2: csegen_247(), a3: csegen_248()};
7809
7961
  const $50 = Prelude_Interfaces_x3dx3cx3c($52, $6d => Data_PullRequest_parseDateTime($6d), Language_JSON_Accessors_string($18.a2.a2.a2.a1));
7810
7962
  return Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29($50, createdAt => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_array($78 => Language_JSON_Accessors_string($78), $18.a2.a2.a2.a2.a1), reviewers => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_string($18.a2.a2.a2.a2.a2.a1), headRef => ({h: 1, a1: {a1: number, a2: createdAt, a3: author, a4: state, a5: reviewers, a6: headRef}}))));
7811
7963
  };
@@ -7832,7 +7984,7 @@ function Data_PullRequest_isAuthor($0, $1) {
7832
7984
  return Prelude_EqOrd_x3dx3d_Eq_String($1.a3, $0);
7833
7985
  }
7834
7986
 
7835
- function FFI_Git_case__remoteTrackingBranch_1746($0, $1, $2) {
7987
+ function FFI_Git_case__remoteTrackingBranch_1782($0, $1, $2) {
7836
7988
  switch($1) {
7837
7989
  case '': {
7838
7990
  switch($2.h) {
@@ -7848,18 +8000,26 @@ function FFI_Git_userEmail($0, $1, $2) {
7848
8000
  return FFI_promiseIO($5 => $6 => $7 => FFI_Git_prim__userEmail($0, $5, $6, $7), $1, $2);
7849
8001
  }
7850
8002
 
8003
+ function FFI_Git_rootDir($0, $1, $2) {
8004
+ return FFI_promiseIO($5 => $6 => $7 => FFI_Git_prim__rootDir($0, $5, $6, $7), $1, $2);
8005
+ }
8006
+
7851
8007
  function FFI_Git_remoteURI($0, $1, $2, $3) {
7852
8008
  return FFI_promiseIO($6 => $7 => $8 => FFI_Git_prim__remoteURI($0, $1, $6, $7, $8), $2, $3);
7853
8009
  }
7854
8010
 
7855
8011
  function FFI_Git_remoteTrackingBranch($0, $1, $2) {
7856
- return Data_Promise_x3ex3ex3d_Monad_Promise($5 => $6 => FFI_promiseIO($9 => $a => $b => FFI_Git_prim__remoteTrackingBranch($0, $9, $a, $b), $5, $6), str => $14 => $15 => Data_Promise_pure_Applicative_Promise(FFI_Git_case__remoteTrackingBranch_1746($0, str, Data_String_strM(str)), $14, $15), $1, $2);
8012
+ return Data_Promise_x3ex3ex3d_Monad_Promise($5 => $6 => FFI_promiseIO($9 => $a => $b => FFI_Git_prim__remoteTrackingBranch($0, $9, $a, $b), $5, $6), str => $14 => $15 => Data_Promise_pure_Applicative_Promise(FFI_Git_case__remoteTrackingBranch_1782($0, str, Data_String_strM(str)), $14, $15), $1, $2);
7857
8013
  }
7858
8014
 
7859
8015
  function FFI_Git_pushNewBranch($0, $1, $2, $3, $4) {
7860
8016
  return Data_Promise_map_Functor_Promise($7 => (undefined), $9 => $a => FFI_promiseIO($d => $e => $f => FFI_Git_prim__pushNewBranch($0, $1, $2, $d, $e, $f), $9, $a), $3, $4);
7861
8017
  }
7862
8018
 
8019
+ function FFI_Git_listRemotes($0) {
8020
+ return Prelude_Interfaces_x3cx24x3e(csegen_102(), $5 => Data_String_lines($5), $9 => $a => FFI_promiseIO($d => $e => $f => FFI_Git_prim__listRemotes($0, $d, $e, $f), $9, $a));
8021
+ }
8022
+
7863
8023
  function FFI_Git_git($0) {
7864
8024
  return Prelude_Interfaces_x3cx24x3e($0.a1.a1.a1, $7 => $7, $0.a2(undefined)($e => FFI_Git_prim__git($e)));
7865
8025
  }
@@ -7885,7 +8045,7 @@ function FFI_Concurrency_promiseAll($0, $1, $2, $3) {
7885
8045
  default: return Data_Promise_reject(Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Expected a JSON array from futures but got ', a2: {a1: Language_JSON_Data_show_Show_JSON($3d), a2: {a1: '.', a2: {h: 0}}}}), $3e, $3f);
7886
8046
  }
7887
8047
  };
7888
- return Data_Promise_x3ex3ex3d_Monad_Promise($25 => $26 => Data_Promise_either(csegen_115(), Data_Either_maybeToEither(() => Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Failed to parse JSON from ', a2: {a1: str, a2: {h: 0}}}), Language_JSON_parse(str)), $25, $26), $3c, $21, $22);
8048
+ return Data_Promise_x3ex3ex3d_Monad_Promise($25 => $26 => Data_Promise_either(csegen_114(), Data_Either_maybeToEither(() => Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Failed to parse JSON from ', a2: {a1: str, a2: {h: 0}}}), Language_JSON_parse(str)), $25, $26), $3c, $21, $22);
7889
8049
  };
7890
8050
  return Data_Promise_x3ex3ex3d_Monad_Promise($10 => $11 => Data_Promise_promisify(ok => err => $14 => FFI_Concurrency_prim__awaitStringify(f, x => ok(x), y => err(y), $14), $10, $11), $20, $c, $d);
7891
8051
  };
@@ -7935,7 +8095,7 @@ function Data_Pagination_with__lemma_5493($0, $1, $2, $3, $4) {
7935
8095
  }
7936
8096
 
7937
8097
  function Data_Pagination_toList_Foldable_x28x28x28Paginationx20x24itemsx29x20x24perPagex29x20x24pagex29($0) {
7938
- return Data_Pagination_foldr_Foldable_x28x28x28Paginationx20x24itemsx29x20x24perPagex29x20x24pagex29(csegen_226(), {h: 0}, $0);
8098
+ return Data_Pagination_foldr_Foldable_x28x28x28Paginationx20x24itemsx29x20x24perPagex29x20x24pagex29(csegen_192(), {h: 0}, $0);
7939
8099
  }
7940
8100
 
7941
8101
  function Data_Pagination_null_Foldable_x28x28x28Paginationx20x24itemsx29x20x24perPagex29x20x24pagex29($0) {
@@ -7950,7 +8110,7 @@ function Data_Pagination_foldr_Foldable_x28x28x28Paginationx20x24itemsx29x20x24p
7950
8110
  }
7951
8111
 
7952
8112
  function Data_Pagination_foldl_Foldable_x28x28x28Paginationx20x24itemsx29x20x24perPagex29x20x24pagex29($0, $1, $2) {
7953
- return Data_Pagination_foldr_Foldable_x28x28x28Paginationx20x24itemsx29x20x24perPagex29x20x24pagex29($6 => $7 => Prelude_Basics_flip(csegen_227(), $c => Prelude_Basics_flip($0, $6, $c), $7), $13 => $13, $2)($1);
8113
+ return Data_Pagination_foldr_Foldable_x28x28x28Paginationx20x24itemsx29x20x24perPagex29x20x24pagex29($6 => $7 => Prelude_Basics_flip(csegen_193(), $c => Prelude_Basics_flip($0, $6, $c), $7), $13 => $13, $2)($1);
7954
8114
  }
7955
8115
 
7956
8116
  function Data_Pagination_foldlM_Foldable_x28x28x28Paginationx20x24itemsx29x20x24perPagex29x20x24pagex29($0, $1, $2, $3) {
@@ -8042,7 +8202,7 @@ function System_getEnv($0, $1) {
8042
8202
  function System_getArgs($0) {
8043
8203
  const $12 = n => {
8044
8204
  switch(Prelude_EqOrd_x3e_Ord_Int(n, Number(_truncBigInt32(0n)))) {
8045
- case 1: return Prelude_Interfaces_for($0.a1.a1, {a1: b => a => func => $1e => Prelude_Types_map_Functor_List(func, $1e), a2: csegen_77(), a3: b => a => f => $25 => $26 => $27 => Prelude_Types_traverse_Traversable_List($25, $26, $27)}, Prelude_Types_rangeFromTo_Range_x24a({a1: {a1: csegen_516(), a2: $33 => $34 => Prelude_Num_div_Integral_Int($33, $34), a3: $39 => $3a => Prelude_Num_mod_Integral_Int($39, $3a)}, a2: {a1: csegen_294(), a2: {a1: csegen_516(), a2: $45 => _sub32s(0, $45), a3: $49 => $4a => _sub32s($49, $4a)}}}, 0, _sub32s(n, 1)), $52 => $0.a2(undefined)($58 => System_prim__getArg($52, $58)));
8205
+ case 1: return Prelude_Interfaces_for($0.a1.a1, {a1: b => a => func => $1e => Prelude_Types_map_Functor_List(func, $1e), a2: csegen_77(), a3: b => a => f => $25 => $26 => $27 => Prelude_Types_traverse_Traversable_List($25, $26, $27)}, Prelude_Types_rangeFromTo_Range_x24a({a1: {a1: csegen_516(), a2: $33 => $34 => Prelude_Num_div_Integral_Int($33, $34), a3: $39 => $3a => Prelude_Num_mod_Integral_Int($39, $3a)}, a2: {a1: csegen_263(), a2: {a1: csegen_516(), a2: $45 => _sub32s(0, $45), a3: $49 => $4a => _sub32s($49, $4a)}}}, 0, _sub32s(n, 1)), $52 => $0.a2(undefined)($58 => System_prim__getArg($52, $58)));
8046
8206
  case 0: return $0.a1.a1.a2(undefined)({h: 0});
8047
8207
  }
8048
8208
  };
@@ -8064,59 +8224,59 @@ function System_exitFailure($0) {
8064
8224
  return System_exitWith($0, {a1: 1, a2: undefined});
8065
8225
  }
8066
8226
 
8067
- function Help_n__4274_1021_subcommand($0, $1) {
8068
- return Help_n__4274_1019_maybeDecorate($0, $5 => Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_color(5), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String($5)), $1);
8227
+ function Help_n__4301_1021_subcommand($0, $1) {
8228
+ return Help_n__4301_1019_maybeDecorate($0, $5 => Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_color(5), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String($5)), $1);
8069
8229
  }
8070
8230
 
8071
- function Help_n__4274_1024_shell($0, $1) {
8072
- return Help_n__4274_1019_maybeDecorate($0, $5 => Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_italic(), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String($5)), $1);
8231
+ function Help_n__4301_1024_shell($0, $1) {
8232
+ return Help_n__4301_1019_maybeDecorate($0, $5 => Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_italic(), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String($5)), $1);
8073
8233
  }
8074
8234
 
8075
- function Help_n__4274_1020_option($0, $1) {
8076
- return Help_n__4274_1019_maybeDecorate($0, $5 => Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_bold(), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String($5)), $1);
8235
+ function Help_n__4301_1020_option($0, $1) {
8236
+ return Help_n__4301_1019_maybeDecorate($0, $5 => Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_bold(), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String($5)), $1);
8077
8237
  }
8078
8238
 
8079
- function Help_n__4274_1019_maybeDecorate($0, $1, $2) {
8239
+ function Help_n__4301_1019_maybeDecorate($0, $1, $2) {
8080
8240
  switch($0) {
8081
8241
  case 1: return Text_PrettyPrint_Prettyprinter_Render_Terminal_renderString(Text_PrettyPrint_Prettyprinter_Doc_layoutPretty(Text_PrettyPrint_Prettyprinter_Doc_defaultLayoutOptions(), $1($2)));
8082
8242
  case 0: return $2;
8083
8243
  }
8084
8244
  }
8085
8245
 
8086
- function Help_n__4274_1023_heading($0, $1) {
8087
- return Help_n__4274_1019_maybeDecorate($0, $5 => Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_underline(), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String($5)), $1);
8246
+ function Help_n__4301_1023_heading($0, $1) {
8247
+ return Help_n__4301_1019_maybeDecorate($0, $5 => Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_underline(), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String($5)), $1);
8088
8248
  }
8089
8249
 
8090
- function Help_n__4274_1022_argument($0, $1) {
8091
- return Help_n__4274_1019_maybeDecorate($0, csegen_405(), $1);
8250
+ function Help_n__4301_1022_argument($0, $1) {
8251
+ return Help_n__4301_1019_maybeDecorate($0, csegen_405(), $1);
8092
8252
  }
8093
8253
 
8094
8254
  function Help_help($0) {
8095
- return Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'harmony ', a2: {a1: Help_n__4274_1021_subcommand($0, '<subcommand>'), a2: {a1: '\n\n', a2: {a1: Help_n__4274_1023_heading($0, 'Subcommands'), a2: {a1: ':\n ', a2: {a1: Help_n__4274_1021_subcommand($0, 'help'), a2: {a1: '\n - Print help\n ', a2: {a1: Help_n__4274_1021_subcommand($0, 'version'), a2: {a1: '\n - Print version\n ', a2: {a1: Help_n__4274_1021_subcommand($0, 'config'), a2: {a1: ' {', a2: {a1: Help_n__4274_1022_argument($0, '<property>'), a2: {a1: '} [', a2: {a1: Help_n__4274_1022_argument($0, '<value>'), a2: {a1: ']\n - Get or set the value of a configuration property. Not all properties\n can be set and read via this subcommand.\n ', a2: {a1: Help_n__4274_1022_argument($0, 'properties'), a2: {a1: ': ', a2: {a1: Data_String_Extra_join(', ', csegen_77(), Prelude_Interfaces_x3cx24x3e(csegen_119(), $4b => Help_n__4274_1020_option($0, $4b), Data_Config_settableProps())), a2: {a1: '.\n ', a2: {a1: Help_n__4274_1021_subcommand($0, 'sync'), a2: {a1: '\n - Synchronize local config with information from GitHub.\n ', a2: {a1: Help_n__4274_1021_subcommand($0, 'branch'), a2: {a1: '\n - Print the GitHub URI for the currently checked out branch.\n ', a2: {a1: Help_n__4274_1021_subcommand($0, 'pr'), a2: {a1: '\n - Identify an existing PR or create a new one for the current branch.\n ', a2: {a1: Help_n__4274_1021_subcommand($0, 'contribute'), a2: {a1: ' [', a2: {a1: Help_n__4274_1022_argument($0, '-c/--checkout'), a2: {a1: '] [', a2: {a1: Help_n__4274_1022_argument($0, '-<num>'), a2: {a1: ']\n - Contribute to an open PR. Prints a URL. Prioritizes PRs you are\n requested to review but will also return other PRs.\n ', a2: {a1: Help_n__4274_1021_subcommand($0, 'whoami'), a2: {a1: '\n - Print information about the configured and authenticated user.\n ', a2: {a1: Help_n__4274_1021_subcommand($0, 'reflect'), a2: {a1: '\n - Reflect on the current state of ones own PRs and review requests.\n ', a2: {a1: Help_n__4274_1021_subcommand($0, 'list'), a2: {a1: ' {', a2: {a1: Help_n__4274_1022_argument($0, '<team-slug>'), a2: {a1: '}\n - List the members of the given GitHub Team.\n ', a2: {a1: Help_n__4274_1021_subcommand($0, 'graph'), a2: {a1: ' {', a2: {a1: Help_n__4274_1022_argument($0, '<team-slug>'), a2: {a1: '}\n - Graph the relative review workload of the members of the given GitHub Team.\n ', a2: {a1: Help_n__4274_1021_subcommand($0, 'assign'), a2: {a1: ' {', a2: {a1: Help_n__4274_1022_argument($0, '<team-slug>'), a2: {a1: ' | ', a2: {a1: Help_n__4274_1022_argument($0, '+<user-login>'), a2: {a1: '} [...]\n - Assign the given team(s) and one lucky member from one of those teams\n to review the PR for the current branch.\n \n Also assign any users with logins specified. You specify these\n additional users by prefixing their logins with \'+\'.\n \n', a2: {a1: Help_n__4274_1023_heading($0, 'Bash Completion'), a2: {a1: ':\n You can set up bash completion by adding the following to your resource\n or bash profile:\n \n ', a2: {a1: Help_n__4274_1024_shell($0, 'eval \"$(harmony --bash-completion-script)\"'), a2: {a1: '\n \n Zsh users will also need to have the following in their resource or\n zsh profile before the above eval:\n \n ', a2: {a1: Help_n__4274_1024_shell($0, 'autoload -U +X compinit && compinit'), a2: {a1: '\n ', a2: {a1: Help_n__4274_1024_shell($0, 'autoload -U +X bashcompinit && bashcompinit'), a2: {a1: '\n ', a2: {h: 0}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}});
8255
+ return Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'harmony ', a2: {a1: Help_n__4301_1021_subcommand($0, '<subcommand>'), a2: {a1: '\n\n', a2: {a1: Help_n__4301_1023_heading($0, 'Subcommands'), a2: {a1: ':\n ', a2: {a1: Help_n__4301_1021_subcommand($0, 'help'), a2: {a1: '\n - Print help\n ', a2: {a1: Help_n__4301_1021_subcommand($0, 'version'), a2: {a1: '\n - Print version\n ', a2: {a1: Help_n__4301_1021_subcommand($0, 'config'), a2: {a1: ' {', a2: {a1: Help_n__4301_1022_argument($0, '<property>'), a2: {a1: '} [', a2: {a1: Help_n__4301_1022_argument($0, '<value>'), a2: {a1: ']\n - Get or set the value of a configuration property. Not all properties\n can be set and read via this subcommand.\n ', a2: {a1: Help_n__4301_1022_argument($0, 'properties'), a2: {a1: ': ', a2: {a1: Data_String_Extra_join(', ', csegen_77(), Prelude_Interfaces_x3cx24x3e(csegen_118(), $4b => Help_n__4301_1020_option($0, $4b), Data_Config_settableProps())), a2: {a1: '.\n ', a2: {a1: Help_n__4301_1021_subcommand($0, 'sync'), a2: {a1: '\n - Synchronize local config with information from GitHub.\n ', a2: {a1: Help_n__4301_1021_subcommand($0, 'branch'), a2: {a1: '\n - Print the GitHub URI for the currently checked out branch.\n ', a2: {a1: Help_n__4301_1021_subcommand($0, 'pr'), a2: {a1: '\n - Identify an existing PR or create a new one for the current branch.\n ', a2: {a1: Help_n__4301_1021_subcommand($0, 'contribute'), a2: {a1: ' [', a2: {a1: Help_n__4301_1022_argument($0, '-c/--checkout'), a2: {a1: '] [', a2: {a1: Help_n__4301_1022_argument($0, '-<num>'), a2: {a1: ']\n - Contribute to an open PR. Prints a URL. Prioritizes PRs you are\n requested to review but will also return other PRs.\n ', a2: {a1: Help_n__4301_1021_subcommand($0, 'whoami'), a2: {a1: '\n - Print information about the configured and authenticated user.\n ', a2: {a1: Help_n__4301_1021_subcommand($0, 'reflect'), a2: {a1: '\n - Reflect on the current state of ones own PRs and review requests.\n ', a2: {a1: Help_n__4301_1021_subcommand($0, 'list'), a2: {a1: ' {', a2: {a1: Help_n__4301_1022_argument($0, '<team-slug>'), a2: {a1: '}\n - List the members of the given GitHub Team.\n ', a2: {a1: Help_n__4301_1021_subcommand($0, 'graph'), a2: {a1: ' {', a2: {a1: Help_n__4301_1022_argument($0, '<team-slug>'), a2: {a1: '}\n - Graph the relative review workload of the members of the given GitHub Team.\n ', a2: {a1: Help_n__4301_1021_subcommand($0, 'assign'), a2: {a1: ' {', a2: {a1: Help_n__4301_1022_argument($0, '<team-slug>'), a2: {a1: ' | ', a2: {a1: Help_n__4301_1022_argument($0, '+<user-login>'), a2: {a1: '} [...]\n - Assign the given team(s) and one lucky member from one of those teams\n to review the PR for the current branch.\n \n Also assign any users with logins specified. You specify these\n additional users by prefixing their logins with \'+\'.\n \n', a2: {a1: Help_n__4301_1023_heading($0, 'Bash Completion'), a2: {a1: ':\n You can set up bash completion by adding the following to your resource\n or bash profile:\n \n ', a2: {a1: Help_n__4301_1024_shell($0, 'eval \"$(harmony --bash-completion-script)\"'), a2: {a1: '\n \n Zsh users will also need to have the following in their resource or\n zsh profile before the above eval:\n \n ', a2: {a1: Help_n__4301_1024_shell($0, 'autoload -U +X compinit && compinit'), a2: {a1: '\n ', a2: {a1: Help_n__4301_1024_shell($0, 'autoload -U +X bashcompinit && bashcompinit'), a2: {a1: '\n ', a2: {h: 0}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}});
8096
8256
  }
8097
8257
 
8098
- function Config_with__getConfig_5595($0, $1, $2, $3, $4) {
8258
+ function Config_with__getConfig_5738($0, $1, $2, $3, $4) {
8099
8259
  switch($1.h) {
8100
8260
  case 0: return Data_Promise_reject(Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: $0, a2: {a1: ' cannot get read via `config` command.', a2: {h: 0}}}), $3, $4);
8101
8261
  case undefined: return Data_Promise_pure_Applicative_Promise($1.a1($2), $3, $4);
8102
8262
  }
8103
8263
  }
8104
8264
 
8105
- function Config_with__withx20blockx20inx20setConfig_5494($0, $1, $2, $3, $4, $5) {
8265
+ function Config_with__withx20blockx20inx20setConfig_5592($0, $1, $2, $3, $4, $5) {
8106
8266
  switch($3.h) {
8107
8267
  case 0: return $7 => Data_Promise_reject(Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: $2, a2: {a1: ' is not a valid value for ', a2: {a1: $4, a2: {a1: '.', a2: {h: 0}}}}}), $5, $7);
8108
8268
  case undefined: return $1a => Config_writeConfig($3.a1, $5, $1a);
8109
8269
  }
8110
8270
  }
8111
8271
 
8112
- function Config_with__setConfig_5466($0, $1, $2, $3) {
8272
+ function Config_with__setConfig_5564($0, $1, $2, $3) {
8113
8273
  switch($1.h) {
8114
8274
  case 0: return $5 => $6 => Data_Promise_reject(Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: $0, a2: {a1: ' cannot be set via `config` command.', a2: {h: 0}}}), $5, $6);
8115
- case undefined: return $15 => Config_with__withx20blockx20inx20setConfig_5494($1.a1, $3, $2, $1.a1($3)($2), $0, $15);
8275
+ case undefined: return $15 => Config_with__withx20blockx20inx20setConfig_5592($1.a1, $3, $2, $1.a1($3)($2), $0, $15);
8116
8276
  }
8117
8277
  }
8118
8278
 
8119
- function Config_with__propSettersx2cparseBool_5272($0, $1) {
8279
+ function Config_with__propSettersx2cparseBool_5274($0, $1) {
8120
8280
  switch($1) {
8121
8281
  case 'yes': return {a1: 1};
8122
8282
  case 'true': return {a1: 1};
@@ -8126,14 +8286,14 @@ function Config_with__propSettersx2cparseBool_5272($0, $1) {
8126
8286
  }
8127
8287
  }
8128
8288
 
8129
- function Config_with__dropPrefixx27x2cdropx27_5088($0, $1, $2) {
8289
+ function Config_with__dropPrefixx27x2cdropx27_5090($0, $1, $2) {
8130
8290
  switch($2.h) {
8131
8291
  case 0: return {a1: $2.a1.a1};
8132
8292
  case 1: return {h: 0};
8133
8293
  }
8134
8294
  }
8135
8295
 
8136
- function Config_case__parseGitHubURIx2cparseSuffix_5148($0, $1, $2) {
8296
+ function Config_case__parseGitHubURIx2cparseSuffix_5150($0, $1, $2) {
8137
8297
  const $e = $f => {
8138
8298
  switch($f.h) {
8139
8299
  case undefined: {
@@ -8153,7 +8313,7 @@ function Config_case__parseGitHubURIx2cparseSuffix_5148($0, $1, $2) {
8153
8313
  return Prelude_Types_x3ex3ex3d_Monad_Maybe({a1: Data_String_split($9 => Prelude_EqOrd_x3dx3d_Eq_Char($9, '/'), $2.a1)}, $e);
8154
8314
  }
8155
8315
 
8156
- function Config_n__5884_5646_yesUnlessNo($0, $1, $2, $3, $4) {
8316
+ function Config_n__6080_5820_yesUnlessNo($0, $1, $2, $3, $4) {
8157
8317
  switch($4) {
8158
8318
  case 'n': return 0;
8159
8319
  case 'N': return 0;
@@ -8161,35 +8321,35 @@ function Config_n__5884_5646_yesUnlessNo($0, $1, $2, $3, $4) {
8161
8321
  }
8162
8322
  }
8163
8323
 
8164
- function Config_n__5528_5264_update($0, $1, $2, $3, $4) {
8324
+ function Config_n__5561_5266_update($0, $1, $2, $3, $4) {
8165
8325
  return $0(undefined)(undefined)($c => Prelude_Basics_flip($2, $3, $c))($1($4));
8166
8326
  }
8167
8327
 
8168
- function Config_n__5884_5648_repo($0, $1, $2, $3, $4) {
8328
+ function Config_n__6080_5822_repo($0, $1, $2, $3, $4) {
8169
8329
  return Prelude_Types_map_Functor_Maybe(csegen_531(), $4);
8170
8330
  }
8171
8331
 
8172
- function Config_n__5396_5127_parseSuffix($0, $1) {
8173
- return Config_case__parseGitHubURIx2cparseSuffix_5148($0, $1, Data_String_break$($8 => Prelude_EqOrd_x3dx3d_Eq_Char($8, '.'), $1));
8332
+ function Config_n__5429_5129_parseSuffix($0, $1) {
8333
+ return Config_case__parseGitHubURIx2cparseSuffix_5150($0, $1, Data_String_break$($8 => Prelude_EqOrd_x3dx3d_Eq_Char($8, '.'), $1));
8174
8334
  }
8175
8335
 
8176
- function Config_n__5396_5129_parseSSH($0, $1) {
8177
- return Prelude_Interfaces_x3ex3dx3e(csegen_42(), $6 => Config_dropPrefixx27('git@github.com:', $6), $b => Config_n__5396_5127_parseSuffix($0, $b), $1);
8336
+ function Config_n__5429_5131_parseSSH($0, $1) {
8337
+ return Prelude_Interfaces_x3ex3dx3e(csegen_42(), $6 => Config_dropPrefixx27('git@github.com:', $6), $b => Config_n__5429_5129_parseSuffix($0, $b), $1);
8178
8338
  }
8179
8339
 
8180
- function Config_n__5396_5128_parseHTTPS($0, $1) {
8181
- return Prelude_Interfaces_x3ex3dx3e(csegen_42(), $6 => Config_dropPrefixx27('https://github/com/', $6), $b => Config_n__5396_5127_parseSuffix($0, $b), $1);
8340
+ function Config_n__5429_5130_parseHTTPS($0, $1) {
8341
+ return Prelude_Interfaces_x3ex3dx3e(csegen_42(), $6 => Config_dropPrefixx27('https://github/com/', $6), $b => Config_n__5429_5129_parseSuffix($0, $b), $1);
8182
8342
  }
8183
8343
 
8184
- function Config_n__5528_5263_parseBool($0) {
8185
- return Config_with__propSettersx2cparseBool_5272($0, Data_String_toLower($0));
8344
+ function Config_n__5561_5265_parseBool($0) {
8345
+ return Config_with__propSettersx2cparseBool_5274($0, Data_String_toLower($0));
8186
8346
  }
8187
8347
 
8188
- function Config_n__5884_5647_org($0, $1, $2, $3, $4) {
8348
+ function Config_n__6080_5821_org($0, $1, $2, $3, $4) {
8189
8349
  return Prelude_Types_map_Functor_Maybe(csegen_535(), $4);
8190
8350
  }
8191
8351
 
8192
- function Config_n__5884_5645_orIfEmpty($0, $1, $2, $3, $4, $5) {
8352
+ function Config_n__6080_5819_orIfEmpty($0, $1, $2, $3, $4, $5) {
8193
8353
  switch($4.h) {
8194
8354
  case 0: return $5;
8195
8355
  case undefined: {
@@ -8201,20 +8361,20 @@ function Config_n__5884_5645_orIfEmpty($0, $1, $2, $3, $4, $5) {
8201
8361
  }
8202
8362
  }
8203
8363
 
8204
- function Config_n__5222_4962_oneDayAgo($0, $1, $2) {
8364
+ function Config_n__5255_4964_oneDayAgo($0, $1, $2) {
8205
8365
  return $2.a1.a2(undefined)(undefined)(System_time($2))(now => $2.a1.a1.a2(undefined)(Prelude_Cast_cast_Cast_Integer_Bits32((now-86400n))));
8206
8366
  }
8207
8367
 
8208
- function Config_n__5884_5649_enterForDefaultStr($0, $1, $2, $3, $4) {
8368
+ function Config_n__6080_5823_enterForDefaultStr($0, $1, $2, $3, $4) {
8209
8369
  return Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: ' (ENTER for default: ', a2: {a1: $4, a2: {a1: ')', a2: {h: 0}}}});
8210
8370
  }
8211
8371
 
8212
- function Config_n__5349_5080_dropx27($0, $1) {
8213
- return Config_with__dropPrefixx27x2cdropx27_5088($0, $1, Data_List_PrefixSuffix_dropPrefix($8 => $9 => Decidable_Equality_decEq_DecEq_Char($8, $9), Prelude_Types_fastUnpack($0), $1));
8372
+ function Config_n__5382_5082_dropx27($0, $1) {
8373
+ return Config_with__dropPrefixx27x2cdropx27_5090($0, $1, Data_List_PrefixSuffix_dropPrefix($8 => $9 => Decidable_Equality_decEq_DecEq_Char($8, $9), Prelude_Types_fastUnpack($0), $1));
8214
8374
  }
8215
8375
 
8216
- function Config_n__5884_5650_defaultStr($0, $1, $2, $3, $4, $5) {
8217
- return Data_Maybe_fromMaybe(() => '', Prelude_Types_map_Functor_Maybe($b => Config_n__5884_5649_enterForDefaultStr($0, $1, $2, $3, $4($b)), $5));
8376
+ function Config_n__6080_5824_defaultStr($0, $1, $2, $3, $4, $5) {
8377
+ return Data_Maybe_fromMaybe(() => '', Prelude_Types_map_Functor_Maybe($b => Config_n__6080_5823_enterForDefaultStr($0, $1, $2, $3, $4($b)), $5));
8218
8378
  }
8219
8379
 
8220
8380
  function Config_show_Show_ConfigError($0) {
@@ -8241,15 +8401,15 @@ function Config_syncIfOld($0, $1, $2, $3) {
8241
8401
  case 0: return $1a => Data_Promise_pure_Applicative_Promise($1, $d, $1a);
8242
8402
  }
8243
8403
  };
8244
- return Data_Promise_x3ex3ex3d_Monad_Promise(Config_n__5222_4962_oneDayAgo($0, $1, csegen_21()), $b, $2, $3);
8404
+ return Data_Promise_x3ex3ex3d_Monad_Promise(Config_n__5255_4964_oneDayAgo($0, $1, csegen_21()), $b, $2, $3);
8245
8405
  }
8246
8406
 
8247
8407
  function Config_syncConfig($0, $1, $2, $3, $4) {
8248
8408
  const $b = teamSlugs => $c => $d => {
8249
8409
  const $14 = orgMembers => $15 => $16 => {
8250
8410
  const $1a = updatedAt => {
8251
- const $1b = {a1: updatedAt, a2: $0.a2, a3: $0.a3, a4: $0.a4, a5: $0.a5, a6: $0.a6, a7: teamSlugs, a8: orgMembers, a9: $0.a9};
8252
- return Prelude_Interfaces_x3ex3e(csegen_15(), $2a => $2b => Data_Promise_map_Functor_Promise($2e => (undefined), $30 => $31 => Config_writeConfig($1b, $30, $31), $2a, $2b), () => Prelude_Interfaces_x3ex3e(csegen_15(), Prelude_Interfaces_when(csegen_9(), $2, () => Prelude_Interfaces_x3ex3e(csegen_15(), Prelude_IO_putStrLn(csegen_21(), 'Your updated configuration is:'), () => Prelude_IO_printLn(csegen_542(), $0))), () => $50 => $51 => Data_Promise_pure_Applicative_Promise($1b, $50, $51)));
8411
+ const $1b = {a1: updatedAt, a2: $0.a2, a3: $0.a3, a4: $0.a4, a5: $0.a5, a6: $0.a6, a7: $0.a7, a8: teamSlugs, a9: orgMembers, a10: $0.a10, a11: $0.a11};
8412
+ return Prelude_Interfaces_x3ex3e(csegen_15(), $2c => $2d => Data_Promise_map_Functor_Promise($30 => (undefined), $32 => $33 => Config_writeConfig($1b, $32, $33), $2c, $2d), () => Prelude_Interfaces_x3ex3e(csegen_15(), Prelude_Interfaces_when(csegen_9(), $2, () => Prelude_Interfaces_x3ex3e(csegen_15(), Prelude_IO_putStrLn(csegen_21(), 'Your updated configuration is:'), () => Prelude_IO_printLn(csegen_542(), $0))), () => $52 => $53 => Data_Promise_pure_Applicative_Promise($1b, $52, $53)));
8253
8413
  };
8254
8414
  return Data_Promise_x3ex3ex3d_Monad_Promise(csegen_538(), $1a, $15, $16);
8255
8415
  };
@@ -8259,19 +8419,27 @@ function Config_syncConfig($0, $1, $2, $3, $4) {
8259
8419
  }
8260
8420
 
8261
8421
  function Config_setConfig($0, $1, $2) {
8262
- return Config_with__setConfig_5466($1, Data_List_lookup(csegen_94(), $1, Config_propSetters()), $2, $0);
8422
+ return Config_with__setConfig_5564($1, Data_List_lookup(csegen_94(), $1, Config_propSetters()), $2, $0);
8263
8423
  }
8264
8424
 
8265
8425
  const Config_propSetters = __lazy(function () {
8266
- return {a1: {a1: 'assignTeams', a2: $3 => $4 => Config_n__5528_5264_update(csegen_18(), $9 => Config_n__5528_5263_parseBool($9), b => $d => ({a1: $d.a1, a2: $d.a2, a3: $d.a3, a4: $d.a4, a5: b, a6: $d.a6, a7: $d.a7, a8: $d.a8, a9: $d.a9}), $3, $4)}, a2: {a1: {a1: 'commentOnAssign', a2: $1e => $1f => Config_n__5528_5264_update(csegen_18(), $24 => Config_n__5528_5263_parseBool($24), b => $28 => ({a1: $28.a1, a2: $28.a2, a3: $28.a3, a4: $28.a4, a5: $28.a5, a6: b, a7: $28.a7, a8: $28.a8, a9: $28.a9}), $1e, $1f)}, a2: {h: 0}}};
8426
+ return {a1: {a1: 'assignTeams', a2: $3 => $4 => Config_n__5561_5266_update(csegen_18(), $9 => Config_n__5561_5265_parseBool($9), b => $d => ({a1: $d.a1, a2: $d.a2, a3: $d.a3, a4: $d.a4, a5: $d.a5, a6: b, a7: $d.a7, a8: $d.a8, a9: $d.a9, a10: $d.a10, a11: $d.a11}), $3, $4)}, a2: {a1: {a1: 'commentOnAssign', a2: $20 => $21 => Config_n__5561_5266_update(csegen_18(), $26 => Config_n__5561_5265_parseBool($26), b => $2a => ({a1: $2a.a1, a2: $2a.a2, a3: $2a.a3, a4: $2a.a4, a5: $2a.a5, a6: $2a.a6, a7: b, a8: $2a.a8, a9: $2a.a9, a10: $2a.a10, a11: $2a.a11}), $20, $21)}, a2: {a1: {a1: 'defaultRemote', a2: $3d => $3e => Config_n__5561_5266_update(csegen_18(), $43 => ({a1: $43}), s => $46 => ({a1: $46.a1, a2: $46.a2, a3: $46.a3, a4: {a1: s}, a5: $46.a5, a6: $46.a6, a7: $46.a7, a8: $46.a8, a9: $46.a9, a10: $46.a10, a11: $46.a11}), $3d, $3e)}, a2: {a1: {a1: 'githubPAT', a2: $5a => $5b => Config_n__5561_5266_update(csegen_18(), $60 => ({a1: $60}), s => $63 => ({a1: $63.a1, a2: $63.a2, a3: $63.a3, a4: $63.a4, a5: $63.a5, a6: $63.a6, a7: $63.a7, a8: $63.a8, a9: $63.a9, a10: {a1: s}, a11: $63.a11}), $5a, $5b)}, a2: {h: 0}}}}};
8267
8427
  });
8268
8428
 
8269
8429
  const Config_propGetters = __lazy(function () {
8270
- return {a1: {a1: 'assignTeams', a2: $3 => Prelude_Show_show_Show_Bool($3.a5)}, a2: {a1: {a1: 'commentOnAssign', a2: $b => Prelude_Show_show_Show_Bool($b.a6)}, a2: {h: 0}}};
8430
+ return {a1: {a1: 'assignTeams', a2: $3 => Prelude_Show_show_Show_Bool($3.a6)}, a2: {a1: {a1: 'commentOnAssign', a2: $b => Prelude_Show_show_Show_Bool($b.a7)}, a2: {a1: {a1: 'defaultRemote', a2: $13 => Prelude_Types_maybe(() => 'Not set (defaults to \"origin\")', () => $17 => Prelude_Show_show_Show_String($17), $13.a4)}, a2: {a1: {a1: 'githubPAT', a2: $20 => Prelude_Types_maybe(() => 'Not set (will use $GITHUB_PAT environment variable)', () => $24 => Data_Config_show_Show_x28Hiddenx20x24ax29($24), $20.a10)}, a2: {h: 0}}}}};
8271
8431
  });
8272
8432
 
8433
+ function Config_preferOriginRemote($0) {
8434
+ const $1 = Data_List_find($4 => Prelude_EqOrd_x3dx3d_Eq_String($4, 'origin'), $0);
8435
+ switch($1.h) {
8436
+ case undefined: return $1.a1;
8437
+ case 0: return Data_Maybe_fromMaybe(() => 'origin', Data_List_headx27($0));
8438
+ }
8439
+ }
8440
+
8273
8441
  function Config_parseGitHubURI($0) {
8274
- return Prelude_Types_x3cx7cx3e_Alternative_Maybe(Config_n__5396_5128_parseHTTPS($0, $0), () => Config_n__5396_5129_parseSSH($0, $0));
8442
+ return Prelude_Types_x3cx7cx3e_Alternative_Maybe(Config_n__5429_5130_parseHTTPS($0, $0), () => Config_n__5429_5131_parseSSH($0, $0));
8275
8443
  }
8276
8444
 
8277
8445
  function Config_loadOrCreateConfig($0, $1, $2, $3, $4, $5) {
@@ -8314,7 +8482,7 @@ function Config_loadConfig($0, $1, $2) {
8314
8482
  }
8315
8483
  };
8316
8484
  const $a = {a1: $b, a2: a => $13 => ({h: 1, a1: $13}), a3: $15};
8317
- const $9 = {a1: $a, a2: csegen_278(), a3: csegen_279()};
8485
+ const $9 = {a1: $a, a2: csegen_247(), a3: csegen_248()};
8318
8486
  const $24 = b => a => func => $25 => {
8319
8487
  switch($25.h) {
8320
8488
  case 0: return {h: 0, a1: $25.a1};
@@ -8363,7 +8531,7 @@ function Config_loadConfig($0, $1, $2) {
8363
8531
  }
8364
8532
 
8365
8533
  function Config_getConfig($0, $1, $2) {
8366
- return $3 => Config_with__getConfig_5595($1, Data_List_lookup(csegen_94(), $1, Config_propGetters()), $0, $2, $3);
8534
+ return $3 => Config_with__getConfig_5738($1, Data_List_lookup(csegen_94(), $1, Config_propGetters()), $0, $2, $3);
8367
8535
  }
8368
8536
 
8369
8537
  function Config_findConfig($0, $1, $2) {
@@ -8383,41 +8551,73 @@ function Config_findConfig($0, $1, $2) {
8383
8551
  }
8384
8552
 
8385
8553
  function Config_dropPrefixx27($0, $1) {
8386
- return Prelude_Types_map_Functor_Maybe($4 => Prelude_Types_fastPack($4), Config_n__5349_5080_dropx27($0, Prelude_Types_fastUnpack($1)));
8554
+ return Prelude_Types_map_Functor_Maybe($4 => Prelude_Types_fastPack($4), Config_n__5382_5082_dropx27($0, Prelude_Types_fastUnpack($1)));
8387
8555
  }
8388
8556
 
8389
8557
  function Config_createConfig($0, $1, $2, $3) {
8390
- return Prelude_Interfaces_x3ex3e(csegen_15(), Prelude_IO_putStrLn(csegen_21(), Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Creating a new configuration (storing in ', a2: {a1: Data_Config_filename(), a2: {a1: ')...', a2: {h: 0}}}})), () => $1a => $1b => {
8391
- const $3a = defaultOrgAndRepo => {
8392
- const $3b = Config_n__5884_5650_defaultStr($0, $1, $3, $2, csegen_535(), defaultOrgAndRepo);
8393
- return Prelude_Interfaces_x3ex3e(csegen_15(), Prelude_IO_putStrLn(csegen_21(), Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'What GitHub org would you like to use harmony for', a2: {a1: $3b, a2: {a1: '?', a2: {h: 0}}}})), () => $59 => $5a => {
8394
- const $73 = org => {
8395
- const $74 = Config_n__5884_5650_defaultStr($0, $1, $3, $2, csegen_531(), defaultOrgAndRepo);
8396
- return Prelude_Interfaces_x3ex3e(csegen_15(), Prelude_IO_putStrLn(csegen_21(), Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'What repository would you like to use harmony for', a2: {a1: $74, a2: {a1: '?', a2: {h: 0}}}})), () => $92 => $93 => Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Interfaces_x3cx24x3e(csegen_103(), $9a => Config_n__5884_5645_orIfEmpty($0, $1, $3, $2, Config_n__5884_5648_repo($0, $1, $3, $2, defaultOrgAndRepo), Data_String_trim($9a)), csegen_407()), repo => Prelude_Interfaces_x3ex3e(csegen_15(), Prelude_IO_putStr(csegen_21(), 'Would you like harmony to comment when it assigns reviewers? [Y/n] '), () => $b6 => $b7 => Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Interfaces_x3cx24x3e(csegen_103(), $be => Config_n__5884_5646_yesUnlessNo($0, $1, $3, $2, Data_String_trim($be)), csegen_407()), commentOnAssign => Prelude_Interfaces_x3ex3e(csegen_15(), Prelude_IO_putStr(csegen_21(), 'Would you like harmony to assign teams in addition to individuals when it assigns reviewers? [Y/n] '), () => $d3 => $d4 => Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Interfaces_x3cx24x3e(csegen_103(), $db => Config_n__5884_5646_yesUnlessNo($0, $1, $3, $2, Data_String_trim($db)), csegen_407()), assignTeams => Prelude_Interfaces_x3ex3e(csegen_15(), Prelude_IO_putStrLn(csegen_21(), 'Creating config...'), () => $f0 => $f1 => {
8397
- const $fc = mainBranch => $fd => $fe => {
8398
- const $102 = updatedAt => {
8399
- const $103 = {a1: Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: './', a2: {a1: Data_Config_filename(), a2: {h: 0}}}), a2: $2, a3: $3};
8400
- return $112 => $113 => {
8401
- const $119 = teamSlugs => $11a => $11b => {
8402
- const $121 = orgMembers => {
8403
- const $122 = {a1: updatedAt, a2: org, a3: repo, a4: mainBranch, a5: assignTeams, a6: commentOnAssign, a7: teamSlugs, a8: orgMembers, a9: $103};
8404
- return Prelude_Interfaces_x3ex3e(csegen_15(), $130 => $131 => Data_Promise_map_Functor_Promise($134 => (undefined), $136 => $137 => Config_writeConfig($122, $136, $137), $130, $131), () => Prelude_Interfaces_x3ex3e(csegen_15(), Prelude_IO_putStrLn(csegen_21(), 'Your new configuration is:'), () => Prelude_Interfaces_x3ex3e(csegen_15(), Prelude_IO_printLn(csegen_542(), $122), () => $151 => $152 => Data_Promise_pure_Applicative_Promise($122, $151, $152))));
8558
+ const $19 = () => {
8559
+ const $23 = Config_n__6080_5823_enterForDefaultStr($0, $3, $2, $1, 'unset');
8560
+ const $22 = () => Prelude_Interfaces_x3ex3e(csegen_15(), Prelude_IO_putStr(csegen_21(), Data_String_fastUnlines({a1: 'Harmony uses a GitHub Personal Access Token (PAT) to communicate with GitHub.', a2: {a1: 'You can set this via the $GITHUB_PAT environment variable or a config property.', a2: {a1: 'If you don\'t set in your config now, you can set later with `harmony config githubPAT abcdefg`.', a2: {a1: 'The ENV var will always take precedence over the config property.', a2: {a1: '', a2: {a1: Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'What PAT would you like to set in the config file', a2: {a1: $23, a2: {a1: '?', a2: {h: 0}}}}), a2: {h: 0}}}}}}})), () => $4d => $4e => {
8561
+ const $54 = $55 => {
8562
+ switch(Data_String_trim($55)) {
8563
+ case '': return {h: 0};
8564
+ default: return {a1: Data_String_trim($55)};
8565
+ }
8566
+ };
8567
+ const $50 = Prelude_Interfaces_x3cx24x3e(csegen_102(), $54, csegen_407());
8568
+ const $5e = configPAT => $5f => $60 => {
8569
+ const $6c = $6d => $6e => $6f => {
8570
+ switch($6d.h) {
8571
+ case undefined: {
8572
+ const $7d = remoteGuess => $7e => $7f => {
8573
+ const $9e = defaultOrgAndRepo => {
8574
+ const $9f = Config_n__6080_5824_defaultStr($0, $3, $2, $1, csegen_535(), defaultOrgAndRepo);
8575
+ return Prelude_Interfaces_x3ex3e(csegen_15(), Prelude_IO_putStrLn(csegen_21(), Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'What GitHub org would you like to use harmony for', a2: {a1: $9f, a2: {a1: '?', a2: {h: 0}}}})), () => $bd => $be => {
8576
+ const $d7 = org => {
8577
+ const $d8 = Config_n__6080_5824_defaultStr($0, $3, $2, $1, csegen_531(), defaultOrgAndRepo);
8578
+ return Prelude_Interfaces_x3ex3e(csegen_15(), Prelude_IO_putStrLn(csegen_21(), Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'What repository would you like to use harmony for', a2: {a1: $d8, a2: {a1: '?', a2: {h: 0}}}})), () => $f6 => $f7 => {
8579
+ const $110 = repo => {
8580
+ const $111 = Config_n__6080_5823_enterForDefaultStr($0, $3, $2, $1, remoteGuess);
8581
+ return Prelude_Interfaces_x3ex3e(csegen_15(), Prelude_IO_putStrLn(csegen_21(), Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'What GitHub remote repo would you like to use harmony for', a2: {a1: $111, a2: {a1: '?', a2: {h: 0}}}})), () => $12d => $12e => Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Interfaces_x3cx24x3e(csegen_102(), $135 => ({a1: Config_n__6080_5819_orIfEmpty($0, $3, $2, $1, {a1: remoteGuess}, Data_String_trim($135))}), csegen_407()), defaultRemote => Prelude_Interfaces_x3ex3e(csegen_15(), Prelude_IO_putStr(csegen_21(), 'Would you like harmony to comment when it assigns reviewers? [Y/n] '), () => $14d => $14e => Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Interfaces_x3cx24x3e(csegen_102(), $155 => Config_n__6080_5820_yesUnlessNo($0, $3, $2, $1, Data_String_trim($155)), csegen_407()), commentOnAssign => Prelude_Interfaces_x3ex3e(csegen_15(), Prelude_IO_putStr(csegen_21(), 'Would you like harmony to assign teams in addition to individuals when it assigns reviewers? [Y/n] '), () => $16a => $16b => Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Interfaces_x3cx24x3e(csegen_102(), $172 => Config_n__6080_5820_yesUnlessNo($0, $3, $2, $1, Data_String_trim($172)), csegen_407()), assignTeams => $17e => $17f => Data_Promise_x3ex3ex3d_Monad_Promise($182 => $183 => $184 => Data_Promise_liftIO_HasIO_Promise(FFI_GitHub_octokit($6d.a1), $182, $183, $184), _ => Prelude_Interfaces_x3ex3e(csegen_15(), Prelude_IO_putStrLn(csegen_21(), 'Creating config...'), () => $196 => $197 => {
8582
+ const $1a2 = mainBranch => $1a3 => $1a4 => {
8583
+ const $1a8 = updatedAt => {
8584
+ const $1a9 = {a1: Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: './', a2: {a1: Data_Config_filename(), a2: {h: 0}}}), a2: $2, a3: $3};
8585
+ return $1b8 => $1b9 => {
8586
+ const $1bf = teamSlugs => $1c0 => $1c1 => {
8587
+ const $1c7 = orgMembers => {
8588
+ const $1c8 = {a1: updatedAt, a2: org, a3: repo, a4: defaultRemote, a5: mainBranch, a6: assignTeams, a7: commentOnAssign, a8: teamSlugs, a9: orgMembers, a10: Prelude_Interfaces_x3cx24x3e(csegen_18(), $1d7 => $1d7, configPAT), a11: $1a9};
8589
+ return Prelude_Interfaces_x3ex3e(csegen_15(), $1de => $1df => Data_Promise_map_Functor_Promise($1e2 => (undefined), $1e4 => $1e5 => Config_writeConfig($1c8, $1e4, $1e5), $1de, $1df), () => Prelude_Interfaces_x3ex3e(csegen_15(), Prelude_IO_putStrLn(csegen_21(), 'Your new configuration is:'), () => Prelude_Interfaces_x3ex3e(csegen_15(), Prelude_IO_printLn(csegen_542(), $1c8), () => $1ff => $200 => Data_Promise_pure_Applicative_Promise($1c8, $1ff, $200))));
8590
+ };
8591
+ return Data_Promise_x3ex3ex3d_Monad_Promise(FFI_GitHub_listOrgMembers(_, org), $1c7, $1c0, $1c1);
8592
+ };
8593
+ return Data_Promise_x3ex3ex3d_Monad_Promise(FFI_GitHub_listTeams(_, org), $1bf, $1b8, $1b9);
8594
+ };
8595
+ };
8596
+ return Data_Promise_x3ex3ex3d_Monad_Promise(csegen_538(), $1a8, $1a3, $1a4);
8597
+ };
8598
+ return Data_Promise_x3ex3ex3d_Monad_Promise($19a => $19b => FFI_GitHub_getRepoDefaultBranch(_, org, repo, $19a, $19b), $1a2, $196, $197);
8599
+ }), $17e, $17f), $16a, $16b)), $14d, $14e)), $12d, $12e));
8600
+ };
8601
+ return Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Interfaces_x3cx24x3e(csegen_102(), $fe => Config_n__6080_5819_orIfEmpty($0, $3, $2, $1, Config_n__6080_5822_repo($0, $3, $2, $1, defaultOrgAndRepo), Data_String_trim($fe)), csegen_407()), $110, $f6, $f7);
8602
+ });
8405
8603
  };
8406
- return Data_Promise_x3ex3ex3d_Monad_Promise(FFI_GitHub_listOrgMembers($1, org), $121, $11a, $11b);
8407
- };
8408
- return Data_Promise_x3ex3ex3d_Monad_Promise(FFI_GitHub_listTeams($1, org), $119, $112, $113);
8604
+ return Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Interfaces_x3cx24x3e(csegen_102(), $c5 => Config_n__6080_5819_orIfEmpty($0, $3, $2, $1, Config_n__6080_5821_org($0, $3, $2, $1, defaultOrgAndRepo), Data_String_trim($c5)), csegen_407()), $d7, $bd, $be);
8605
+ });
8409
8606
  };
8607
+ return Data_Promise_x3ex3ex3d_Monad_Promise($82 => $83 => Data_Promise_x3cx7cx3e_Alternative_Promise(Prelude_Interfaces_x3cx24x3e(csegen_102(), $8a => Config_parseGitHubURI($8a), $8e => $8f => FFI_Git_remoteURI($0, remoteGuess, $8e, $8f)), () => $96 => $97 => Data_Promise_pure_Applicative_Promise({h: 0}, $96, $97), $82, $83), $9e, $7e, $7f);
8410
8608
  };
8411
- return Data_Promise_x3ex3ex3d_Monad_Promise(csegen_538(), $102, $fd, $fe);
8412
- };
8413
- return Data_Promise_x3ex3ex3d_Monad_Promise($f4 => $f5 => FFI_GitHub_getRepoDefaultBranch($1, org, repo, $f4, $f5), $fc, $f0, $f1);
8414
- }), $d3, $d4)), $b6, $b7)), $92, $93));
8609
+ return Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Interfaces_x3cx24x3e(csegen_102(), $77 => Config_preferOriginRemote($77), FFI_Git_listRemotes($0)), $7d, $6e, $6f);
8610
+ }
8611
+ default: return Data_Promise_reject('Either the GITHUB_PAT environment variable or githubPAT config property must be set to a personal access token.', $6e, $6f);
8612
+ }
8415
8613
  };
8416
- return Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Interfaces_x3cx24x3e(csegen_103(), $61 => Config_n__5884_5645_orIfEmpty($0, $1, $3, $2, Config_n__5884_5647_org($0, $1, $3, $2, defaultOrgAndRepo), Data_String_trim($61)), csegen_407()), $73, $59, $5a);
8417
- });
8418
- };
8419
- return Data_Promise_x3ex3ex3d_Monad_Promise($1e => $1f => Data_Promise_x3cx7cx3e_Alternative_Promise(Prelude_Interfaces_x3cx24x3e(csegen_103(), $26 => Config_parseGitHubURI($26), $2a => $2b => FFI_Git_remoteURI($0, 'origin', $2a, $2b)), () => $32 => $33 => Data_Promise_pure_Applicative_Promise({h: 0}, $32, $33), $1e, $1f), $3a, $1a, $1b);
8420
- });
8614
+ return Data_Promise_x3ex3ex3d_Monad_Promise($63 => $64 => Data_Promise_pure_Applicative_Promise(Prelude_Types_x3cx7cx3e_Alternative_Maybe($1, () => configPAT), $63, $64), $6c, $5f, $60);
8615
+ };
8616
+ return Data_Promise_x3ex3ex3d_Monad_Promise($50, $5e, $4d, $4e);
8617
+ });
8618
+ return Prelude_Interfaces_x3ex3e(csegen_15(), Prelude_IO_putStrLn(csegen_21(), ''), $22);
8619
+ };
8620
+ return Prelude_Interfaces_x3ex3e(csegen_15(), Prelude_IO_putStrLn(csegen_21(), Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Creating a new configuration (storing in ', a2: {a1: Data_Config_filename(), a2: {a1: ')...', a2: {h: 0}}}})), $19);
8421
8621
  }
8422
8622
 
8423
8623
  function Data_List_PrefixSuffix_with__withx20blockx20inx20dropPrefix_3662($0, $1, $2, $3, $4, $5) {
@@ -8458,10 +8658,10 @@ function Data_List_PrefixSuffix_dropPrefix($0, $1, $2) {
8458
8658
  }
8459
8659
  }
8460
8660
 
8461
- function BashCompletion_n__3745_1119_slugsOrLogins($0, $1, $2) {
8661
+ function BashCompletion_n__3772_1119_slugsOrLogins($0, $1, $2) {
8462
8662
  switch(Data_String_isPrefixOf('+', $1)) {
8463
- case 1: return Prelude_Interfaces_x3cx24x3e(csegen_119(), $b => ('+'+$b), $2.a8);
8464
- case 0: return $2.a7;
8663
+ case 1: return Prelude_Interfaces_x3cx24x3e(csegen_118(), $b => ('+'+$b), $2.a9);
8664
+ case 0: return $2.a8;
8465
8665
  }
8466
8666
  }
8467
8667
 
@@ -8481,14 +8681,14 @@ function BashCompletion_opts($0, $1, $2) {
8481
8681
  switch($1) {
8482
8682
  case '--': {
8483
8683
  switch($2) {
8484
- case 'list': return $0.a7;
8684
+ case 'list': return $0.a8;
8485
8685
  default: {
8486
8686
  switch($2) {
8487
- case 'list': return Prelude_Types_List_filter($15 => Data_String_isPrefixOf($1, $15), $0.a7);
8687
+ case 'list': return Prelude_Types_List_filter($15 => Data_String_isPrefixOf($1, $15), $0.a8);
8488
8688
  default: {
8489
8689
  switch($1) {
8490
- case '--': return $0.a7;
8491
- default: return Prelude_Types_List_filter($1f => Data_String_isPrefixOf($1, $1f), BashCompletion_n__3745_1119_slugsOrLogins($2, $1, $0));
8690
+ case '--': return $0.a8;
8691
+ default: return Prelude_Types_List_filter($1f => Data_String_isPrefixOf($1, $1f), BashCompletion_n__3772_1119_slugsOrLogins($2, $1, $0));
8492
8692
  }
8493
8693
  }
8494
8694
  }
@@ -8497,11 +8697,11 @@ function BashCompletion_opts($0, $1, $2) {
8497
8697
  }
8498
8698
  default: {
8499
8699
  switch($2) {
8500
- case 'list': return Prelude_Types_List_filter($2b => Data_String_isPrefixOf($1, $2b), $0.a7);
8700
+ case 'list': return Prelude_Types_List_filter($2b => Data_String_isPrefixOf($1, $2b), $0.a8);
8501
8701
  default: {
8502
8702
  switch($1) {
8503
- case '--': return $0.a7;
8504
- default: return Prelude_Types_List_filter($35 => Data_String_isPrefixOf($1, $35), BashCompletion_n__3745_1119_slugsOrLogins($2, $1, $0));
8703
+ case '--': return $0.a8;
8704
+ default: return Prelude_Types_List_filter($35 => Data_String_isPrefixOf($1, $35), BashCompletion_n__3772_1119_slugsOrLogins($2, $1, $0));
8505
8705
  }
8506
8706
  }
8507
8707
  }
@@ -8519,14 +8719,14 @@ function BashCompletion_opts($0, $1, $2) {
8519
8719
  switch($1) {
8520
8720
  case '--': {
8521
8721
  switch($2) {
8522
- case 'list': return $0.a7;
8722
+ case 'list': return $0.a8;
8523
8723
  default: {
8524
8724
  switch($2) {
8525
- case 'list': return Prelude_Types_List_filter($4d => Data_String_isPrefixOf($1, $4d), $0.a7);
8725
+ case 'list': return Prelude_Types_List_filter($4d => Data_String_isPrefixOf($1, $4d), $0.a8);
8526
8726
  default: {
8527
8727
  switch($1) {
8528
- case '--': return $0.a7;
8529
- default: return Prelude_Types_List_filter($57 => Data_String_isPrefixOf($1, $57), BashCompletion_n__3745_1119_slugsOrLogins($2, $1, $0));
8728
+ case '--': return $0.a8;
8729
+ default: return Prelude_Types_List_filter($57 => Data_String_isPrefixOf($1, $57), BashCompletion_n__3772_1119_slugsOrLogins($2, $1, $0));
8530
8730
  }
8531
8731
  }
8532
8732
  }
@@ -8535,11 +8735,11 @@ function BashCompletion_opts($0, $1, $2) {
8535
8735
  }
8536
8736
  default: {
8537
8737
  switch($2) {
8538
- case 'list': return Prelude_Types_List_filter($63 => Data_String_isPrefixOf($1, $63), $0.a7);
8738
+ case 'list': return Prelude_Types_List_filter($63 => Data_String_isPrefixOf($1, $63), $0.a8);
8539
8739
  default: {
8540
8740
  switch($1) {
8541
- case '--': return $0.a7;
8542
- default: return Prelude_Types_List_filter($6d => Data_String_isPrefixOf($1, $6d), BashCompletion_n__3745_1119_slugsOrLogins($2, $1, $0));
8741
+ case '--': return $0.a8;
8742
+ default: return Prelude_Types_List_filter($6d => Data_String_isPrefixOf($1, $6d), BashCompletion_n__3772_1119_slugsOrLogins($2, $1, $0));
8543
8743
  }
8544
8744
  }
8545
8745
  }
@@ -8569,7 +8769,7 @@ function BashCompletion_cmdOpts($0, $1) {
8569
8769
  switch($0) {
8570
8770
  case '-': {
8571
8771
  switch($1) {
8572
- case 'contribute': return csegen_567();
8772
+ case 'contribute': return csegen_577();
8573
8773
  default: {
8574
8774
  switch($1) {
8575
8775
  case 'contribute': {
@@ -8585,7 +8785,7 @@ function BashCompletion_cmdOpts($0, $1) {
8585
8785
  }
8586
8786
  case '--': {
8587
8787
  switch($1) {
8588
- case 'contribute': return csegen_567();
8788
+ case 'contribute': return csegen_577();
8589
8789
  default: {
8590
8790
  switch($1) {
8591
8791
  case 'contribute': {
@@ -8629,7 +8829,7 @@ function BashCompletion_cmdOpts($0, $1) {
8629
8829
  switch($0) {
8630
8830
  case '-': {
8631
8831
  switch($1) {
8632
- case 'contribute': return csegen_567();
8832
+ case 'contribute': return csegen_577();
8633
8833
  default: {
8634
8834
  switch($1) {
8635
8835
  case 'contribute': {
@@ -8645,7 +8845,7 @@ function BashCompletion_cmdOpts($0, $1) {
8645
8845
  }
8646
8846
  case '--': {
8647
8847
  switch($1) {
8648
- case 'contribute': return csegen_567();
8848
+ case 'contribute': return csegen_577();
8649
8849
  default: {
8650
8850
  switch($1) {
8651
8851
  case 'contribute': {
@@ -8686,7 +8886,7 @@ function AppVersion_printVersion($0) {
8686
8886
  }
8687
8887
 
8688
8888
  const AppVersion_appVersion = __lazy(function () {
8689
- return '0.7.0';
8889
+ return '1.1.0';
8690
8890
  });
8691
8891
 
8692
8892