@mattpolzin/harmony 4.0.0 → 4.0.1

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. package/harmony +124 -118
  2. package/package.json +7 -5
package/harmony CHANGED
@@ -871,7 +871,7 @@ function x24tcOpt_1($0) {
871
871
  case 0: return {h: 0 /* {TcDone:1} */, a1: $0.a5};
872
872
  default: {
873
873
  const $17 = {a1: $0.a5.a1.a1, a2: $0.a5.a1.a2, a3: $0.a5.a1.a3};
874
- const $1b = Data_List_DeleteBy_deleteByx27($1e => $1f => Prelude_Basics_on($22 => $23 => $0.a1.a1.a1($22)($23), csegen_590(), $1e, $1f), $17, $0.a6);
874
+ const $1b = Data_List_DeleteBy_deleteByx27($1e => $1f => Prelude_Basics_on($22 => $23 => $0.a1.a1.a1($22)($23), csegen_592(), $1e, $1f), $17, $0.a6);
875
875
  switch($1b.a1.h) {
876
876
  case 0: /* nothing */ {
877
877
  switch($0.a8) {
@@ -886,7 +886,7 @@ function x24tcOpt_1($0) {
886
886
  }
887
887
  default: {
888
888
  const $6a = {a1: $0.a5.a1.a1, a2: $0.a5.a1.a2, a3: $0.a5.a1.a3};
889
- const $6e = Data_List_DeleteBy_deleteByx27($71 => $72 => Prelude_Basics_on($75 => $76 => $0.a1.a1.a1($75)($76), csegen_590(), $71, $72), $6a, $0.a6);
889
+ const $6e = Data_List_DeleteBy_deleteByx27($71 => $72 => Prelude_Basics_on($75 => $76 => $0.a1.a1.a1($75)($76), csegen_592(), $71, $72), $6a, $0.a6);
890
890
  switch($6e.a1.h) {
891
891
  case 0: /* nothing */ {
892
892
  switch($0.a8) {
@@ -911,7 +911,7 @@ function x24tcOpt_1($0) {
911
911
  case 0: return {h: 0 /* {TcDone:1} */, a1: $0.a5};
912
912
  default: {
913
913
  const $c1 = {a1: $0.a5.a1.a1, a2: $0.a5.a1.a2, a3: $0.a5.a1.a3};
914
- const $c5 = Data_List_DeleteBy_deleteByx27($c8 => $c9 => Prelude_Basics_on($cc => $cd => $0.a1.a1.a1($cc)($cd), csegen_590(), $c8, $c9), $c1, $0.a6);
914
+ const $c5 = Data_List_DeleteBy_deleteByx27($c8 => $c9 => Prelude_Basics_on($cc => $cd => $0.a1.a1.a1($cc)($cd), csegen_592(), $c8, $c9), $c1, $0.a6);
915
915
  switch($c5.a1.h) {
916
916
  case 0: /* nothing */ {
917
917
  switch($0.a8) {
@@ -926,7 +926,7 @@ function x24tcOpt_1($0) {
926
926
  }
927
927
  default: {
928
928
  const $114 = {a1: $0.a5.a1.a1, a2: $0.a5.a1.a2, a3: $0.a5.a1.a3};
929
- const $118 = Data_List_DeleteBy_deleteByx27($11b => $11c => Prelude_Basics_on($11f => $120 => $0.a1.a1.a1($11f)($120), csegen_590(), $11b, $11c), $114, $0.a6);
929
+ const $118 = Data_List_DeleteBy_deleteByx27($11b => $11c => Prelude_Basics_on($11f => $120 => $0.a1.a1.a1($11f)($120), csegen_592(), $11b, $11c), $114, $0.a6);
930
930
  switch($118.a1.h) {
931
931
  case 0: /* nothing */ {
932
932
  switch($0.a8) {
@@ -2623,138 +2623,138 @@ const csegen_344 = __lazy(function () {
2623
2623
  return {a1: Help_argument(1, '<team-slug>'), a2: {h: 0}};
2624
2624
  });
2625
2625
 
2626
- /* {csegen:396} */
2627
- const csegen_396 = __lazy(function () {
2626
+ /* {csegen:398} */
2627
+ const csegen_398 = __lazy(function () {
2628
2628
  return $0 => $1 => $2 => $3 => Data_Promise_x3ex3ex3d_Monad_Promise($0, $1, $2, $3);
2629
2629
  });
2630
2630
 
2631
- /* {csegen:397} */
2632
- const csegen_397 = __lazy(function () {
2631
+ /* {csegen:399} */
2632
+ const csegen_399 = __lazy(function () {
2633
2633
  return $0 => $1 => Data_Promise_either(csegen_51(), Data_PullRequest_parsePullRequestsString($0), $1);
2634
2634
  });
2635
2635
 
2636
- /* {csegen:398} */
2637
- const csegen_398 = __lazy(function () {
2636
+ /* {csegen:400} */
2637
+ const csegen_400 = __lazy(function () {
2638
2638
  return $0 => $1 => Data_Promise_either(csegen_51(), Data_User_parseUserString($0), $1);
2639
2639
  });
2640
2640
 
2641
- /* {csegen:403} */
2642
- const csegen_403 = __lazy(function () {
2641
+ /* {csegen:405} */
2642
+ const csegen_405 = __lazy(function () {
2643
2643
  return $0 => $1 => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29($0, $1);
2644
2644
  });
2645
2645
 
2646
- /* {csegen:416} */
2647
- const csegen_416 = __lazy(function () {
2646
+ /* {csegen:418} */
2647
+ const csegen_418 = __lazy(function () {
2648
2648
  return $0 => Language_JSON_Accessors_array($3 => Data_PullRequest_parsePR($3), $0);
2649
2649
  });
2650
2650
 
2651
- /* {csegen:424} */
2652
- const csegen_424 = __lazy(function () {
2651
+ /* {csegen:426} */
2652
+ const csegen_426 = __lazy(function () {
2653
2653
  return $0 => $1 => $2 => Data_Promise_pure_Applicative_Promise($0, $1, $2);
2654
2654
  });
2655
2655
 
2656
- /* {csegen:425} */
2657
- const csegen_425 = __lazy(function () {
2656
+ /* {csegen:427} */
2657
+ const csegen_427 = __lazy(function () {
2658
2658
  return $0 => Prelude_EqOrd_x3dx3d_Eq_Char($0, '/');
2659
2659
  });
2660
2660
 
2661
- /* {csegen:426} */
2662
- const csegen_426 = __lazy(function () {
2661
+ /* {csegen:428} */
2662
+ const csegen_428 = __lazy(function () {
2663
2663
  return $0 => $0.a2;
2664
2664
  });
2665
2665
 
2666
- /* {csegen:430} */
2667
- const csegen_430 = __lazy(function () {
2666
+ /* {csegen:432} */
2667
+ const csegen_432 = __lazy(function () {
2668
2668
  return $0 => $0.a1;
2669
2669
  });
2670
2670
 
2671
- /* {csegen:441} */
2672
- const csegen_441 = __lazy(function () {
2671
+ /* {csegen:443} */
2672
+ const csegen_443 = __lazy(function () {
2673
2673
  return $0 => $1 => Data_Promise_map_Functor_Promise($4 => Number(_truncUBigInt32($4)), System_time(csegen_72()), $0, $1);
2674
2674
  });
2675
2675
 
2676
- /* {csegen:446} */
2677
- const csegen_446 = __lazy(function () {
2676
+ /* {csegen:448} */
2677
+ const csegen_448 = __lazy(function () {
2678
2678
  return $0 => $1 => $2 => $3 => Prelude_Types_map_Functor_Maybe($2, $3);
2679
2679
  });
2680
2680
 
2681
- /* {csegen:459} */
2682
- const csegen_459 = __lazy(function () {
2681
+ /* {csegen:461} */
2682
+ const csegen_461 = __lazy(function () {
2683
2683
  return $0 => $1 => $2 => Data_Promise_liftIO_HasIO_Promise($5 => Prelude_IO_prim__getStr($5), $0, $1, $2);
2684
2684
  });
2685
2685
 
2686
- /* {csegen:461} */
2687
- const csegen_461 = __lazy(function () {
2686
+ /* {csegen:463} */
2687
+ const csegen_463 = __lazy(function () {
2688
2688
  return $0 => $1 => Data_Promise_pure_Applicative_Promise({h: 0}, $0, $1);
2689
2689
  });
2690
2690
 
2691
- /* {csegen:489} */
2692
- const csegen_489 = __lazy(function () {
2691
+ /* {csegen:491} */
2692
+ const csegen_491 = __lazy(function () {
2693
2693
  return {a1: csegen_9(), a2: a => ({h: 0}), a3: a => $4 => $5 => Prelude_Types_x3cx7cx3e_Alternative_Maybe($4, $5)};
2694
2694
  });
2695
2695
 
2696
- /* {csegen:490} */
2697
- const csegen_490 = __lazy(function () {
2696
+ /* {csegen:492} */
2697
+ const csegen_492 = __lazy(function () {
2698
2698
  return $0 => Data_List_sort(csegen_217(), $0);
2699
2699
  });
2700
2700
 
2701
- /* {csegen:491} */
2702
- const csegen_491 = __lazy(function () {
2701
+ /* {csegen:493} */
2702
+ const csegen_493 = __lazy(function () {
2703
2703
  return $0 => $1 => $2 => FFI_Concurrency_promiseAll(csegen_145(), $0, $1, $2);
2704
2704
  });
2705
2705
 
2706
- /* {csegen:499} */
2707
- const csegen_499 = __lazy(function () {
2706
+ /* {csegen:501} */
2707
+ const csegen_501 = __lazy(function () {
2708
2708
  return $0 => $0.a1;
2709
2709
  });
2710
2710
 
2711
- /* {csegen:501} */
2712
- const csegen_501 = __lazy(function () {
2711
+ /* {csegen:503} */
2712
+ const csegen_503 = __lazy(function () {
2713
2713
  return $0 => $1 => Data_Date_compare_Ord_Date($0, $1);
2714
2714
  });
2715
2715
 
2716
- /* {csegen:502} */
2717
- const csegen_502 = __lazy(function () {
2716
+ /* {csegen:504} */
2717
+ const csegen_504 = __lazy(function () {
2718
2718
  return $0 => $0.a2;
2719
2719
  });
2720
2720
 
2721
- /* {csegen:503} */
2722
- const csegen_503 = __lazy(function () {
2723
- return $0 => $1 => Prelude_Basics_on(csegen_501(), csegen_502(), $0, $1);
2721
+ /* {csegen:505} */
2722
+ const csegen_505 = __lazy(function () {
2723
+ return $0 => $1 => Prelude_Basics_on(csegen_503(), csegen_504(), $0, $1);
2724
2724
  });
2725
2725
 
2726
- /* {csegen:516} */
2727
- const csegen_516 = __lazy(function () {
2726
+ /* {csegen:518} */
2727
+ const csegen_518 = __lazy(function () {
2728
2728
  return $0 => $0.a2;
2729
2729
  });
2730
2730
 
2731
- /* {csegen:519} */
2732
- const csegen_519 = __lazy(function () {
2731
+ /* {csegen:521} */
2732
+ const csegen_521 = __lazy(function () {
2733
2733
  return $0 => $0.a1;
2734
2734
  });
2735
2735
 
2736
- /* {csegen:525} */
2737
- const csegen_525 = __lazy(function () {
2736
+ /* {csegen:527} */
2737
+ const csegen_527 = __lazy(function () {
2738
2738
  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}}}));
2739
2739
  });
2740
2740
 
2741
- /* {csegen:555} */
2742
- const csegen_555 = __lazy(function () {
2741
+ /* {csegen:557} */
2742
+ const csegen_557 = __lazy(function () {
2743
2743
  return $0 => Util_yesNoPrompt(csegen_72(), 'Would you like to continue creating a Pull Request anyway?');
2744
2744
  });
2745
2745
 
2746
- /* {csegen:590} */
2747
- const csegen_590 = __lazy(function () {
2746
+ /* {csegen:592} */
2747
+ const csegen_592 = __lazy(function () {
2748
2748
  return $0 => $0.a1;
2749
2749
  });
2750
2750
 
2751
- /* {csegen:602} */
2752
- const csegen_602 = __lazy(function () {
2751
+ /* {csegen:604} */
2752
+ const csegen_604 = __lazy(function () {
2753
2753
  return {a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc()}, a2: {h: 0}};
2754
2754
  });
2755
2755
 
2756
- /* {csegen:621} */
2757
- const csegen_621 = __lazy(function () {
2756
+ /* {csegen:623} */
2757
+ const csegen_623 = __lazy(function () {
2758
2758
  return {a1: ann => $1 => Graph_pretty_Pretty_Date($1), a2: ann => $5 => $6 => Graph_prettyPrec_Pretty_Date($5, $6)};
2759
2759
  });
2760
2760
 
@@ -8268,6 +8268,11 @@ function System_exitFailure($0) {
8268
8268
  return System_exitWith($0, {a1: 1, a2: undefined});
8269
8269
  }
8270
8270
 
8271
+ /* Help.warning : String -> Doc AnsiStyle */
8272
+ function Help_warning($0) {
8273
+ return Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_color(3), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String($0));
8274
+ }
8275
+
8271
8276
  /* Help.subcommandHelp' : String -> Doc AnsiStyle */
8272
8277
  function Help_subcommandHelpx27($0) {
8273
8278
  switch($0) {
@@ -8285,7 +8290,8 @@ function Help_subcommandHelpx27($0) {
8285
8290
  case 'reflect': return Help_subcommand($0, {h: 0}, {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('Reflect on the current state of ones own PRs and review requests.'), a2: {h: 0}});
8286
8291
  case 'list': return Help_subcommand($0, csegen_344(), {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('List the members of the given GitHub Team.'), a2: {h: 0}});
8287
8292
  case 'health': return Help_subcommand($0, {h: 0}, {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('Graph all open PRs grouped by the month they were created.'), a2: {h: 0}});
8288
- default: return Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(Prelude_Types_foldMap_Foldable_List(csegen_49(), $128 => $128, {a1: 'Unreconized command: ', a2: {a1: $0, a2: {h: 0}}}));
8293
+ case 'assign': return Help_subcommand($0, {h: 0}, {a1: Help_warning('Deprecated alias for \'request\' command.'), a2: {h: 0}});
8294
+ default: return Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(Prelude_Types_foldMap_Foldable_List(csegen_49(), $130 => $130, {a1: 'Unreconized command: ', a2: {a1: $0, a2: {h: 0}}}));
8289
8295
  }
8290
8296
  }
8291
8297
 
@@ -8325,7 +8331,7 @@ function Help_option($0) {
8325
8331
 
8326
8332
  /* Help.helpDocs : Doc AnsiStyle */
8327
8333
  const Help_helpDocs = __lazy(function () {
8328
- return Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('harmony'), Help_subcommandx27('<subcommand>')), a2: {a1: Help_heading('Subcommands', Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Help_subcommandHelpx27('branch'), a2: {a1: Help_subcommandHelpx27('config'), a2: {a1: Help_subcommandHelpx27('contribute'), a2: {a1: Help_subcommandHelpx27('graph'), a2: {a1: Help_subcommandHelpx27('health'), a2: {a1: Help_subcommandHelpx27('help'), a2: {a1: Help_subcommandHelpx27('label'), a2: {a1: Help_subcommandHelpx27('list'), a2: {a1: Help_subcommandHelpx27('pr'), a2: {a1: Help_subcommandHelpx27('reflect'), a2: {a1: Help_subcommandHelpx27('request'), a2: {a1: Help_subcommandHelpx27('sync'), a2: {a1: Help_subcommandHelpx27('version'), a2: {a1: Help_subcommandHelpx27('whoami'), a2: {h: 0}}}}}}}}}}}}}}})), a2: {a1: Help_heading('Prompt Completion', Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Text_PrettyPrint_Prettyprinter_Util_reflow(Prelude_Types_foldMap_Foldable_List(csegen_49(), $57 => $57, {a1: 'You can set up bash completion by adding the following to your bashrc\nfile or bash profile:', a2: {h: 0}})), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_vsep({h: 0}), a2: {a1: Help_shell('eval \"$(harmony --bash-completion-script)\"'), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_vsep({h: 0}), a2: {a1: Text_PrettyPrint_Prettyprinter_Util_reflow(Prelude_Types_foldMap_Foldable_List(csegen_49(), $6f => $6f, {a1: 'You can set up zsh completion by adding the following to your zshrc\nfile or zsh profile:', a2: {h: 0}})), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_vsep({h: 0}), a2: {a1: Help_shell('eval \"$(harmony --zsh-completion-script)\"'), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_vsep({h: 0}), a2: {h: 0}}}}}}}}})), a2: {h: 0}}}});
8334
+ return Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('harmony'), Help_subcommandx27('<subcommand>')), a2: {a1: Help_heading('Subcommands', Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Help_subcommandHelpx27('assign'), a2: {a1: Help_subcommandHelpx27('branch'), a2: {a1: Help_subcommandHelpx27('config'), a2: {a1: Help_subcommandHelpx27('contribute'), a2: {a1: Help_subcommandHelpx27('graph'), a2: {a1: Help_subcommandHelpx27('health'), a2: {a1: Help_subcommandHelpx27('help'), a2: {a1: Help_subcommandHelpx27('label'), a2: {a1: Help_subcommandHelpx27('list'), a2: {a1: Help_subcommandHelpx27('pr'), a2: {a1: Help_subcommandHelpx27('reflect'), a2: {a1: Help_subcommandHelpx27('request'), a2: {a1: Help_subcommandHelpx27('sync'), a2: {a1: Help_subcommandHelpx27('version'), a2: {a1: Help_subcommandHelpx27('whoami'), a2: {h: 0}}}}}}}}}}}}}}}})), a2: {a1: Help_heading('Prompt Completion', Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Text_PrettyPrint_Prettyprinter_Util_reflow(Prelude_Types_foldMap_Foldable_List(csegen_49(), $5b => $5b, {a1: 'You can set up bash completion by adding the following to your bashrc\nfile or bash profile:', a2: {h: 0}})), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_vsep({h: 0}), a2: {a1: Help_shell('eval \"$(harmony --bash-completion-script)\"'), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_vsep({h: 0}), a2: {a1: Text_PrettyPrint_Prettyprinter_Util_reflow(Prelude_Types_foldMap_Foldable_List(csegen_49(), $73 => $73, {a1: 'You can set up zsh completion by adding the following to your zshrc\nfile or zsh profile:', a2: {h: 0}})), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_vsep({h: 0}), a2: {a1: Help_shell('eval \"$(harmony --zsh-completion-script)\"'), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_vsep({h: 0}), a2: {h: 0}}}}}}}}})), a2: {h: 0}}}});
8329
8335
  });
8330
8336
 
8331
8337
  /* Help.help : Bool -> String */
@@ -8440,12 +8446,12 @@ function FFI_GitHub_listPullRequestsJsonStr($0, $1, $2, $3, $4, $5) {
8440
8446
  String -> String -> Maybe GitHubPRState -> Fin 101 -> {default 0 _ : Nat} ->
8441
8447
  Promise (List PullRequest) */
8442
8448
  function FFI_GitHub_listPullRequests($0, $1, $2, $3, $4, $5) {
8443
- return Prelude_Basics_flip(csegen_396(), csegen_397(), FFI_GitHub_listPullRequestsJsonStr($0, $1, $2, $3, $4, $5));
8449
+ return Prelude_Basics_flip(csegen_398(), csegen_399(), FFI_GitHub_listPullRequestsJsonStr($0, $1, $2, $3, $4, $5));
8444
8450
  }
8445
8451
 
8446
8452
  /* FFI.GitHub.listPRsForBranch : Octokit => String -> String -> String -> Promise (List PullRequest) */
8447
8453
  function FFI_GitHub_listPRsForBranch($0, $1, $2, $3) {
8448
- return Prelude_Basics_flip(csegen_396(), csegen_397(), $a => $b => FFI_promiseIO($e => $f => $10 => FFI_GitHub_prim__listPRsForBranch($0, $1, $2, $3, $e, $f, $10), $a, $b));
8454
+ return Prelude_Basics_flip(csegen_398(), csegen_399(), $a => $b => FFI_promiseIO($e => $f => $10 => FFI_GitHub_prim__listPRsForBranch($0, $1, $2, $3, $e, $f, $10), $a, $b));
8449
8455
  }
8450
8456
 
8451
8457
  /* FFI.GitHub.listOrgMembers : Octokit => String -> Promise (List String) */
@@ -8460,12 +8466,12 @@ function FFI_GitHub_listMyTeams($0, $1, $2) {
8460
8466
 
8461
8467
  /* FFI.GitHub.getUser : Octokit => String -> Promise User */
8462
8468
  function FFI_GitHub_getUser($0) {
8463
- return Prelude_Interfaces_x3cx3dx3c(csegen_69(), csegen_398(), $7 => $8 => $9 => FFI_promiseIO($c => $d => $e => FFI_GitHub_prim__getUser($0, $7, $c, $d, $e), $8, $9));
8469
+ return Prelude_Interfaces_x3cx3dx3c(csegen_69(), csegen_400(), $7 => $8 => $9 => FFI_promiseIO($c => $d => $e => FFI_GitHub_prim__getUser($0, $7, $c, $d, $e), $8, $9));
8464
8470
  }
8465
8471
 
8466
8472
  /* FFI.GitHub.getSelf : Octokit => Promise User */
8467
8473
  function FFI_GitHub_getSelf($0) {
8468
- return Prelude_Basics_flip(csegen_396(), csegen_398(), $7 => $8 => FFI_promiseIO($b => $c => $d => FFI_GitHub_prim__getSelf($0, $b, $c, $d), $7, $8));
8474
+ return Prelude_Basics_flip(csegen_398(), csegen_400(), $7 => $8 => FFI_promiseIO($b => $c => $d => FFI_GitHub_prim__getSelf($0, $b, $c, $d), $7, $8));
8469
8475
  }
8470
8476
 
8471
8477
  /* FFI.GitHub.getRepoDefaultBranch : Octokit => String -> String -> Promise String */
@@ -8476,7 +8482,7 @@ function FFI_GitHub_getRepoDefaultBranch($0, $1, $2, $3, $4) {
8476
8482
  /* FFI.GitHub.createPR : Octokit => {default False _ : Bool} ->
8477
8483
  String -> String -> String -> String -> String -> String -> Promise PullRequest */
8478
8484
  function FFI_GitHub_createPR($0, $1, $2, $3, $4, $5, $6, $7) {
8479
- return Prelude_Basics_flip(csegen_396(), $c => $d => Data_Promise_either(csegen_51(), Data_PullRequest_parsePullRequestString($c), $d), $16 => $17 => FFI_promiseIO($1a => $1b => $1c => FFI_GitHub_prim__createPR($0, $2, $3, $4, $5, $6, $7, $1, $1a, $1b, $1c), $16, $17));
8485
+ return Prelude_Basics_flip(csegen_398(), $c => $d => Data_Promise_either(csegen_51(), Data_PullRequest_parsePullRequestString($c), $d), $16 => $17 => FFI_promiseIO($1a => $1b => $1c => FFI_GitHub_prim__createPR($0, $2, $3, $4, $5, $6, $7, $1, $1a, $1b, $1c), $16, $17));
8480
8486
  }
8481
8487
 
8482
8488
  /* FFI.GitHub.createComment : Octokit => String -> String -> Integer -> String -> Promise () */
@@ -8546,7 +8552,7 @@ function Data_Review_parseState($0) {
8546
8552
 
8547
8553
  /* Data.Review.parseReview : JSON -> Either String Review */
8548
8554
  function Data_Review_parseReview($0) {
8549
- return Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_object($0), review => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_lookupAll({a1: 'author', a2: {a1: 'state', a2: {a1: 'submitted_at', a2: {h: 0}}}}, review), $12 => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_string($12.a1), author => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Prelude_Basics_flip(csegen_403(), $22 => Data_Review_parseState($22), Language_JSON_Accessors_string($12.a2.a1)), state => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Prelude_Basics_flip(csegen_403(), $2f => Data_Review_parseDateTime($2f), Language_JSON_Accessors_string($12.a2.a2.a1)), submittedAt => ({h: 1 /* Right */, a1: {a1: submittedAt, a2: author, a3: state}}))))));
8555
+ return Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_object($0), review => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_lookupAll({a1: 'author', a2: {a1: 'state', a2: {a1: 'submitted_at', a2: {h: 0}}}}, review), $12 => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_string($12.a1), author => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Prelude_Basics_flip(csegen_405(), $22 => Data_Review_parseState($22), Language_JSON_Accessors_string($12.a2.a1)), state => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Prelude_Basics_flip(csegen_405(), $2f => Data_Review_parseDateTime($2f), Language_JSON_Accessors_string($12.a2.a2.a1)), submittedAt => ({h: 1 /* Right */, a1: {a1: submittedAt, a2: author, a3: state}}))))));
8550
8556
  }
8551
8557
 
8552
8558
  /* Data.Review.parseDateTime : String -> Either String Date */
@@ -8837,7 +8843,7 @@ function Data_PullRequest_parsePullRequestsString($0) {
8837
8843
  };
8838
8844
  const $3 = {a1: $4, a2: a => $c => ({h: 1 /* Right */, a1: $c}), a3: $e};
8839
8845
  const $2 = {a1: $3, a2: csegen_203(), a3: csegen_204()};
8840
- return Prelude_Interfaces_x3ex3dx3e($2, csegen_205(), csegen_416(), $0);
8846
+ return Prelude_Interfaces_x3ex3dx3e($2, csegen_205(), csegen_418(), $0);
8841
8847
  }
8842
8848
 
8843
8849
  /* Data.PullRequest.parsePullRequestString : String -> Either String PullRequest */
@@ -8866,7 +8872,7 @@ function Data_PullRequest_parsePullRequestString($0) {
8866
8872
 
8867
8873
  /* Data.PullRequest.parsePR : JSON -> Either String PullRequest */
8868
8874
  function Data_PullRequest_parsePR($0) {
8869
- return Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_object($0), pr => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_lookupAll({a1: 'pull_number', a2: {a1: 'author', a2: {a1: 'state', a2: {a1: 'created_at', a2: {a1: 'merged', a2: {a1: 'draft', a2: {a1: 'reviewers', a2: {a1: 'head_ref', a2: {h: 0}}}}}}}}}, pr), $1c => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_integer($1c.a1), number => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_string($1c.a2.a1), author => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_bool($1c.a2.a2.a2.a2.a1), merged => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_bool($1c.a2.a2.a2.a2.a2.a1), isDraft => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Prelude_Basics_flip(csegen_403(), $40 => Data_PullRequest_parseState(merged, $40), Language_JSON_Accessors_string($1c.a2.a2.a1)), state => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Prelude_Basics_flip(csegen_403(), $4e => Data_PullRequest_parseDateTime($4e), Language_JSON_Accessors_string($1c.a2.a2.a2.a1)), createdAt => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_array($59 => Language_JSON_Accessors_string($59), $1c.a2.a2.a2.a2.a2.a2.a1), reviewers => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_string($1c.a2.a2.a2.a2.a2.a2.a2.a1), headRef => ({h: 1 /* Right */, a1: {a1: number, a2: createdAt, a3: isDraft, a4: author, a5: state, a6: reviewers, a7: headRef}})))))))))));
8875
+ return Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_object($0), pr => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_lookupAll({a1: 'pull_number', a2: {a1: 'author', a2: {a1: 'state', a2: {a1: 'created_at', a2: {a1: 'merged', a2: {a1: 'draft', a2: {a1: 'reviewers', a2: {a1: 'head_ref', a2: {h: 0}}}}}}}}}, pr), $1c => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_integer($1c.a1), number => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_string($1c.a2.a1), author => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_bool($1c.a2.a2.a2.a2.a1), merged => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_bool($1c.a2.a2.a2.a2.a2.a1), isDraft => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Prelude_Basics_flip(csegen_405(), $40 => Data_PullRequest_parseState(merged, $40), Language_JSON_Accessors_string($1c.a2.a2.a1)), state => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Prelude_Basics_flip(csegen_405(), $4e => Data_PullRequest_parseDateTime($4e), Language_JSON_Accessors_string($1c.a2.a2.a2.a1)), createdAt => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_array($59 => Language_JSON_Accessors_string($59), $1c.a2.a2.a2.a2.a2.a2.a1), reviewers => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_string($1c.a2.a2.a2.a2.a2.a2.a2.a1), headRef => ({h: 1 /* Right */, a1: {a1: number, a2: createdAt, a3: isDraft, a4: author, a5: state, a6: reviewers, a7: headRef}})))))))))));
8870
8876
  }
8871
8877
 
8872
8878
  /* Data.PullRequest.parseDateTime : String -> Either String Date */
@@ -8899,7 +8905,7 @@ function Config_with__withx20blockx20inx20setConfig_2104($0, $1, $2, $3, $4, $5,
8899
8905
  return $7 => {
8900
8906
  switch($5.h) {
8901
8907
  case 0: /* nothing */ return Data_Promise_reject(Prelude_Types_foldMap_Foldable_List(csegen_49(), $f => $f, {a1: $4, a2: {a1: ' is not a valid value for ', a2: {a1: $1, a2: {a1: '.', a2: {h: 0}}}}}), $6, $7);
8902
- case undefined: /* just */ return Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Types_either(() => $1f => Util_renderIO($5.a1, csegen_72(), $1f), () => csegen_424(), Config_checkConfigConsistency($5.a1)), $2b => $2c => $2d => Config_writeConfig($5.a1, $2c, $2d), $6, $7);
8908
+ case undefined: /* just */ return Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Types_either(() => $1f => Util_renderIO($5.a1, csegen_72(), $1f), () => csegen_426(), Config_checkConfigConsistency($5.a1)), $2b => $2c => $2d => Config_writeConfig($5.a1, $2c, $2d), $6, $7);
8903
8909
  }
8904
8910
  };
8905
8911
  }
@@ -8949,12 +8955,12 @@ function Config_case__parseGitHubURIx2cparseSuffix_1509($0, $1, $2) {
8949
8955
  default: return {h: 0};
8950
8956
  }
8951
8957
  };
8952
- return Prelude_Types_x3ex3ex3d_Monad_Maybe({a1: Data_String_split(csegen_425(), $2.a1)}, $b);
8958
+ return Prelude_Types_x3ex3ex3d_Monad_Maybe({a1: Data_String_split(csegen_427(), $2.a1)}, $b);
8953
8959
  }
8954
8960
 
8955
8961
  /* Config.9228:2418:repo */
8956
8962
  function Config_n__9228_2418_repo($0, $1, $2, $3, $4) {
8957
- return Prelude_Types_map_Functor_Maybe(csegen_426(), $4);
8963
+ return Prelude_Types_map_Functor_Maybe(csegen_428(), $4);
8958
8964
  }
8959
8965
 
8960
8966
  /* Config.8332:1489:parseSuffix */
@@ -8974,7 +8980,7 @@ function Config_n__8332_1487_parseHTTPS($0, $1) {
8974
8980
 
8975
8981
  /* Config.9228:2417:org */
8976
8982
  function Config_n__9228_2417_org($0, $1, $2, $3, $4) {
8977
- return Prelude_Types_map_Functor_Maybe(csegen_430(), $4);
8983
+ return Prelude_Types_map_Functor_Maybe(csegen_432(), $4);
8978
8984
  }
8979
8985
 
8980
8986
  /* Config.9228:2416:orIfEmpty */
@@ -9078,7 +9084,7 @@ function Config_syncConfig($0, $1, $2, $3, $4) {
9078
9084
  const $32 = {a1: updatedAt, a2: $0.a2, a3: $0.a3, a4: $0.a4, a5: $0.a5, a6: $0.a6, a7: $0.a7, a8: $0.a8, a9: teamSlugs, a10: labelNames, a11: orgMembers, a12: $0.a12, a13: $0.a13, a14: $0.a14};
9079
9085
  return $42 => $43 => Data_Promise_x3ex3ex3d_Monad_Promise($46 => $47 => Data_Promise_map_Functor_Promise($4a => (undefined), $4c => $4d => Config_writeConfig($32, $4c, $4d), $46, $47), $55 => $56 => $57 => Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Interfaces_when(csegen_64(), $2, () => $5f => $60 => Data_Promise_x3ex3ex3d_Monad_Promise($63 => $64 => $65 => Data_Promise_liftIO_HasIO_Promise($68 => Prelude_IO_prim__putStr('Your updated configuration is:\n', $68), $63, $64, $65), $70 => $71 => $72 => $73 => Data_Promise_liftIO_HasIO_Promise($76 => Prelude_IO_prim__putStr((Data_Config_show_Show_Config($32)+'\n'), $76), $71, $72, $73), $5f, $60)), $84 => $85 => $86 => Data_Promise_pure_Applicative_Promise($32, $85, $86), $56, $57), $42, $43);
9080
9086
  };
9081
- return Data_Promise_x3ex3ex3d_Monad_Promise(csegen_441(), $31, $2c, $2d);
9087
+ return Data_Promise_x3ex3ex3d_Monad_Promise(csegen_443(), $31, $2c, $2d);
9082
9088
  };
9083
9089
  return Data_Promise_x3ex3ex3d_Monad_Promise($23 => $24 => FFI_GitHub_listOrgMembers($1, $0.a2, $23, $24), $2b, $1f, $20);
9084
9090
  };
@@ -9101,14 +9107,14 @@ function Config_setConfig($0, $1, $2) {
9101
9107
  function Config_propSetter($0, $1) {
9102
9108
  return $2 => {
9103
9109
  switch($0) {
9104
- case 0: return Config_update(csegen_446(), $8 => Config_parseBool($8), b => $c => ({a1: $c.a1, a2: $c.a2, a3: $c.a3, a4: $c.a4, a5: $c.a5, a6: b, a7: $c.a7, a8: $c.a8, a9: $c.a9, a10: $c.a10, a11: $c.a11, a12: $c.a12, a13: $c.a13, a14: $c.a14}), $1, $2);
9105
- case 1: return Config_update(csegen_446(), $22 => Config_parseBool($22), b => $26 => ({a1: $26.a1, a2: $26.a2, a3: $26.a3, a4: $26.a4, a5: $26.a5, a6: $26.a6, a7: b, a8: $26.a8, a9: $26.a9, a10: $26.a10, a11: $26.a11, a12: $26.a12, a13: $26.a13, a14: $26.a14}), $1, $2);
9106
- case 2: return Config_update(csegen_446(), $3c => Config_parseBool($3c), b => $40 => ({a1: $40.a1, a2: $40.a2, a3: $40.a3, a4: $40.a4, a5: $40.a5, a6: $40.a6, a7: $40.a7, a8: b, a9: $40.a9, a10: $40.a10, a11: $40.a11, a12: $40.a12, a13: $40.a13, a14: $40.a14}), $1, $2);
9107
- case 3: return Config_update(csegen_446(), $56 => ({a1: $56}), s => $59 => ({a1: $59.a1, a2: $59.a2, a3: $59.a3, a4: s, a5: $59.a5, a6: $59.a6, a7: $59.a7, a8: $59.a8, a9: $59.a9, a10: $59.a10, a11: $59.a11, a12: $59.a12, a13: $59.a13, a14: $59.a14}), $1, $2);
9108
- case 4: return Config_update(csegen_446(), $6f => ({a1: $6f}), s => $72 => ({a1: $72.a1, a2: $72.a2, a3: $72.a3, a4: $72.a4, a5: $72.a5, a6: $72.a6, a7: $72.a7, a8: $72.a8, a9: $72.a9, a10: $72.a10, a11: $72.a11, a12: $72.a12, a13: {a1: s}, a14: $72.a14}), $1, $2);
9109
- case 5: return Config_update(csegen_446(), $89 => Config_parseBool($89), b => $8d => ({a1: $8d.a1, a2: $8d.a2, a3: $8d.a3, a4: $8d.a4, a5: $8d.a5, a6: b, a7: $8d.a7, a8: $8d.a8, a9: $8d.a9, a10: $8d.a10, a11: $8d.a11, a12: $8d.a12, a13: $8d.a13, a14: $8d.a14}), $1, $2);
9110
- case 6: return Config_update(csegen_446(), $a3 => Config_parseBool($a3), b => $a7 => ({a1: $a7.a1, a2: $a7.a2, a3: $a7.a3, a4: $a7.a4, a5: $a7.a5, a6: $a7.a6, a7: b, a8: $a7.a8, a9: $a7.a9, a10: $a7.a10, a11: $a7.a11, a12: $a7.a12, a13: $a7.a13, a14: $a7.a14}), $1, $2);
9111
- case 7: return Config_update(csegen_446(), $bd => Config_parseBool($bd), b => $c1 => ({a1: $c1.a1, a2: $c1.a2, a3: $c1.a3, a4: $c1.a4, a5: $c1.a5, a6: $c1.a6, a7: $c1.a7, a8: b, a9: $c1.a9, a10: $c1.a10, a11: $c1.a11, a12: $c1.a12, a13: $c1.a13, a14: $c1.a14}), $1, $2);
9110
+ case 0: return Config_update(csegen_448(), $8 => Config_parseBool($8), b => $c => ({a1: $c.a1, a2: $c.a2, a3: $c.a3, a4: $c.a4, a5: $c.a5, a6: b, a7: $c.a7, a8: $c.a8, a9: $c.a9, a10: $c.a10, a11: $c.a11, a12: $c.a12, a13: $c.a13, a14: $c.a14}), $1, $2);
9111
+ case 1: return Config_update(csegen_448(), $22 => Config_parseBool($22), b => $26 => ({a1: $26.a1, a2: $26.a2, a3: $26.a3, a4: $26.a4, a5: $26.a5, a6: $26.a6, a7: b, a8: $26.a8, a9: $26.a9, a10: $26.a10, a11: $26.a11, a12: $26.a12, a13: $26.a13, a14: $26.a14}), $1, $2);
9112
+ case 2: return Config_update(csegen_448(), $3c => Config_parseBool($3c), b => $40 => ({a1: $40.a1, a2: $40.a2, a3: $40.a3, a4: $40.a4, a5: $40.a5, a6: $40.a6, a7: $40.a7, a8: b, a9: $40.a9, a10: $40.a10, a11: $40.a11, a12: $40.a12, a13: $40.a13, a14: $40.a14}), $1, $2);
9113
+ case 3: return Config_update(csegen_448(), $56 => ({a1: $56}), s => $59 => ({a1: $59.a1, a2: $59.a2, a3: $59.a3, a4: s, a5: $59.a5, a6: $59.a6, a7: $59.a7, a8: $59.a8, a9: $59.a9, a10: $59.a10, a11: $59.a11, a12: $59.a12, a13: $59.a13, a14: $59.a14}), $1, $2);
9114
+ case 4: return Config_update(csegen_448(), $6f => ({a1: $6f}), s => $72 => ({a1: $72.a1, a2: $72.a2, a3: $72.a3, a4: $72.a4, a5: $72.a5, a6: $72.a6, a7: $72.a7, a8: $72.a8, a9: $72.a9, a10: $72.a10, a11: $72.a11, a12: $72.a12, a13: {a1: s}, a14: $72.a14}), $1, $2);
9115
+ case 5: return Config_update(csegen_448(), $89 => Config_parseBool($89), b => $8d => ({a1: $8d.a1, a2: $8d.a2, a3: $8d.a3, a4: $8d.a4, a5: $8d.a5, a6: b, a7: $8d.a7, a8: $8d.a8, a9: $8d.a9, a10: $8d.a10, a11: $8d.a11, a12: $8d.a12, a13: $8d.a13, a14: $8d.a14}), $1, $2);
9116
+ case 6: return Config_update(csegen_448(), $a3 => Config_parseBool($a3), b => $a7 => ({a1: $a7.a1, a2: $a7.a2, a3: $a7.a3, a4: $a7.a4, a5: $a7.a5, a6: $a7.a6, a7: b, a8: $a7.a8, a9: $a7.a9, a10: $a7.a10, a11: $a7.a11, a12: $a7.a12, a13: $a7.a13, a14: $a7.a14}), $1, $2);
9117
+ case 7: return Config_update(csegen_448(), $bd => Config_parseBool($bd), b => $c1 => ({a1: $c1.a1, a2: $c1.a2, a3: $c1.a3, a4: $c1.a4, a5: $c1.a5, a6: $c1.a6, a7: $c1.a7, a8: b, a9: $c1.a9, a10: $c1.a10, a11: $c1.a11, a12: $c1.a12, a13: $c1.a13, a14: $c1.a14}), $1, $2);
9112
9118
  }
9113
9119
  };
9114
9120
  }
@@ -9283,7 +9289,7 @@ function Config_createConfig($0, $1, $2, $3, $4, $5) {
9283
9289
  default: return {a1: Data_String_trim($73)};
9284
9290
  }
9285
9291
  };
9286
- return Data_Promise_map_Functor_Promise($72, csegen_459(), $6f, $70);
9292
+ return Data_Promise_map_Functor_Promise($72, csegen_461(), $6f, $70);
9287
9293
  };
9288
9294
  const $7e = configPAT => $7f => $80 => {
9289
9295
  const $8c = $8d => $8e => $8f => {
@@ -9291,11 +9297,11 @@ function Config_createConfig($0, $1, $2, $3, $4, $5) {
9291
9297
  case undefined: /* just */ {
9292
9298
  const $a3 = remoteGuess => $a4 => $a5 => {
9293
9299
  const $c1 = defaultOrgAndRepo => {
9294
- const $c2 = Config_n__9228_2414_defaultStr($0, $3, $2, $1, csegen_430(), defaultOrgAndRepo);
9300
+ const $c2 = Config_n__9228_2414_defaultStr($0, $3, $2, $1, csegen_432(), defaultOrgAndRepo);
9295
9301
  return $cb => $cc => {
9296
9302
  const $e9 = $ea => $eb => $ec => {
9297
9303
  const $107 = org => {
9298
- const $108 = Config_n__9228_2414_defaultStr($0, $3, $2, $1, csegen_426(), defaultOrgAndRepo);
9304
+ const $108 = Config_n__9228_2414_defaultStr($0, $3, $2, $1, csegen_428(), defaultOrgAndRepo);
9299
9305
  return $111 => $112 => {
9300
9306
  const $12f = $130 => $131 => $132 => {
9301
9307
  const $14d = repo => {
@@ -9316,7 +9322,7 @@ function Config_createConfig($0, $1, $2, $3, $4, $5) {
9316
9322
  const $205 = repoLabels => $206 => $207 => {
9317
9323
  const $211 = orgMembers => {
9318
9324
  const $212 = {a1: updatedAt, a2: org, a3: repo, a4: defaultRemote, a5: mainBranch, a6: requestTeams, a7: requestUsers, a8: commentOnRequest, a9: teamSlugs, a10: repoLabels, a11: orgMembers, a12: {h: 0}, a13: Prelude_Types_map_Functor_Maybe($222 => $222, configPAT), a14: $1de};
9319
- return $225 => $226 => Data_Promise_x3ex3ex3d_Monad_Promise($229 => $22a => Data_Promise_map_Functor_Promise($22d => (undefined), $22f => $230 => Config_writeConfig($212, $22f, $230), $229, $22a), $238 => $239 => $23a => Data_Promise_x3ex3ex3d_Monad_Promise($23d => $23e => $23f => Data_Promise_liftIO_HasIO_Promise($242 => Prelude_IO_prim__putStr('Your new configuration is:\n', $242), $23d, $23e, $23f), $24a => $24b => $24c => Data_Promise_x3ex3ex3d_Monad_Promise($24f => $250 => $251 => Data_Promise_liftIO_HasIO_Promise($254 => Prelude_IO_prim__putStr((Data_Config_show_Show_Config($212)+'\n'), $254), $24f, $250, $251), $260 => $261 => $262 => Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Types_either(() => $267 => Util_renderIO($212, csegen_72(), $267), () => csegen_424(), Config_checkConfigConsistency($212)), $273 => $274 => $275 => Data_Promise_pure_Applicative_Promise($212, $274, $275), $261, $262), $24b, $24c), $239, $23a), $225, $226);
9325
+ return $225 => $226 => Data_Promise_x3ex3ex3d_Monad_Promise($229 => $22a => Data_Promise_map_Functor_Promise($22d => (undefined), $22f => $230 => Config_writeConfig($212, $22f, $230), $229, $22a), $238 => $239 => $23a => Data_Promise_x3ex3ex3d_Monad_Promise($23d => $23e => $23f => Data_Promise_liftIO_HasIO_Promise($242 => Prelude_IO_prim__putStr('Your new configuration is:\n', $242), $23d, $23e, $23f), $24a => $24b => $24c => Data_Promise_x3ex3ex3d_Monad_Promise($24f => $250 => $251 => Data_Promise_liftIO_HasIO_Promise($254 => Prelude_IO_prim__putStr((Data_Config_show_Show_Config($212)+'\n'), $254), $24f, $250, $251), $260 => $261 => $262 => Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Types_either(() => $267 => Util_renderIO($212, csegen_72(), $267), () => csegen_426(), Config_checkConfigConsistency($212)), $273 => $274 => $275 => Data_Promise_pure_Applicative_Promise($212, $274, $275), $261, $262), $24b, $24c), $239, $23a), $225, $226);
9320
9326
  };
9321
9327
  return Data_Promise_x3ex3ex3d_Monad_Promise($20a => $20b => FFI_GitHub_listOrgMembers(_, org, $20a, $20b), $211, $206, $207);
9322
9328
  };
@@ -9325,7 +9331,7 @@ function Config_createConfig($0, $1, $2, $3, $4, $5) {
9325
9331
  return Data_Promise_x3ex3ex3d_Monad_Promise($1f1 => $1f2 => FFI_GitHub_listTeams(_, org, $1f1, $1f2), $1f8, $1ed, $1ee);
9326
9332
  };
9327
9333
  };
9328
- return Data_Promise_x3ex3ex3d_Monad_Promise(csegen_441(), $1dd, $1d8, $1d9);
9334
+ return Data_Promise_x3ex3ex3d_Monad_Promise(csegen_443(), $1dd, $1d8, $1d9);
9329
9335
  };
9330
9336
  return Data_Promise_x3ex3ex3d_Monad_Promise($1cf => $1d0 => FFI_GitHub_getRepoDefaultBranch(_, org, repo, $1cf, $1d0), $1d7, $1cb, $1cc);
9331
9337
  };
@@ -9339,22 +9345,22 @@ function Config_createConfig($0, $1, $2, $3, $4, $5) {
9339
9345
  };
9340
9346
  return Data_Promise_x3ex3ex3d_Monad_Promise(Util_yesNoPrompt(csegen_72(), 'Would you like harmony to comment when it requests reviewers?'), $195, $18d, $18e);
9341
9347
  };
9342
- return Data_Promise_x3ex3ex3d_Monad_Promise($179 => $17a => Data_Promise_map_Functor_Promise($17d => Config_n__9228_2416_orIfEmpty($0, $3, $2, $1, {a1: remoteGuess}, Data_String_trim($17d)), csegen_459(), $179, $17a), $18c, $175, $176);
9348
+ return Data_Promise_x3ex3ex3d_Monad_Promise($179 => $17a => Data_Promise_map_Functor_Promise($17d => Config_n__9228_2416_orIfEmpty($0, $3, $2, $1, {a1: remoteGuess}, Data_String_trim($17d)), csegen_461(), $179, $17a), $18c, $175, $176);
9343
9349
  };
9344
9350
  return Data_Promise_x3ex3ex3d_Monad_Promise($159 => $15a => $15b => Data_Promise_liftIO_HasIO_Promise($15e => Prelude_IO_prim__putStr((Prelude_Types_foldMap_Foldable_List(csegen_49(), $166 => $166, {a1: 'What GitHub remote repo would you like to use harmony for', a2: {a1: $14e, a2: {a1: '?', a2: {h: 0}}}})+'\n'), $15e), $159, $15a, $15b), $173, $155, $156);
9345
9351
  };
9346
9352
  };
9347
- return Data_Promise_x3ex3ex3d_Monad_Promise($135 => $136 => Data_Promise_map_Functor_Promise($139 => Config_n__9228_2416_orIfEmpty($0, $3, $2, $1, Config_n__9228_2418_repo($0, $3, $2, $1, defaultOrgAndRepo), Data_String_trim($139)), csegen_459(), $135, $136), $14d, $131, $132);
9353
+ return Data_Promise_x3ex3ex3d_Monad_Promise($135 => $136 => Data_Promise_map_Functor_Promise($139 => Config_n__9228_2416_orIfEmpty($0, $3, $2, $1, Config_n__9228_2418_repo($0, $3, $2, $1, defaultOrgAndRepo), Data_String_trim($139)), csegen_461(), $135, $136), $14d, $131, $132);
9348
9354
  };
9349
9355
  return Data_Promise_x3ex3ex3d_Monad_Promise($115 => $116 => $117 => Data_Promise_liftIO_HasIO_Promise($11a => Prelude_IO_prim__putStr((Prelude_Types_foldMap_Foldable_List(csegen_49(), $122 => $122, {a1: 'What repository would you like to use harmony for', a2: {a1: $108, a2: {a1: '?', a2: {h: 0}}}})+'\n'), $11a), $115, $116, $117), $12f, $111, $112);
9350
9356
  };
9351
9357
  };
9352
- return Data_Promise_x3ex3ex3d_Monad_Promise($ef => $f0 => Data_Promise_map_Functor_Promise($f3 => Config_n__9228_2416_orIfEmpty($0, $3, $2, $1, Config_n__9228_2417_org($0, $3, $2, $1, defaultOrgAndRepo), Data_String_trim($f3)), csegen_459(), $ef, $f0), $107, $eb, $ec);
9358
+ return Data_Promise_x3ex3ex3d_Monad_Promise($ef => $f0 => Data_Promise_map_Functor_Promise($f3 => Config_n__9228_2416_orIfEmpty($0, $3, $2, $1, Config_n__9228_2417_org($0, $3, $2, $1, defaultOrgAndRepo), Data_String_trim($f3)), csegen_461(), $ef, $f0), $107, $eb, $ec);
9353
9359
  };
9354
9360
  return Data_Promise_x3ex3ex3d_Monad_Promise($cf => $d0 => $d1 => Data_Promise_liftIO_HasIO_Promise($d4 => Prelude_IO_prim__putStr((Prelude_Types_foldMap_Foldable_List(csegen_49(), $dc => $dc, {a1: 'What GitHub org would you like to use harmony for', a2: {a1: $c2, a2: {a1: '?', a2: {h: 0}}}})+'\n'), $d4), $cf, $d0, $d1), $e9, $cb, $cc);
9355
9361
  };
9356
9362
  };
9357
- return Data_Promise_x3ex3ex3d_Monad_Promise($a8 => $a9 => Data_Promise_x3cx7cx3e_Alternative_Promise($ac => $ad => Data_Promise_map_Functor_Promise($b0 => Config_parseGitHubURI($b0), $b4 => $b5 => FFI_Git_remoteURI($0, remoteGuess, $b4, $b5), $ac, $ad), () => csegen_461(), $a8, $a9), $c1, $a4, $a5);
9363
+ return Data_Promise_x3ex3ex3d_Monad_Promise($a8 => $a9 => Data_Promise_x3cx7cx3e_Alternative_Promise($ac => $ad => Data_Promise_map_Functor_Promise($b0 => Config_parseGitHubURI($b0), $b4 => $b5 => FFI_Git_remoteURI($0, remoteGuess, $b4, $b5), $ac, $ad), () => csegen_463(), $a8, $a9), $c1, $a4, $a5);
9358
9364
  };
9359
9365
  return Data_Promise_x3ex3ex3d_Monad_Promise($93 => $94 => Data_Promise_map_Functor_Promise($97 => Config_preferOriginRemote($97), $9b => $9c => FFI_Git_listRemotes($0, $9b, $9c), $93, $94), $a3, $8e, $8f);
9360
9366
  }
@@ -9636,7 +9642,7 @@ function Commands_n__9789_2510_parseSkipArg($0, $1) {
9636
9642
 
9637
9643
  /* Commands.9789:2509:parseIgnoreOpt */
9638
9644
  function Commands_n__9789_2509_parseIgnoreOpt($0, $1) {
9639
- const $2 = Data_String_split(csegen_425(), $1);
9645
+ const $2 = Data_String_split(csegen_427(), $1);
9640
9646
  const $7 = Data_List1_last($2);
9641
9647
  return Prelude_Types_map_Functor_Maybe($c => $c, Data_String_parsePositive(csegen_2(), $7));
9642
9648
  }
@@ -9761,7 +9767,7 @@ function Commands_parseGraphArgs($0) {
9761
9767
  switch($0.a2.a2.h) {
9762
9768
  case undefined: /* cons */ return {h: 0 /* Left */, a1: 'graph accepts at most one team name and the --completed flag.'};
9763
9769
  default: {
9764
- const $6 = Prelude_Types_traverse_Traversable_List(csegen_9(), $b => Commands_x3cx7cx7cx3e(csegen_489(), $10 => Commands_n__9630_2372_parseCompletedFlag($0, $10), $15 => Commands_n__9630_2373_parseTeamArg($0, $15), $b), $0);
9770
+ const $6 = Prelude_Types_traverse_Traversable_List(csegen_9(), $b => Commands_x3cx7cx7cx3e(csegen_491(), $10 => Commands_n__9630_2372_parseCompletedFlag($0, $10), $15 => Commands_n__9630_2373_parseTeamArg($0, $15), $b), $0);
9765
9771
  switch($6.h) {
9766
9772
  case undefined: /* just */ return {h: 1 /* Right */, a1: $6.a1};
9767
9773
  case 0: /* nothing */ return {h: 0 /* Left */, a1: 'The graph command expects the name of a GitHub Team and optionally --completed as arguments.'};
@@ -9770,7 +9776,7 @@ function Commands_parseGraphArgs($0) {
9770
9776
  }
9771
9777
  }
9772
9778
  default: {
9773
- const $1d = Prelude_Types_traverse_Traversable_List(csegen_9(), $22 => Commands_x3cx7cx7cx3e(csegen_489(), $27 => Commands_n__9630_2372_parseCompletedFlag($0, $27), $2c => Commands_n__9630_2373_parseTeamArg($0, $2c), $22), $0);
9779
+ const $1d = Prelude_Types_traverse_Traversable_List(csegen_9(), $22 => Commands_x3cx7cx7cx3e(csegen_491(), $27 => Commands_n__9630_2372_parseCompletedFlag($0, $27), $2c => Commands_n__9630_2373_parseTeamArg($0, $2c), $22), $0);
9774
9780
  switch($1d.h) {
9775
9781
  case undefined: /* just */ return {h: 1 /* Right */, a1: $1d.a1};
9776
9782
  case 0: /* nothing */ return {h: 0 /* Left */, a1: 'The graph command expects the name of a GitHub Team and optionally --completed as arguments.'};
@@ -9779,7 +9785,7 @@ function Commands_parseGraphArgs($0) {
9779
9785
  }
9780
9786
  }
9781
9787
  default: {
9782
- const $34 = Prelude_Types_traverse_Traversable_List(csegen_9(), $39 => Commands_x3cx7cx7cx3e(csegen_489(), $3e => Commands_n__9630_2372_parseCompletedFlag($0, $3e), $43 => Commands_n__9630_2373_parseTeamArg($0, $43), $39), $0);
9788
+ const $34 = Prelude_Types_traverse_Traversable_List(csegen_9(), $39 => Commands_x3cx7cx7cx3e(csegen_491(), $3e => Commands_n__9630_2372_parseCompletedFlag($0, $3e), $43 => Commands_n__9630_2373_parseTeamArg($0, $43), $39), $0);
9783
9789
  switch($34.h) {
9784
9790
  case undefined: /* just */ return {h: 1 /* Right */, a1: $34.a1};
9785
9791
  case 0: /* nothing */ return {h: 0 /* Left */, a1: 'The graph command expects the name of a GitHub Team and optionally --completed as arguments.'};
@@ -9795,7 +9801,7 @@ function Commands_parseContributeArgs($0) {
9795
9801
  default: {
9796
9802
  const $3 = Commands_n__9789_2511_recombineIgnoreArgs($0, $0);
9797
9803
  const $7 = Prelude_Types_List_mapAppend({h: 0}, $b => ({h: 1 /* Ignore */, a1: $b}), $3.a1);
9798
- const $e = Prelude_Types_traverse_Traversable_List(csegen_9(), $13 => Commands_x3cx7cx7cx3e(csegen_489(), $18 => Commands_n__9789_2510_parseSkipArg($0, $18), $1d => Commands_n__9789_2508_parseCheckoutFlag($0, $1d), $13), $3.a2);
9804
+ const $e = Prelude_Types_traverse_Traversable_List(csegen_9(), $13 => Commands_x3cx7cx7cx3e(csegen_491(), $18 => Commands_n__9789_2510_parseSkipArg($0, $18), $1d => Commands_n__9789_2508_parseCheckoutFlag($0, $1d), $13), $3.a2);
9799
9805
  return Data_Either_maybeToEither(() => Commands_contributeUsageError(), Prelude_Types_map_Functor_Maybe($29 => Prelude_Types_List_tailRecAppend($7, $29), $e));
9800
9806
  }
9801
9807
  }
@@ -9803,7 +9809,7 @@ function Commands_parseContributeArgs($0) {
9803
9809
 
9804
9810
  /* Commands.list : Config => Octokit => String -> Promise () */
9805
9811
  function Commands_list($0, $1, $2, $3, $4) {
9806
- return Data_Promise_x3ex3ex3d_Monad_Promise($7 => $8 => Data_Promise_map_Functor_Promise(csegen_490(), $d => $e => FFI_GitHub_listTeamMembers($1, $0.a2, $2, $d, $e), $7, $8), teamMemberLogins => $19 => $1a => Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Basics_flip(csegen_396(), csegen_491(), Prelude_Types_traverse_Traversable_List(csegen_64(), $27 => Commands_n__9180_1921_forkedUser($1, $2, $0, $27), teamMemberLogins)), teamMembersJson => $2f => $30 => Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Types_traverse_Traversable_List(csegen_64(), $37 => $38 => Data_Promise_either(csegen_51(), Data_User_parseUser($37), $38), teamMembersJson), teamMembers => Util_renderIO($0, csegen_72(), Text_PrettyPrint_Prettyprinter_Doc_vsep(Prelude_Types_List_mapAppend({h: 0}, $4c => Commands_n__9180_1922_putNameLn($1, $2, $0, $4c), teamMembers))), $2f, $30), $19, $1a), $3, $4);
9812
+ return Data_Promise_x3ex3ex3d_Monad_Promise($7 => $8 => Data_Promise_map_Functor_Promise(csegen_492(), $d => $e => FFI_GitHub_listTeamMembers($1, $0.a2, $2, $d, $e), $7, $8), teamMemberLogins => $19 => $1a => Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Basics_flip(csegen_398(), csegen_493(), Prelude_Types_traverse_Traversable_List(csegen_64(), $27 => Commands_n__9180_1921_forkedUser($1, $2, $0, $27), teamMemberLogins)), teamMembersJson => $2f => $30 => Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Types_traverse_Traversable_List(csegen_64(), $37 => $38 => Data_Promise_either(csegen_51(), Data_User_parseUser($37), $38), teamMembersJson), teamMembers => Util_renderIO($0, csegen_72(), Text_PrettyPrint_Prettyprinter_Doc_vsep(Prelude_Types_List_mapAppend({h: 0}, $4c => Commands_n__9180_1922_putNameLn($1, $2, $0, $4c), teamMembers))), $2f, $30), $19, $1a), $3, $4);
9807
9813
  }
9808
9814
 
9809
9815
  /* Commands.label : Config => Git => Octokit => List String -> Promise () */
@@ -9875,12 +9881,12 @@ function Commands_contribute($0, $1, $2, $3, $4, $5) {
9875
9881
  const $53 = Prelude_Types_List_filterAppend({h: 0}, $56, $13);
9876
9882
  const $5d = Prelude_Types_List_filterAppend({h: 0}, $61 => Commands_n__10119_2847_isNotIgnored($1, $2, $3, $0, configx27, $61), $53);
9877
9883
  const $6a = Data_List_partition($6d => Data_PullRequest_isRequestedReviewer(myLogin, $6d), $5d);
9878
- return Commands_case__contribute_3017($1, $2, $3, $0, openPrs, $13, myLogin, $2a, configx27, $40, $4d, $53, $5d, $6a, Prelude_Interfaces_mapHom({a1: d => b => c => a => $85 => $86 => $87 => ({a1: $85($87.a1), a2: $86($87.a2)}), a2: b => c => a => $90 => $91 => ({a1: $90($91.a1), a2: $91.a2}), a3: a => d => b => $98 => $99 => ({a1: $99.a1, a2: $98($99.a2)})}, $a0 => Data_List_sortBy(csegen_503(), $a0), $6a));
9884
+ return Commands_case__contribute_3017($1, $2, $3, $0, openPrs, $13, myLogin, $2a, configx27, $40, $4d, $53, $5d, $6a, Prelude_Interfaces_mapHom({a1: d => b => c => a => $85 => $86 => $87 => ({a1: $85($87.a1), a2: $86($87.a2)}), a2: b => c => a => $90 => $91 => ({a1: $90($91.a1), a2: $91.a2}), a3: a => d => b => $98 => $99 => ({a1: $99.a1, a2: $98($99.a2)})}, $a0 => Data_List_sortBy(csegen_505(), $a0), $6a));
9879
9885
  };
9880
9886
  return Data_Promise_x3ex3ex3d_Monad_Promise($30, $3f, $2d, $2e);
9881
9887
  };
9882
9888
  };
9883
- return Data_Promise_x3ex3ex3d_Monad_Promise($1f => $20 => Data_Promise_map_Functor_Promise(csegen_499(), FFI_GitHub_getSelf($2), $1f, $20), $29, $1b, $1c);
9889
+ return Data_Promise_x3ex3ex3d_Monad_Promise($1f => $20 => Data_Promise_map_Functor_Promise(csegen_501(), FFI_GitHub_getSelf($2), $1f, $20), $29, $1b, $1c);
9884
9890
  };
9885
9891
  };
9886
9892
  return Data_Promise_x3ex3ex3d_Monad_Promise(FFI_GitHub_listPullRequests($2, $0.a2, $0.a3, {a1: 0}, 100n, 0n), $12, $4, $5);
@@ -9904,7 +9910,7 @@ function Commands_x3cx7cx7cx3e($0, $1, $2, $3) {
9904
9910
 
9905
9911
  /* User.Reflect.case block in case block in reflectOnSelf */
9906
9912
  function User_Reflect_case__casex20blockx20inx20reflectOnSelf_1862($0, $1, $2, $3, $4, $5, $6, $7, $8, $9) {
9907
- const $b = Prelude_Interfaces_mapHom({a1: d => b => c => a => $f => $10 => $11 => ({a1: $f($11.a1), a2: $10($11.a2)}), a2: b => c => a => $1a => $1b => ({a1: $1a($1b.a1), a2: $1b.a2}), a3: a => d => b => $22 => $23 => ({a1: $23.a1, a2: $22($23.a2)})}, $2a => Data_List_headx27(Data_List_sort({a1: {a1: $31 => $32 => Data_Date_x3dx3d_Eq_Date($31, $32), a2: $37 => $38 => Data_Date_x2fx3d_Eq_Date($37, $38)}, a2: $3d => $3e => Data_Date_compare_Ord_Date($3d, $3e), a3: $43 => $44 => Data_Date_x3c_Ord_Date($43, $44), a4: $49 => $4a => Data_Date_x3e_Ord_Date($49, $4a), a5: $4f => $50 => Data_Date_x3cx3d_Ord_Date($4f, $50), a6: $55 => $56 => Data_Date_x3ex3d_Ord_Date($55, $56), a7: $5b => $5c => Data_Date_max_Ord_Date($5b, $5c), a8: $61 => $62 => Data_Date_min_Ord_Date($61, $62)}, Prelude_Types_List_mapAppend({h: 0}, csegen_516(), $2a))), {a1: $7, a2: $9.a1});
9913
+ const $b = Prelude_Interfaces_mapHom({a1: d => b => c => a => $f => $10 => $11 => ({a1: $f($11.a1), a2: $10($11.a2)}), a2: b => c => a => $1a => $1b => ({a1: $1a($1b.a1), a2: $1b.a2}), a3: a => d => b => $22 => $23 => ({a1: $23.a1, a2: $22($23.a2)})}, $2a => Data_List_headx27(Data_List_sort({a1: {a1: $31 => $32 => Data_Date_x3dx3d_Eq_Date($31, $32), a2: $37 => $38 => Data_Date_x2fx3d_Eq_Date($37, $38)}, a2: $3d => $3e => Data_Date_compare_Ord_Date($3d, $3e), a3: $43 => $44 => Data_Date_x3c_Ord_Date($43, $44), a4: $49 => $4a => Data_Date_x3e_Ord_Date($49, $4a), a5: $4f => $50 => Data_Date_x3cx3d_Ord_Date($4f, $50), a6: $55 => $56 => Data_Date_x3ex3d_Ord_Date($55, $56), a7: $5b => $5c => Data_Date_max_Ord_Date($5b, $5c), a8: $61 => $62 => Data_Date_min_Ord_Date($61, $62)}, Prelude_Types_List_mapAppend({h: 0}, csegen_518(), $2a))), {a1: $7, a2: $9.a1});
9908
9914
  return Util_renderIO($0, csegen_72(), 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));
9909
9915
  }
9910
9916
 
@@ -9987,21 +9993,21 @@ function User_Reflect_reflectOnSelf($0, $1, $2, $3) {
9987
9993
  const $c = prs => $d => $e => {
9988
9994
  const $1b = myLogin => $1c => $1d => {
9989
9995
  const $39 = reviews => {
9990
- const $3a = Prelude_Types_map_Functor_Maybe(csegen_519(), Data_List_headx27(Data_List_sortBy($43 => $44 => Prelude_Basics_on(csegen_501(), csegen_519(), $43, $44), reviews)));
9996
+ const $3a = Prelude_Types_map_Functor_Maybe(csegen_521(), Data_List_headx27(Data_List_sortBy($43 => $44 => Prelude_Basics_on(csegen_503(), csegen_521(), $43, $44), reviews)));
9991
9997
  const $4d = PullRequest_tuple(prs);
9992
9998
  const $50 = Prelude_Interfaces_mapHom({a1: d => b => c => a => $54 => $55 => $56 => ({a1: $54($56.a1), a2: $55($56.a2)}), a2: b => c => a => $5f => $60 => ({a1: $5f($60.a1), a2: $60.a2}), a3: a => d => b => $67 => $68 => ({a1: $68.a1, a2: $67($68.a2)})}, $6f => Prelude_Types_List_filterAppend({h: 0}, $73 => Prelude_EqOrd_x3dx3d_Eq_String($73.a4, myLogin), $6f), $4d);
9993
9999
  return User_Reflect_case__casex20blockx20inx20reflectOnSelf_1862($0, $1, prs, myLogin, reviews, $3a, $4d, $50.a1, $50.a2, Prelude_Interfaces_mapHom({a1: d => b => c => a => $88 => $89 => $8a => ({a1: $88($8a.a1), a2: $89($8a.a2)}), a2: b => c => a => $93 => $94 => ({a1: $93($94.a1), a2: $94.a2}), a3: a => d => b => $9b => $9c => ({a1: $9c.a1, a2: $9b($9c.a2)})}, $a3 => Prelude_Types_List_filterAppend({h: 0}, $a7 => Prelude_Types_foldMap_Foldable_List(csegen_95(), $ac => Prelude_EqOrd_x3dx3d_Eq_String($ac, myLogin), $a7.a6), $a3), $4d));
9994
10000
  };
9995
- return Data_Promise_x3ex3ex3d_Monad_Promise(PullRequest_reviewsByUser($0, $1, myLogin, Data_List_take(User_Reflect_reviewDetailsCount(), Prelude_Types_List_reverse(Data_List_sortBy($2d => $2e => Prelude_Basics_on(csegen_501(), csegen_516(), $2d, $2e), PullRequest_combined(prs))))), $39, $1c, $1d);
10001
+ return Data_Promise_x3ex3ex3d_Monad_Promise(PullRequest_reviewsByUser($0, $1, myLogin, Data_List_take(User_Reflect_reviewDetailsCount(), Prelude_Types_List_reverse(Data_List_sortBy($2d => $2e => Prelude_Basics_on(csegen_503(), csegen_518(), $2d, $2e), PullRequest_combined(prs))))), $39, $1c, $1d);
9996
10002
  };
9997
- return Data_Promise_x3ex3ex3d_Monad_Promise($11 => $12 => Data_Promise_map_Functor_Promise(csegen_499(), FFI_GitHub_getSelf($1), $11, $12), $1b, $d, $e);
10003
+ return Data_Promise_x3ex3ex3d_Monad_Promise($11 => $12 => Data_Promise_map_Functor_Promise(csegen_501(), FFI_GitHub_getSelf($1), $11, $12), $1b, $d, $e);
9998
10004
  };
9999
10005
  return Data_Promise_x3ex3ex3d_Monad_Promise(PullRequest_listPartitionedPRs($0, $1, 4n, User_Reflect_prCount()), $c, $2, $3);
10000
10006
  }
10001
10007
 
10002
10008
  /* User.Me.printInfoOnSelf : Config => Octokit => Git => Promise () */
10003
10009
  function User_Me_printInfoOnSelf($0, $1, $2, $3, $4) {
10004
- return Data_Promise_x3ex3ex3d_Monad_Promise($7 => $8 => Data_Promise_map_Functor_Promise($b => User_Me_n__7361_2135_handleUnsetEmail($0, $1, $2, $b), $12 => $13 => FFI_Git_userEmail($2, $12, $13), $7, $8), gitEmail => $1b => $1c => Data_Promise_x3ex3ex3d_Monad_Promise(FFI_GitHub_getSelf($1), githubUser => $22 => $23 => Data_Promise_x3ex3ex3d_Monad_Promise($26 => $27 => Data_Promise_map_Functor_Promise(csegen_490(), $2c => $2d => FFI_GitHub_listMyTeams($1, $2c, $2d), $26, $27), githubTeams => Util_renderIO($0, csegen_72(), User_Me_print(gitEmail, githubUser, githubTeams)), $22, $23), $1b, $1c), $3, $4);
10010
+ return Data_Promise_x3ex3ex3d_Monad_Promise($7 => $8 => Data_Promise_map_Functor_Promise($b => User_Me_n__7361_2135_handleUnsetEmail($0, $1, $2, $b), $12 => $13 => FFI_Git_userEmail($2, $12, $13), $7, $8), gitEmail => $1b => $1c => Data_Promise_x3ex3ex3d_Monad_Promise(FFI_GitHub_getSelf($1), githubUser => $22 => $23 => Data_Promise_x3ex3ex3d_Monad_Promise($26 => $27 => Data_Promise_map_Functor_Promise(csegen_492(), $2c => $2d => FFI_GitHub_listMyTeams($1, $2c, $2d), $26, $27), githubTeams => Util_renderIO($0, csegen_72(), User_Me_print(gitEmail, githubUser, githubTeams)), $22, $23), $1b, $1c), $3, $4);
10005
10011
  }
10006
10012
 
10007
10013
  /* User.Reflect.print : Nat -> Nat -> Nat -> Nat -> Nat -> Nat -> Maybe Date -> Maybe Date -> Maybe Date -> Doc AnsiStyle */
@@ -10049,7 +10055,7 @@ function User_Reflect_graph($0, $1, $2, $3, $4, $5) {
10049
10055
 
10050
10056
  /* User.Reflect.details : Nat -> Nat -> Nat -> Nat -> Nat -> Nat -> Maybe Date -> Maybe Date -> Maybe Date -> Doc AnsiStyle */
10051
10057
  function User_Reflect_details($0, $1, $2, $3, $4, $5, $6, $7, $8) {
10052
- return Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(User_Reflect_intro()), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_underline(), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('Requested Reviews:')), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_indent(2, Text_PrettyPrint_Prettyprinter_Doc_vsep(Data_List_catMaybes({a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('unreviewed:')}, a2: {a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_indent(2, Text_PrettyPrint_Prettyprinter_Doc_vsep(Data_List_catMaybes({a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_hsep({a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('open:'), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_color(3), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_Nat($2)), a2: {h: 0}}})}, a2: {a1: Prelude_Types_map_Functor_Maybe(csegen_525(), $8), a2: {a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_hsep({a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('closed:'), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_color(1), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_Nat($3)), a2: {h: 0}}})}, a2: {h: 0}}}})))}, a2: {a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_hsep({a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('reviews*:'), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_color(2), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_Nat($1)), a2: {h: 0}}})}, a2: {a1: Prelude_Types_map_Functor_Maybe(date => Text_PrettyPrint_Prettyprinter_Doc_indent(2, Text_PrettyPrint_Prettyprinter_Doc_hsep({a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('most recent:'), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(Data_Date_show_Show_Date(date)), a2: {h: 0}}})), $6), a2: {h: 0}}}}}))), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_underline(), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('Authored Pulls:')), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_indent(2, Text_PrettyPrint_Prettyprinter_Doc_vsep(Data_List_catMaybes({a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_hsep({a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('open:'), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_color(3), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_Nat($5)), a2: {h: 0}}})}, a2: {a1: Prelude_Types_map_Functor_Maybe(csegen_525(), $7), a2: {a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_hsep({a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('closed:'), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_color(2), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_Nat($4)), a2: {h: 0}}})}, a2: {h: 0}}}}))), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_italic(), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(Prelude_Types_foldMap_Foldable_List(csegen_49(), $cf => $cf, {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}}}}}}}}}});
10058
+ return Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(User_Reflect_intro()), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_underline(), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('Requested Reviews:')), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_indent(2, Text_PrettyPrint_Prettyprinter_Doc_vsep(Data_List_catMaybes({a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('unreviewed:')}, a2: {a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_indent(2, Text_PrettyPrint_Prettyprinter_Doc_vsep(Data_List_catMaybes({a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_hsep({a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('open:'), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_color(3), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_Nat($2)), a2: {h: 0}}})}, a2: {a1: Prelude_Types_map_Functor_Maybe(csegen_527(), $8), a2: {a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_hsep({a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('closed:'), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_color(1), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_Nat($3)), a2: {h: 0}}})}, a2: {h: 0}}}})))}, a2: {a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_hsep({a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('reviews*:'), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_color(2), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_Nat($1)), a2: {h: 0}}})}, a2: {a1: Prelude_Types_map_Functor_Maybe(date => Text_PrettyPrint_Prettyprinter_Doc_indent(2, Text_PrettyPrint_Prettyprinter_Doc_hsep({a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('most recent:'), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(Data_Date_show_Show_Date(date)), a2: {h: 0}}})), $6), a2: {h: 0}}}}}))), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_underline(), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('Authored Pulls:')), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_indent(2, Text_PrettyPrint_Prettyprinter_Doc_vsep(Data_List_catMaybes({a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_hsep({a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('open:'), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_color(3), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_Nat($5)), a2: {h: 0}}})}, a2: {a1: Prelude_Types_map_Functor_Maybe(csegen_527(), $7), a2: {a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_hsep({a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('closed:'), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_color(2), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_Nat($4)), a2: {h: 0}}})}, a2: {h: 0}}}}))), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_italic(), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(Prelude_Types_foldMap_Foldable_List(csegen_49(), $cf => $cf, {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}}}}}}}}}});
10053
10059
  }
10054
10060
 
10055
10061
  /* User.Reflect.chart : Nat -> Nat -> Nat -> Nat -> Nat -> Nat -> Nat -> Doc AnsiStyle */
@@ -10236,7 +10242,7 @@ function PullRequest_n__10285_2626_createPR($0, $1, $2, $3, $4, $5, $6) {
10236
10242
  };
10237
10243
  return Data_Promise_x3ex3ex3d_Monad_Promise($16f => $170 => Util_relativeToRoot($0, '.github/PULL_REQUEST_TEMPLATE.md', $16f, $170), $176, $16b, $16c);
10238
10244
  };
10239
- return Data_Promise_x3ex3ex3d_Monad_Promise($15d => $15e => Data_Promise_map_Functor_Promise($161 => ($13b+Data_String_trim($161)), csegen_459(), $15d, $15e), $16a, $159, $15a);
10245
+ return Data_Promise_x3ex3ex3d_Monad_Promise($15d => $15e => Data_Promise_map_Functor_Promise($161 => ($13b+Data_String_trim($161)), csegen_461(), $15d, $15e), $16a, $159, $15a);
10240
10246
  };
10241
10247
  return Data_Promise_x3ex3ex3d_Monad_Promise($14b => $14c => $14d => Data_Promise_liftIO_HasIO_Promise($150 => Prelude_IO_prim__putStr($13b, $150), $14b, $14c, $14d), $157, $147, $148);
10242
10248
  };
@@ -10245,7 +10251,7 @@ function PullRequest_n__10285_2626_createPR($0, $1, $2, $3, $4, $5, $6) {
10245
10251
  return Data_Promise_x3ex3ex3d_Monad_Promise($12c => $12d => $12e => Data_Promise_liftIO_HasIO_Promise($131 => Prelude_IO_prim__putStr('What would you like the title to be?\n', $131), $12c, $12d, $12e), $138, $128, $129);
10246
10252
  };
10247
10253
  };
10248
- return Data_Promise_x3ex3ex3d_Monad_Promise($10f => $110 => Data_Promise_map_Functor_Promise($113 => Data_String_trim($113), csegen_459(), $10f, $110), $11a, $10b, $10c);
10254
+ return Data_Promise_x3ex3ex3d_Monad_Promise($10f => $110 => Data_Promise_map_Functor_Promise($113 => Data_String_trim($113), csegen_461(), $10f, $110), $11a, $10b, $10c);
10249
10255
  };
10250
10256
  return Data_Promise_x3ex3ex3d_Monad_Promise($ee => $ef => $f0 => Data_Promise_liftIO_HasIO_Promise($f3 => Prelude_IO_prim__putStr((Prelude_Types_foldMap_Foldable_List(csegen_49(), $fb => $fb, {a1: 'What branch are you merging into (ENTER for default: ', a2: {a1: $4.a5, a2: {a1: ')?', a2: {h: 0}}}})+'\n'), $f3), $ee, $ef, $f0), $109, $ea, $eb);
10251
10257
  };
@@ -10270,7 +10276,7 @@ function PullRequest_n__10285_2626_createPR($0, $1, $2, $3, $4, $5, $6) {
10270
10276
  function PullRequest_n__10285_2625_continueGivenUncommittedChanges($0, $1, $2, $3, $4, $5, $6) {
10271
10277
  const $f = $10 => $11 => $12 => {
10272
10278
  switch($10.h) {
10273
- case undefined: /* just */ return Data_Promise_x3ex3ex3d_Monad_Promise($16 => $17 => $18 => Data_Promise_liftIO_HasIO_Promise($1b => Prelude_IO_prim__putStr('The following files have uncommitted changes:\n', $1b), $16, $17, $18), $23 => $24 => $25 => Data_Promise_x3ex3ex3d_Monad_Promise($28 => $29 => $2a => Data_Promise_liftIO_HasIO_Promise($2d => Prelude_IO_prim__putStr(($10.a1+'\n'), $2d), $28, $29, $2a), csegen_555(), $24, $25), $11, $12);
10279
+ case undefined: /* just */ return Data_Promise_x3ex3ex3d_Monad_Promise($16 => $17 => $18 => Data_Promise_liftIO_HasIO_Promise($1b => Prelude_IO_prim__putStr('The following files have uncommitted changes:\n', $1b), $16, $17, $18), $23 => $24 => $25 => Data_Promise_x3ex3ex3d_Monad_Promise($28 => $29 => $2a => Data_Promise_liftIO_HasIO_Promise($2d => Prelude_IO_prim__putStr(($10.a1+'\n'), $2d), $28, $29, $2a), csegen_557(), $24, $25), $11, $12);
10274
10280
  case 0: /* nothing */ return Data_Promise_pure_Applicative_Promise(1, $11, $12);
10275
10281
  }
10276
10282
  };
@@ -10281,7 +10287,7 @@ function PullRequest_n__10285_2625_continueGivenUncommittedChanges($0, $1, $2, $
10281
10287
  function PullRequest_n__10285_2624_continueGivenStagedChanges($0, $1, $2, $3, $4, $5, $6) {
10282
10288
  const $f = $10 => $11 => $12 => {
10283
10289
  switch($10.h) {
10284
- case undefined: /* just */ return Data_Promise_x3ex3ex3d_Monad_Promise($16 => $17 => $18 => Data_Promise_liftIO_HasIO_Promise($1b => Prelude_IO_prim__putStr('The following files have staged but uncommitted changes:\n', $1b), $16, $17, $18), $23 => $24 => $25 => Data_Promise_x3ex3ex3d_Monad_Promise($28 => $29 => $2a => Data_Promise_liftIO_HasIO_Promise($2d => Prelude_IO_prim__putStr(($10.a1+'\n'), $2d), $28, $29, $2a), csegen_555(), $24, $25), $11, $12);
10290
+ case undefined: /* just */ return Data_Promise_x3ex3ex3d_Monad_Promise($16 => $17 => $18 => Data_Promise_liftIO_HasIO_Promise($1b => Prelude_IO_prim__putStr('The following files have staged but uncommitted changes:\n', $1b), $16, $17, $18), $23 => $24 => $25 => Data_Promise_x3ex3ex3d_Monad_Promise($28 => $29 => $2a => Data_Promise_liftIO_HasIO_Promise($2d => Prelude_IO_prim__putStr(($10.a1+'\n'), $2d), $28, $29, $2a), csegen_557(), $24, $25), $11, $12);
10285
10291
  case 0: /* nothing */ return Data_Promise_pure_Applicative_Promise(1, $11, $12);
10286
10292
  }
10287
10293
  };
@@ -10325,7 +10331,7 @@ function PullRequest_reviewsForPrs($0, $1, $2, $3, $4) {
10325
10331
  };
10326
10332
  return Data_Promise_x3ex3ex3d_Monad_Promise($1c, reviews => $43 => $44 => Data_Promise_pure_Applicative_Promise(Prelude_Types_join_Monad_List(reviews), $43, $44), $19, $1a);
10327
10333
  };
10328
- return Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Basics_flip(csegen_396(), csegen_491(), Prelude_Types_traverse_Traversable_List(csegen_64(), $11 => PullRequest_n__9368_1704_forkedReviews($0, $1, $2, $11), $2)), $18, $3, $4);
10334
+ return Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Basics_flip(csegen_398(), csegen_493(), Prelude_Types_traverse_Traversable_List(csegen_64(), $11 => PullRequest_n__9368_1704_forkedReviews($0, $1, $2, $11), $2)), $18, $3, $4);
10329
10335
  }
10330
10336
 
10331
10337
  /* PullRequest.reviewsByUser : Config => Octokit => String -> List PullRequest -> Promise (List Review) */
@@ -10376,7 +10382,7 @@ function PullRequest_requestReviewers($0, $1, $2, $3, $4, $5, $6, $7) {
10376
10382
  break;
10377
10383
  }
10378
10384
  case 0: {
10379
- $37 = csegen_461();
10385
+ $37 = csegen_463();
10380
10386
  break;
10381
10387
  }
10382
10388
  }
@@ -10495,12 +10501,12 @@ function PullRequest_listx27($0, $1, $2, $3) {
10495
10501
  }
10496
10502
  };
10497
10503
  const $4d = {a1: $4e, a2: a => $56 => ({h: 1 /* Right */, a1: $56}), a3: $58};
10498
- const $4b = Prelude_Types_traverse_Traversable_List($4d, csegen_416(), prJsons);
10504
+ const $4b = Prelude_Types_traverse_Traversable_List($4d, csegen_418(), prJsons);
10499
10505
  return Data_Promise_either(csegen_51(), $4b, $47);
10500
10506
  };
10501
10507
  return Data_Promise_x3ex3ex3d_Monad_Promise($46, pulls => $67 => $68 => Data_Promise_pure_Applicative_Promise(Prelude_Types_join_Monad_List(pulls), $67, $68), $43, $44);
10502
10508
  };
10503
- return Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Basics_flip(csegen_396(), $a => $b => $c => FFI_Concurrency_promiseAll({a1: acc => elem => func => init => input => Data_Pagination_foldr_Foldable_x28x28x28Paginationx20x24itemsx29x20x24perPagex29x20x24pagex29(func, init, input), a2: elem => acc => func => init => input => Data_Pagination_foldl_Foldable_x28x28x28Paginationx20x24itemsx29x20x24perPagex29x20x24pagex29(func, init, input), a3: elem => $1a => Data_Pagination_null_Foldable_x28x28x28Paginationx20x24itemsx29x20x24perPagex29x20x24pagex29($1a), a4: elem => acc => m => $1e => funcM => init => input => Data_Pagination_foldlM_Foldable_x28x28x28Paginationx20x24itemsx29x20x24perPagex29x20x24pagex29($1e, funcM, init, input), a5: elem => $25 => Data_Pagination_toList_Foldable_x28x28x28Paginationx20x24itemsx29x20x24perPagex29x20x24pagex29($25), a6: a => m => $29 => f => $2a => Data_Pagination_foldMap_Foldable_x28x28x28Paginationx20x24itemsx29x20x24perPagex29x20x24pagex29($29, f, $2a)}, $a, $b, $c), Data_Pagination_traversex27(csegen_64(), $37 => $38 => $39 => $3a => PullRequest_forkedPRs($0, $37, $38, $39, $3a), $1)), $42, $2, $3);
10509
+ return Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Basics_flip(csegen_398(), $a => $b => $c => FFI_Concurrency_promiseAll({a1: acc => elem => func => init => input => Data_Pagination_foldr_Foldable_x28x28x28Paginationx20x24itemsx29x20x24perPagex29x20x24pagex29(func, init, input), a2: elem => acc => func => init => input => Data_Pagination_foldl_Foldable_x28x28x28Paginationx20x24itemsx29x20x24perPagex29x20x24pagex29(func, init, input), a3: elem => $1a => Data_Pagination_null_Foldable_x28x28x28Paginationx20x24itemsx29x20x24perPagex29x20x24pagex29($1a), a4: elem => acc => m => $1e => funcM => init => input => Data_Pagination_foldlM_Foldable_x28x28x28Paginationx20x24itemsx29x20x24perPagex29x20x24pagex29($1e, funcM, init, input), a5: elem => $25 => Data_Pagination_toList_Foldable_x28x28x28Paginationx20x24itemsx29x20x24perPagex29x20x24pagex29($25), a6: a => m => $29 => f => $2a => Data_Pagination_foldMap_Foldable_x28x28x28Paginationx20x24itemsx29x20x24perPagex29x20x24pagex29($29, f, $2a)}, $a, $b, $c), Data_Pagination_traversex27(csegen_64(), $37 => $38 => $39 => $3a => PullRequest_forkedPRs($0, $37, $38, $39, $3a), $1)), $42, $2, $3);
10504
10510
  }
10505
10511
 
10506
10512
  /* PullRequest.identifyOrCreatePR : Config => Git => Octokit => {default False _ : Bool} ->
@@ -11093,7 +11099,7 @@ function Graph_n__6343_6621_header($0, $1, $2, $3, $4, $5) {
11093
11099
  break;
11094
11100
  }
11095
11101
  }
11096
- const $34 = {a1: $35, a2: {a1: {a1: Text_PrettyPrint_Prettyprinter_Symbols_parens(Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Graph_n__6343_6624_redDot($0, $1, $2, $3, $4, $5), Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('overlayed on'), Graph_n__6343_6625_yellowDot($0, $1, $2, $3, $4, $5))))}, a2: csegen_602()}};
11102
+ const $34 = {a1: $35, a2: {a1: {a1: Text_PrettyPrint_Prettyprinter_Symbols_parens(Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Graph_n__6343_6624_redDot($0, $1, $2, $3, $4, $5), Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('overlayed on'), Graph_n__6343_6625_yellowDot($0, $1, $2, $3, $4, $5))))}, a2: csegen_604()}};
11097
11103
  const $23 = {a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('1x the number of closed PRs with unanswered review requests'), Text_PrettyPrint_Prettyprinter_Symbols_parens(Graph_n__6343_6624_redDot($0, $1, $2, $3, $4, $5)))}, a2: $34};
11098
11104
  const $12 = {a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('4x the number of open review requests'), Text_PrettyPrint_Prettyprinter_Symbols_parens(Graph_n__6343_6625_yellowDot($0, $1, $2, $3, $4, $5)))}, a2: $23};
11099
11105
  const $d = {a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('Weighted review workload.')}, a2: $12};
@@ -11104,7 +11110,7 @@ function Graph_n__6343_6621_header($0, $1, $2, $3, $4, $5) {
11104
11110
 
11105
11111
  /* Graph.5952:6229:header */
11106
11112
  function Graph_n__5952_6229_header($0, $1, $2) {
11107
- return Text_PrettyPrint_Prettyprinter_Doc_vsep(Data_List_catMaybes({a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc()}, a2: {a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('Open Pull Requests grouped by month created.')}, a2: {a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc()}, a2: csegen_602()}}}));
11113
+ return Text_PrettyPrint_Prettyprinter_Doc_vsep(Data_List_catMaybes({a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc()}, a2: {a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('Open Pull Requests grouped by month created.')}, a2: {a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc()}, a2: csegen_604()}}}));
11108
11114
  }
11109
11115
 
11110
11116
  /* Graph.6343:6620:greenBox */
@@ -11254,9 +11260,9 @@ function Graph_reviewsGraph($0, $1, $2, $3, $4, $5) {
11254
11260
 
11255
11261
  /* Graph.healthGraph : List PullRequest -> String -> String -> Doc AnsiStyle */
11256
11262
  function Graph_healthGraph($0, $1, $2) {
11257
- const $3 = Data_List_groupBy($6 => $7 => Prelude_Basics_on($a => $b => Prelude_Basics_on($e => $f => (($e===$f)?1:0), $13 => $13.a2, $a, $b), csegen_502(), $6, $7), Data_List_sortBy(csegen_503(), $0));
11263
+ const $3 = Data_List_groupBy($6 => $7 => Prelude_Basics_on($a => $b => Prelude_Basics_on($e => $f => (($e===$f)?1:0), $13 => $13.a2, $a, $b), csegen_504(), $6, $7), Data_List_sortBy(csegen_505(), $0));
11258
11264
  const $20 = Prelude_Types_foldr_Foldable_List(xs => m => Prelude_Types_max_Ord_Nat(Data_List1_length(xs), m), 1n, $3);
11259
- return Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Graph_n__5952_6229_header($2, $1, $0), a2: {a1: Graph_graph({a1: $36 => Graph_totalWidth_Graphable_x28PRsOnDatex20x24dateTyx29(csegen_621(), $36), a2: $3c => Graph_label_Graphable_x28PRsOnDatex20x24dateTyx29(csegen_621(), $3c), a3: $42 => Graph_score_Graphable_x28PRsOnDatex20x24dateTyx29(csegen_621(), $42), a4: $48 => Graph_detractor_Graphable_x28PRsOnDatex20x24dateTyx29(csegen_621(), $48), a5: $4e => Graph_bonus_Graphable_x28PRsOnDatex20x24dateTyx29(csegen_621(), $4e)}, $20, Graph_n__5952_6231_unfoldGraph($2, $1, $0, Data_Fuel_limit(48n), $3, {h: 0})), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(Graph_n__5952_6230_link($2, $1, $0)), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {h: 0}}}}}});
11265
+ return Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Graph_n__5952_6229_header($2, $1, $0), a2: {a1: Graph_graph({a1: $36 => Graph_totalWidth_Graphable_x28PRsOnDatex20x24dateTyx29(csegen_623(), $36), a2: $3c => Graph_label_Graphable_x28PRsOnDatex20x24dateTyx29(csegen_623(), $3c), a3: $42 => Graph_score_Graphable_x28PRsOnDatex20x24dateTyx29(csegen_623(), $42), a4: $48 => Graph_detractor_Graphable_x28PRsOnDatex20x24dateTyx29(csegen_623(), $48), a5: $4e => Graph_bonus_Graphable_x28PRsOnDatex20x24dateTyx29(csegen_623(), $4e)}, $20, Graph_n__5952_6231_unfoldGraph($2, $1, $0, Data_Fuel_limit(48n), $3, {h: 0})), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(Graph_n__5952_6230_link($2, $1, $0)), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {h: 0}}}}}});
11260
11266
  }
11261
11267
 
11262
11268
  /* Graph.graphOne : Graphable g => Nat -> g -> Doc AnsiStyle */
@@ -11283,7 +11289,7 @@ function AppVersion_printVersion($0) {
11283
11289
 
11284
11290
  /* AppVersion.appVersion : String */
11285
11291
  const AppVersion_appVersion = __lazy(function () {
11286
- return '4.0.0';
11292
+ return '4.0.1';
11287
11293
  });
11288
11294
 
11289
11295
 
package/package.json CHANGED
@@ -1,8 +1,8 @@
1
1
  {
2
2
  "name": "@mattpolzin/harmony",
3
- "version": "4.0.0",
4
- "engines" : {
5
- "node" : ">=18.0.0"
3
+ "version": "4.0.1",
4
+ "engines": {
5
+ "node": ">=18.0.0"
6
6
  },
7
7
  "publishConfig": {
8
8
  "access": "public"
@@ -17,10 +17,12 @@
17
17
  "homepage": "https://github.com/mattpolzin/harmony#readme",
18
18
  "repository": {
19
19
  "type": "git",
20
- "url": "https://github.com/mattpolzin/harmony.git"
20
+ "url": "git+https://github.com/mattpolzin/harmony.git"
21
21
  },
22
22
  "main": "harmony",
23
- "bin": "./harmony",
23
+ "bin": {
24
+ "harmony": "harmony"
25
+ },
24
26
  "scripts": {},
25
27
  "author": "Mathew Polzin",
26
28
  "license": "MIT",