@mattpolzin/harmony 3.3.0 → 4.0.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 (3) hide show
  1. package/README.md +24 -23
  2. package/harmony +583 -492
  3. package/package.json +1 -1
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_585(), $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_590(), $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_585(), $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_590(), $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_585(), $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_590(), $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_585(), $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_590(), $11b, $11c), $114, $0.a6);
930
930
  switch($118.a1.h) {
931
931
  case 0: /* nothing */ {
932
932
  switch($0.a8) {
@@ -1499,19 +1499,19 @@ function x24tcOpt_14($0) {
1499
1499
  switch($0.a7.a2.a1.a1.a1) {
1500
1500
  case ',': return {h: 1 /* {TcContinue14:1} */, a1: $0.a6, a2: {a1: $0.a5, a2: {a1: $0.a3, a2: $0.a7.a1}}, a3: $0.a7.a2.a2};
1501
1501
  case '}': return {h: 0 /* {TcDone:14} */, a1: {h: 0 /* Succ0 */, a1: {h: 6 /* JObject */, a1: Prelude_Types_SnocList_x3cx3ex3e($0.a5, {a1: {a1: $0.a3, a2: $0.a7.a1}, a2: {h: 0}})}, a2: $0.a7.a2.a2}};
1502
- default: return {h: 0 /* {TcDone:14} */, a1: Text_ParseError_failInParenEOI($0.a6, {h: 0 /* Symbol */, a1: '{'}, csegen_224(), $0.a7)};
1502
+ default: return {h: 0 /* {TcDone:14} */, a1: Text_ParseError_failInParenEOI($0.a6, {h: 0 /* Symbol */, a1: '{'}, csegen_229(), $0.a7)};
1503
1503
  }
1504
1504
  }
1505
- default: return {h: 0 /* {TcDone:14} */, a1: Text_ParseError_failInParenEOI($0.a6, {h: 0 /* Symbol */, a1: '{'}, csegen_224(), $0.a7)};
1505
+ default: return {h: 0 /* {TcDone:14} */, a1: Text_ParseError_failInParenEOI($0.a6, {h: 0 /* Symbol */, a1: '{'}, csegen_229(), $0.a7)};
1506
1506
  }
1507
1507
  }
1508
- default: return {h: 0 /* {TcDone:14} */, a1: Text_ParseError_failInParenEOI($0.a6, {h: 0 /* Symbol */, a1: '{'}, csegen_224(), $0.a7)};
1508
+ default: return {h: 0 /* {TcDone:14} */, a1: Text_ParseError_failInParenEOI($0.a6, {h: 0 /* Symbol */, a1: '{'}, csegen_229(), $0.a7)};
1509
1509
  }
1510
1510
  }
1511
- default: return {h: 0 /* {TcDone:14} */, a1: Text_ParseError_failInParenEOI($0.a6, {h: 0 /* Symbol */, a1: '{'}, csegen_224(), $0.a7)};
1511
+ default: return {h: 0 /* {TcDone:14} */, a1: Text_ParseError_failInParenEOI($0.a6, {h: 0 /* Symbol */, a1: '{'}, csegen_229(), $0.a7)};
1512
1512
  }
1513
1513
  }
1514
- default: return {h: 0 /* {TcDone:14} */, a1: Text_ParseError_failInParenEOI($0.a6, {h: 0 /* Symbol */, a1: '{'}, csegen_224(), $0.a7)};
1514
+ default: return {h: 0 /* {TcDone:14} */, a1: Text_ParseError_failInParenEOI($0.a6, {h: 0 /* Symbol */, a1: '{'}, csegen_229(), $0.a7)};
1515
1515
  }
1516
1516
  }
1517
1517
  }
@@ -1532,7 +1532,7 @@ function x24tcOpt_15($0) {
1532
1532
  switch($0.a3.h) {
1533
1533
  case 0: /* nil */ return {h: 0 /* {TcDone:15} */, a1: {h: 0}};
1534
1534
  case undefined: /* cons */ {
1535
- switch(Prelude_Types_elemBy(csegen_144(), $0.a2, $0.a3.a1, $0.a1)) {
1535
+ switch(Prelude_Types_elemBy(csegen_145(), $0.a2, $0.a3.a1, $0.a1)) {
1536
1536
  case 1: return {h: 1 /* {TcContinue15:1} */, a1: $0.a1, a2: $0.a2, a3: $0.a3.a2};
1537
1537
  case 0: return {h: 0 /* {TcDone:15} */, a1: {a1: $0.a3.a1, a2: Data_List_n__4927_5480_nubByx27({a1: $0.a3.a1, a2: $0.a1}, $0.a2, $0.a3.a2)}};
1538
1538
  }
@@ -2300,19 +2300,19 @@ function x24tcOpt_48($0) {
2300
2300
  switch($0.a4.a2.a1.a1.a1) {
2301
2301
  case ',': return {h: 1 /* {TcContinue48:1} */, a1: $0.a3, a2: {a1: $0.a2, a2: $0.a4.a1}, a3: $0.a4.a2.a2};
2302
2302
  case ']': return {h: 0 /* {TcDone:48} */, a1: {h: 0 /* Succ0 */, a1: {h: 5 /* JArray */, a1: Prelude_Types_SnocList_x3cx3ex3e($0.a2, {a1: $0.a4.a1, a2: {h: 0}})}, a2: $0.a4.a2.a2}};
2303
- default: return {h: 0 /* {TcDone:48} */, a1: Text_ParseError_failInParenEOI($0.a3, {h: 0 /* Symbol */, a1: '['}, csegen_224(), $0.a4)};
2303
+ default: return {h: 0 /* {TcDone:48} */, a1: Text_ParseError_failInParenEOI($0.a3, {h: 0 /* Symbol */, a1: '['}, csegen_229(), $0.a4)};
2304
2304
  }
2305
2305
  }
2306
- default: return {h: 0 /* {TcDone:48} */, a1: Text_ParseError_failInParenEOI($0.a3, {h: 0 /* Symbol */, a1: '['}, csegen_224(), $0.a4)};
2306
+ default: return {h: 0 /* {TcDone:48} */, a1: Text_ParseError_failInParenEOI($0.a3, {h: 0 /* Symbol */, a1: '['}, csegen_229(), $0.a4)};
2307
2307
  }
2308
2308
  }
2309
- default: return {h: 0 /* {TcDone:48} */, a1: Text_ParseError_failInParenEOI($0.a3, {h: 0 /* Symbol */, a1: '['}, csegen_224(), $0.a4)};
2309
+ default: return {h: 0 /* {TcDone:48} */, a1: Text_ParseError_failInParenEOI($0.a3, {h: 0 /* Symbol */, a1: '['}, csegen_229(), $0.a4)};
2310
2310
  }
2311
2311
  }
2312
- default: return {h: 0 /* {TcDone:48} */, a1: Text_ParseError_failInParenEOI($0.a3, {h: 0 /* Symbol */, a1: '['}, csegen_224(), $0.a4)};
2312
+ default: return {h: 0 /* {TcDone:48} */, a1: Text_ParseError_failInParenEOI($0.a3, {h: 0 /* Symbol */, a1: '['}, csegen_229(), $0.a4)};
2313
2313
  }
2314
2314
  }
2315
- default: return {h: 0 /* {TcDone:48} */, a1: Text_ParseError_failInParenEOI($0.a3, {h: 0 /* Symbol */, a1: '['}, csegen_224(), $0.a4)};
2315
+ default: return {h: 0 /* {TcDone:48} */, a1: Text_ParseError_failInParenEOI($0.a3, {h: 0 /* Symbol */, a1: '['}, csegen_229(), $0.a4)};
2316
2316
  }
2317
2317
  }
2318
2318
  }
@@ -2470,68 +2470,73 @@ const csegen_72 = __lazy(function () {
2470
2470
  return {a1: csegen_69(), a2: a => $3 => $4 => $5 => $6 => Data_Promise_liftIO_HasIO_Promise($3, $4, $5, $6)};
2471
2471
  });
2472
2472
 
2473
- /* {csegen:85} */
2474
- const csegen_85 = __lazy(function () {
2475
- return $0 => $1 => Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29($0, $1);
2473
+ /* {csegen:73} */
2474
+ const csegen_73 = __lazy(function () {
2475
+ return Main_printWarning(csegen_72(), 'The \'assign\' command is a deprecated alias for the new \'request\' command.');
2476
2476
  });
2477
2477
 
2478
- /* {csegen:90} */
2479
- const csegen_90 = __lazy(function () {
2480
- return {a1: $1 => $2 => Prelude_EqOrd_x3dx3d_Eq_Char($1, $2), a2: $7 => $8 => Prelude_EqOrd_x2fx3d_Eq_Char($7, $8)};
2478
+ /* {csegen:86} */
2479
+ const csegen_86 = __lazy(function () {
2480
+ return $0 => $1 => Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29($0, $1);
2481
2481
  });
2482
2482
 
2483
2483
  /* {csegen:91} */
2484
2484
  const csegen_91 = __lazy(function () {
2485
- return $0 => $1 => ({a1: $0, a2: $1});
2485
+ return {a1: $1 => $2 => Prelude_EqOrd_x3dx3d_Eq_Char($1, $2), a2: $7 => $8 => Prelude_EqOrd_x2fx3d_Eq_Char($7, $8)};
2486
2486
  });
2487
2487
 
2488
2488
  /* {csegen:92} */
2489
2489
  const csegen_92 = __lazy(function () {
2490
+ return $0 => $1 => ({a1: $0, a2: $1});
2491
+ });
2492
+
2493
+ /* {csegen:93} */
2494
+ const csegen_93 = __lazy(function () {
2490
2495
  return $0 => $1 => $2 => $0($1($2));
2491
2496
  });
2492
2497
 
2493
- /* {csegen:94} */
2494
- const csegen_94 = __lazy(function () {
2498
+ /* {csegen:95} */
2499
+ const csegen_95 = __lazy(function () {
2495
2500
  return {a1: $1 => $2 => Prelude_Interfaces_Bool_Semigroup_x3cx2bx3e_Semigroup_AnyBool($1, $2), a2: 0};
2496
2501
  });
2497
2502
 
2498
- /* {csegen:144} */
2499
- const csegen_144 = __lazy(function () {
2503
+ /* {csegen:145} */
2504
+ const csegen_145 = __lazy(function () {
2500
2505
  return {a1: acc => elem => func => init => input => Prelude_Types_foldr_Foldable_List(func, init, input), a2: elem => acc => func => init => input => Prelude_Types_foldl_Foldable_List(func, init, input), a3: elem => $b => Prelude_Types_null_Foldable_List($b), a4: elem => acc => m => $f => funcM => init => input => Prelude_Types_foldlM_Foldable_List($f, funcM, init, input), a5: elem => $16 => $16, a6: a => m => $18 => f => $19 => Prelude_Types_foldMap_Foldable_List($18, f, $19)};
2501
2506
  });
2502
2507
 
2503
- /* {csegen:147} */
2504
- const csegen_147 = __lazy(function () {
2508
+ /* {csegen:148} */
2509
+ const csegen_148 = __lazy(function () {
2505
2510
  return $0 => BashCompletion_hashify(BashCompletion_slugify($0));
2506
2511
  });
2507
2512
 
2508
- /* {csegen:149} */
2509
- const csegen_149 = __lazy(function () {
2513
+ /* {csegen:150} */
2514
+ const csegen_150 = __lazy(function () {
2510
2515
  return {a1: '--completed', a2: {a1: 'graph', a2: {h: 0}}};
2511
2516
  });
2512
2517
 
2513
- /* {csegen:153} */
2514
- const csegen_153 = __lazy(function () {
2518
+ /* {csegen:154} */
2519
+ const csegen_154 = __lazy(function () {
2515
2520
  return {a1: {a1: '--checkout', a2: {a1: '-c', a2: {a1: '--ignore', a2: {a1: '-i', a2: {h: 0}}}}}};
2516
2521
  });
2517
2522
 
2518
- /* {csegen:155} */
2519
- const csegen_155 = __lazy(function () {
2523
+ /* {csegen:156} */
2524
+ const csegen_156 = __lazy(function () {
2520
2525
  return {a1: {a1: '--completed', a2: {a1: '-c', a2: {h: 0}}}};
2521
2526
  });
2522
2527
 
2523
- /* {csegen:198} */
2524
- const csegen_198 = __lazy(function () {
2528
+ /* {csegen:203} */
2529
+ const csegen_203 = __lazy(function () {
2525
2530
  return b => a => $0 => $1 => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29($0, $1);
2526
2531
  });
2527
2532
 
2528
- /* {csegen:199} */
2529
- const csegen_199 = __lazy(function () {
2533
+ /* {csegen:204} */
2534
+ const csegen_204 = __lazy(function () {
2530
2535
  return a => $0 => Prelude_Types_join_Monad_x28Eitherx20x24ex29($0);
2531
2536
  });
2532
2537
 
2533
- /* {csegen:200} */
2534
- const csegen_200 = __lazy(function () {
2538
+ /* {csegen:205} */
2539
+ const csegen_205 = __lazy(function () {
2535
2540
  return $0 => {
2536
2541
  const $1 = JSON_Parser_parseJSON({h: 0}, $0);
2537
2542
  switch($1.h) {
@@ -2541,33 +2546,33 @@ const csegen_200 = __lazy(function () {
2541
2546
  };
2542
2547
  });
2543
2548
 
2544
- /* {csegen:201} */
2545
- const csegen_201 = __lazy(function () {
2549
+ /* {csegen:206} */
2550
+ const csegen_206 = __lazy(function () {
2546
2551
  return $0 => $1 => Prelude_Types_max_Ord_Nat($0, $1);
2547
2552
  });
2548
2553
 
2549
- /* {csegen:212} */
2550
- const csegen_212 = __lazy(function () {
2554
+ /* {csegen:217} */
2555
+ const csegen_217 = __lazy(function () {
2551
2556
  return {a1: csegen_39(), 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)};
2552
2557
  });
2553
2558
 
2554
- /* {csegen:215} */
2555
- const csegen_215 = __lazy(function () {
2559
+ /* {csegen:220} */
2560
+ const csegen_220 = __lazy(function () {
2556
2561
  return {a1: $1 => $2 => Prelude_EqOrd_x3dx3d_Eq_Integer($1, $2), a2: $7 => $8 => Prelude_EqOrd_x2fx3d_Eq_Integer($7, $8)};
2557
2562
  });
2558
2563
 
2559
- /* {csegen:216} */
2560
- const csegen_216 = __lazy(function () {
2564
+ /* {csegen:221} */
2565
+ const csegen_221 = __lazy(function () {
2561
2566
  return $0 => $1 => Prelude_EqOrd_compare_Ord_Integer($0, $1);
2562
2567
  });
2563
2568
 
2564
- /* {csegen:224} */
2565
- const csegen_224 = __lazy(function () {
2569
+ /* {csegen:229} */
2570
+ const csegen_229 = __lazy(function () {
2566
2571
  return $0 => JSON_Parser_eqJSToken({h: 2 /* EOI */}, $0);
2567
2572
  });
2568
2573
 
2569
- /* {csegen:229} */
2570
- const csegen_229 = __lazy(function () {
2574
+ /* {csegen:234} */
2575
+ const csegen_234 = __lazy(function () {
2571
2576
  const $6 = a => b => {
2572
2577
  switch(JSON_Parser_eqJSON(a, b)) {
2573
2578
  case 1: return 0;
@@ -2577,184 +2582,179 @@ const csegen_229 = __lazy(function () {
2577
2582
  return {a1: $1 => $2 => JSON_Parser_eqJSON($1, $2), a2: $6};
2578
2583
  });
2579
2584
 
2580
- /* {csegen:236} */
2581
- const csegen_236 = __lazy(function () {
2585
+ /* {csegen:241} */
2586
+ const csegen_241 = __lazy(function () {
2582
2587
  const $0 = a => $1 => $2 => ({h: 1 /* Fail0 */, a1: {a1: $2, a2: $1}});
2583
2588
  return $6 => $7 => $0(undefined)($6)($7);
2584
2589
  });
2585
2590
 
2586
- /* {csegen:256} */
2587
- const csegen_256 = __lazy(function () {
2591
+ /* {csegen:261} */
2592
+ const csegen_261 = __lazy(function () {
2588
2593
  return {a1: acc => elem => func => init => input => Prelude_Types_foldr_Foldable_x28Eitherx20x24ex29(func, init, input), a2: elem => acc => func => init => input => Prelude_Types_foldl_Foldable_x28Eitherx20x24ex29(func, init, input), a3: elem => $b => Prelude_Types_null_Foldable_x28Eitherx20x24ex29($b), a4: elem => acc => m => $f => funcM => init => input => Prelude_Types_foldlM_Foldable_x28Eitherx20x24ex29($f, funcM, init, input), a5: elem => $16 => Prelude_Types_toList_Foldable_x28Eitherx20x24ex29($16), a6: a => m => $1a => f => $1b => Prelude_Types_foldMap_Foldable_x28Eitherx20x24ex29($1a, f, $1b)};
2589
2594
  });
2590
2595
 
2591
- /* {csegen:260} */
2592
- const csegen_260 = __lazy(function () {
2596
+ /* {csegen:265} */
2597
+ const csegen_265 = __lazy(function () {
2593
2598
  return b => a => f => $0 => $1 => $2 => Prelude_Types_traverse_Traversable_x28Eitherx20x24ex29($0, $1, $2);
2594
2599
  });
2595
2600
 
2596
- /* {csegen:274} */
2597
- const csegen_274 = __lazy(function () {
2601
+ /* {csegen:279} */
2602
+ const csegen_279 = __lazy(function () {
2598
2603
  return {a1: $1 => $2 => _add32s($1, $2), a2: $6 => $7 => _mul32s($6, $7), a3: $b => Number(_truncBigInt32($b))};
2599
2604
  });
2600
2605
 
2601
- /* {csegen:294} */
2602
- const csegen_294 = __lazy(function () {
2603
- return {a1: Help_argument(0, '...'), a2: {h: 0}};
2604
- });
2605
-
2606
2606
  /* {csegen:299} */
2607
2607
  const csegen_299 = __lazy(function () {
2608
- return {a1: Help_argument(0, '#<label>'), a2: csegen_294()};
2608
+ return {a1: Help_argument(0, '...'), a2: {h: 0}};
2609
2609
  });
2610
2610
 
2611
- /* {csegen:305} */
2612
- const csegen_305 = __lazy(function () {
2613
- return {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('Optionally apply any number of labels by prefixing them with \'#\'.'), a2: {h: 0}};
2611
+ /* {csegen:304} */
2612
+ const csegen_304 = __lazy(function () {
2613
+ return {a1: Help_argument(0, '#<label>'), a2: csegen_299()};
2614
2614
  });
2615
2615
 
2616
- /* {csegen:323} */
2617
- const csegen_323 = __lazy(function () {
2618
- return Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Text_PrettyPrint_Prettyprinter_Doc_unsafeTextWithoutNewLines('.'), a2: {h: 0}});
2616
+ /* {csegen:310} */
2617
+ const csegen_310 = __lazy(function () {
2618
+ return {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('Optionally apply any number of labels by prefixing them with \'#\'.'), a2: {h: 0}};
2619
2619
  });
2620
2620
 
2621
- /* {csegen:341} */
2622
- const csegen_341 = __lazy(function () {
2621
+ /* {csegen:344} */
2622
+ const csegen_344 = __lazy(function () {
2623
2623
  return {a1: Help_argument(1, '<team-slug>'), a2: {h: 0}};
2624
2624
  });
2625
2625
 
2626
- /* {csegen:393} */
2627
- const csegen_393 = __lazy(function () {
2626
+ /* {csegen:396} */
2627
+ const csegen_396 = __lazy(function () {
2628
2628
  return $0 => $1 => $2 => $3 => Data_Promise_x3ex3ex3d_Monad_Promise($0, $1, $2, $3);
2629
2629
  });
2630
2630
 
2631
- /* {csegen:394} */
2632
- const csegen_394 = __lazy(function () {
2631
+ /* {csegen:397} */
2632
+ const csegen_397 = __lazy(function () {
2633
2633
  return $0 => $1 => Data_Promise_either(csegen_51(), Data_PullRequest_parsePullRequestsString($0), $1);
2634
2634
  });
2635
2635
 
2636
- /* {csegen:395} */
2637
- const csegen_395 = __lazy(function () {
2636
+ /* {csegen:398} */
2637
+ const csegen_398 = __lazy(function () {
2638
2638
  return $0 => $1 => Data_Promise_either(csegen_51(), Data_User_parseUserString($0), $1);
2639
2639
  });
2640
2640
 
2641
- /* {csegen:400} */
2642
- const csegen_400 = __lazy(function () {
2641
+ /* {csegen:403} */
2642
+ const csegen_403 = __lazy(function () {
2643
2643
  return $0 => $1 => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29($0, $1);
2644
2644
  });
2645
2645
 
2646
- /* {csegen:413} */
2647
- const csegen_413 = __lazy(function () {
2646
+ /* {csegen:416} */
2647
+ const csegen_416 = __lazy(function () {
2648
2648
  return $0 => Language_JSON_Accessors_array($3 => Data_PullRequest_parsePR($3), $0);
2649
2649
  });
2650
2650
 
2651
- /* {csegen:421} */
2652
- const csegen_421 = __lazy(function () {
2651
+ /* {csegen:424} */
2652
+ const csegen_424 = __lazy(function () {
2653
2653
  return $0 => $1 => $2 => Data_Promise_pure_Applicative_Promise($0, $1, $2);
2654
2654
  });
2655
2655
 
2656
- /* {csegen:422} */
2657
- const csegen_422 = __lazy(function () {
2656
+ /* {csegen:425} */
2657
+ const csegen_425 = __lazy(function () {
2658
2658
  return $0 => Prelude_EqOrd_x3dx3d_Eq_Char($0, '/');
2659
2659
  });
2660
2660
 
2661
- /* {csegen:423} */
2662
- const csegen_423 = __lazy(function () {
2661
+ /* {csegen:426} */
2662
+ const csegen_426 = __lazy(function () {
2663
2663
  return $0 => $0.a2;
2664
2664
  });
2665
2665
 
2666
- /* {csegen:427} */
2667
- const csegen_427 = __lazy(function () {
2666
+ /* {csegen:430} */
2667
+ const csegen_430 = __lazy(function () {
2668
2668
  return $0 => $0.a1;
2669
2669
  });
2670
2670
 
2671
- /* {csegen:438} */
2672
- const csegen_438 = __lazy(function () {
2671
+ /* {csegen:441} */
2672
+ const csegen_441 = __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:443} */
2677
- const csegen_443 = __lazy(function () {
2676
+ /* {csegen:446} */
2677
+ const csegen_446 = __lazy(function () {
2678
2678
  return $0 => $1 => $2 => $3 => Prelude_Types_map_Functor_Maybe($2, $3);
2679
2679
  });
2680
2680
 
2681
- /* {csegen:456} */
2682
- const csegen_456 = __lazy(function () {
2681
+ /* {csegen:459} */
2682
+ const csegen_459 = __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:458} */
2687
- const csegen_458 = __lazy(function () {
2686
+ /* {csegen:461} */
2687
+ const csegen_461 = __lazy(function () {
2688
2688
  return $0 => $1 => Data_Promise_pure_Applicative_Promise({h: 0}, $0, $1);
2689
2689
  });
2690
2690
 
2691
- /* {csegen:486} */
2692
- const csegen_486 = __lazy(function () {
2691
+ /* {csegen:489} */
2692
+ const csegen_489 = __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:487} */
2697
- const csegen_487 = __lazy(function () {
2698
- return $0 => Data_List_sort(csegen_212(), $0);
2696
+ /* {csegen:490} */
2697
+ const csegen_490 = __lazy(function () {
2698
+ return $0 => Data_List_sort(csegen_217(), $0);
2699
2699
  });
2700
2700
 
2701
- /* {csegen:488} */
2702
- const csegen_488 = __lazy(function () {
2703
- return $0 => $1 => $2 => FFI_Concurrency_promiseAll(csegen_144(), $0, $1, $2);
2701
+ /* {csegen:491} */
2702
+ const csegen_491 = __lazy(function () {
2703
+ return $0 => $1 => $2 => FFI_Concurrency_promiseAll(csegen_145(), $0, $1, $2);
2704
2704
  });
2705
2705
 
2706
- /* {csegen:494} */
2707
- const csegen_494 = __lazy(function () {
2706
+ /* {csegen:499} */
2707
+ const csegen_499 = __lazy(function () {
2708
2708
  return $0 => $0.a1;
2709
2709
  });
2710
2710
 
2711
- /* {csegen:496} */
2712
- const csegen_496 = __lazy(function () {
2711
+ /* {csegen:501} */
2712
+ const csegen_501 = __lazy(function () {
2713
2713
  return $0 => $1 => Data_Date_compare_Ord_Date($0, $1);
2714
2714
  });
2715
2715
 
2716
- /* {csegen:497} */
2717
- const csegen_497 = __lazy(function () {
2716
+ /* {csegen:502} */
2717
+ const csegen_502 = __lazy(function () {
2718
2718
  return $0 => $0.a2;
2719
2719
  });
2720
2720
 
2721
- /* {csegen:498} */
2722
- const csegen_498 = __lazy(function () {
2723
- return $0 => $1 => Prelude_Basics_on(csegen_496(), csegen_497(), $0, $1);
2721
+ /* {csegen:503} */
2722
+ const csegen_503 = __lazy(function () {
2723
+ return $0 => $1 => Prelude_Basics_on(csegen_501(), csegen_502(), $0, $1);
2724
2724
  });
2725
2725
 
2726
- /* {csegen:511} */
2727
- const csegen_511 = __lazy(function () {
2726
+ /* {csegen:516} */
2727
+ const csegen_516 = __lazy(function () {
2728
2728
  return $0 => $0.a2;
2729
2729
  });
2730
2730
 
2731
- /* {csegen:514} */
2732
- const csegen_514 = __lazy(function () {
2731
+ /* {csegen:519} */
2732
+ const csegen_519 = __lazy(function () {
2733
2733
  return $0 => $0.a1;
2734
2734
  });
2735
2735
 
2736
- /* {csegen:520} */
2737
- const csegen_520 = __lazy(function () {
2736
+ /* {csegen:525} */
2737
+ const csegen_525 = __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:550} */
2742
- const csegen_550 = __lazy(function () {
2741
+ /* {csegen:555} */
2742
+ const csegen_555 = __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:585} */
2747
- const csegen_585 = __lazy(function () {
2746
+ /* {csegen:590} */
2747
+ const csegen_590 = __lazy(function () {
2748
2748
  return $0 => $0.a1;
2749
2749
  });
2750
2750
 
2751
- /* {csegen:597} */
2752
- const csegen_597 = __lazy(function () {
2751
+ /* {csegen:602} */
2752
+ const csegen_602 = __lazy(function () {
2753
2753
  return {a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc()}, a2: {h: 0}};
2754
2754
  });
2755
2755
 
2756
- /* {csegen:616} */
2757
- const csegen_616 = __lazy(function () {
2756
+ /* {csegen:621} */
2757
+ const csegen_621 = __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
 
@@ -2763,18 +2763,18 @@ function prim__sub_Integer($0, $1) {
2763
2763
  return ($0-$1);
2764
2764
  }
2765
2765
 
2766
- /* Main.8197:1349:parsePg */
2767
- function Main_n__8197_1349_parsePg($0, $1, $2, $3, $4, $5, $6) {
2766
+ /* Main.8436:1484:parsePg */
2767
+ function Main_n__8436_1484_parsePg($0, $1, $2, $3, $4, $5, $6) {
2768
2768
  return Data_String_parsePositive(csegen_2(), $6);
2769
2769
  }
2770
2770
 
2771
- /* Main.8197:1348:parseLim */
2772
- function Main_n__8197_1348_parseLim($0, $1, $2, $3, $4, $5) {
2771
+ /* Main.8436:1483:parseLim */
2772
+ function Main_n__8436_1483_parseLim($0, $1, $2, $3, $4, $5) {
2773
2773
  return Prelude_Interfaces_x3cx3dx3c(csegen_14(), x => Data_Fin_natToFin(x, 101n), $e => Data_String_parsePositive(csegen_2(), $e));
2774
2774
  }
2775
2775
 
2776
- /* Main.8058:1150:configuredOpts */
2777
- function Main_n__8058_1150_configuredOpts($0, $1, $2, $3) {
2776
+ /* Main.8297:1285:configuredOpts */
2777
+ function Main_n__8297_1285_configuredOpts($0, $1, $2, $3) {
2778
2778
  const $11 = $12 => {
2779
2779
  switch($12.h) {
2780
2780
  case 1: /* Right */ return $0.a1.a1.a2(undefined)(BashCompletion_opts($12.a1, $3, $2, $1));
@@ -2811,6 +2811,17 @@ function Main_resolvex27x27($0) {
2811
2811
  return Data_Promise_resolvex27($3 => $4 => $3, $6 => Main_exitError(csegen_31(), $6), $0);
2812
2812
  }
2813
2813
 
2814
+ /* Main.printWarning : HasIO io => String -> io () */
2815
+ function Main_printWarning($0, $1) {
2816
+ const $f = $10 => {
2817
+ switch($10) {
2818
+ case 1: return $0.a1.a2(undefined)(undefined)($0.a1.a1.a1(undefined)(undefined)($25 => (undefined))(System_File_ReadWrite_fPutStrLn($0, System_File_Virtual_stderr(), Text_PrettyPrint_Prettyprinter_Render_Terminal_renderString(Text_PrettyPrint_Prettyprinter_Doc_layoutPretty(Text_PrettyPrint_Prettyprinter_Doc_defaultLayoutOptions(), Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_color(3), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(Data_String_trim($1))))))))($3c => $0.a1.a1.a1(undefined)(undefined)($47 => (undefined))(System_File_ReadWrite_fPutStrLn($0, System_File_Virtual_stderr(), '')));
2819
+ case 0: return $0.a1.a2(undefined)(undefined)($0.a1.a1.a1(undefined)(undefined)($61 => (undefined))(System_File_ReadWrite_fPutStrLn($0, System_File_Virtual_stderr(), $1)))($69 => $0.a1.a1.a1(undefined)(undefined)($74 => (undefined))(System_File_ReadWrite_fPutStrLn($0, System_File_Virtual_stderr(), '')));
2820
+ }
2821
+ };
2822
+ return $0.a1.a2(undefined)(undefined)(System_File_Meta_isTTY($0, System_File_Virtual_stderr()))($f);
2823
+ }
2824
+
2814
2825
  /* Main.main : IO () */
2815
2826
  function Main_main($0) {
2816
2827
  const $1 = Main_shouldUseColors(csegen_31())($0);
@@ -2873,7 +2884,7 @@ function Main_handleConfiguredArgs($0, $1, $2, $3) {
2873
2884
  switch($3.a1) {
2874
2885
  case 'config': {
2875
2886
  switch($3.a2.h) {
2876
- case 0: /* nil */ 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.'+('\n\n'+Config_settablePropsWithHelp($0)))), $7, $8);
2887
+ case 0: /* nil */ return $7 => $8 => Data_Promise_reject(('The config command expects one or two arguments. '+('Specify a property to read it out or specify both a property and a value to set it to.'+('\n\n'+Config_settablePropsWithHelp($0)))), $7, $8);
2877
2888
  case undefined: /* cons */ {
2878
2889
  return $15 => {
2879
2890
  switch($3.a2.a2.h) {
@@ -3016,7 +3027,7 @@ function Main_handleAuthenticatedArgs($0, $1, $2, $3) {
3016
3027
  }
3017
3028
  return Prelude_Types_x3ex3ex3d_Monad_Maybe($b1, filter => ({a1: {a1: filter, a2: {a1: $ae.a1, a2: $ae.a2}}}));
3018
3029
  };
3019
- const $8e = Prelude_Types_x3ex3ex3d_Monad_Maybe(Prelude_Types_x3cx2ax3e_Applicative_Maybe(Prelude_Types_x3cx2ax3e_Applicative_Maybe({a1: $96 => $97 => ({a1: $96, a2: $97})}, Main_n__8197_1348_parseLim($1, $2, $3.a2.a2.a1, $3.a2.a2.a2.a1, $3.a2.a2.a2.a2.a1, $0)($3.a2.a2.a2.a1)), Main_n__8197_1349_parsePg($1, $2, $3.a2.a2.a1, $3.a2.a2.a2.a1, $3.a2.a2.a2.a2.a1, $0, $3.a2.a2.a2.a2.a1)), $ad);
3030
+ const $8e = Prelude_Types_x3ex3ex3d_Monad_Maybe(Prelude_Types_x3cx2ax3e_Applicative_Maybe(Prelude_Types_x3cx2ax3e_Applicative_Maybe({a1: $96 => $97 => ({a1: $96, a2: $97})}, Main_n__8436_1483_parseLim($1, $2, $3.a2.a2.a1, $3.a2.a2.a2.a1, $3.a2.a2.a2.a2.a1, $0)($3.a2.a2.a2.a1)), Main_n__8436_1484_parsePg($1, $2, $3.a2.a2.a1, $3.a2.a2.a2.a1, $3.a2.a2.a2.a2.a1, $0, $3.a2.a2.a2.a2.a1)), $ad);
3020
3031
  return $be => {
3021
3032
  switch($8e.h) {
3022
3033
  case undefined: /* just */ return $c0 => Data_Promise_x3ex3ex3d_Monad_Promise(FFI_GitHub_listPullRequestsJsonStr($2, $0.a2, $0.a3, $8e.a1.a1, $8e.a1.a2.a1, $8e.a1.a2.a2), pullsJsonStr => $cf => $d0 => $d1 => Data_Promise_liftIO_HasIO_Promise($d4 => Prelude_IO_prim__putStr(pullsJsonStr, $d4), $cf, $d0, $d1), $be, $c0);
@@ -3152,29 +3163,42 @@ function Main_handleAuthenticatedArgs($0, $1, $2, $3) {
3152
3163
  }
3153
3164
  }
3154
3165
  case 'assign': {
3166
+ return $2d7 => $2d8 => {
3167
+ switch($3.a2.h) {
3168
+ case undefined: /* cons */ {
3169
+ switch($3.a2.a1) {
3170
+ case '--dry': return Data_Promise_x3ex3ex3d_Monad_Promise(csegen_73(), $2df => Commands_request($0, $1, $2, $3.a2.a2, 1), $2d7, $2d8);
3171
+ default: return Data_Promise_x3ex3ex3d_Monad_Promise(csegen_73(), $2ec => Commands_request($0, $1, $2, $3.a2, 0), $2d7, $2d8);
3172
+ }
3173
+ }
3174
+ default: return Data_Promise_x3ex3ex3d_Monad_Promise(csegen_73(), $2f9 => Commands_request($0, $1, $2, $3.a2, 0), $2d7, $2d8);
3175
+ }
3176
+ };
3177
+ }
3178
+ case 'request': {
3155
3179
  switch($3.a2.h) {
3156
3180
  case undefined: /* cons */ {
3157
3181
  switch($3.a2.a1) {
3158
- case '--dry': return Commands_assign($0, $1, $2, $3.a2.a2, 1);
3159
- default: return Commands_assign($0, $1, $2, $3.a2, 0);
3182
+ case '--dry': return Commands_request($0, $1, $2, $3.a2.a2, 1);
3183
+ default: return Commands_request($0, $1, $2, $3.a2, 0);
3160
3184
  }
3161
3185
  }
3162
- default: return Commands_assign($0, $1, $2, $3.a2, 0);
3186
+ default: return Commands_request($0, $1, $2, $3.a2, 0);
3163
3187
  }
3164
3188
  }
3165
3189
  case 'label': {
3166
- return $2eb => $2ec => {
3190
+ return $316 => $317 => {
3167
3191
  switch($3.a2.h) {
3168
- case 0: /* nil */ return Data_Promise_reject('The label command expects one or more labels as arguments.', $2eb, $2ec);
3169
- case undefined: /* cons */ return Commands_label($0, $1, $2, {a1: $3.a2.a1, a2: $3.a2.a2}, $2eb, $2ec);
3170
- default: return Data_Promise_reject(Prelude_Types_foldMap_Foldable_List(csegen_49(), $301 => $301, {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_51(), $3), a2: {a1: '.', a2: {h: 0}}}}), $2eb, $2ec);
3192
+ case 0: /* nil */ return Data_Promise_reject('The label command expects one or more labels as arguments.', $316, $317);
3193
+ case undefined: /* cons */ return Commands_label($0, $1, $2, {a1: $3.a2.a1, a2: $3.a2.a2}, $316, $317);
3194
+ default: return Data_Promise_reject(Prelude_Types_foldMap_Foldable_List(csegen_49(), $32c => $32c, {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_51(), $3), a2: {a1: '.', a2: {h: 0}}}}), $316, $317);
3171
3195
  }
3172
3196
  };
3173
3197
  }
3174
- default: return $30f => $310 => Data_Promise_reject(Prelude_Types_foldMap_Foldable_List(csegen_49(), $317 => $317, {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_51(), $3), a2: {a1: '.', a2: {h: 0}}}}), $30f, $310);
3198
+ default: return $33a => $33b => Data_Promise_reject(Prelude_Types_foldMap_Foldable_List(csegen_49(), $342 => $342, {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_51(), $3), a2: {a1: '.', a2: {h: 0}}}}), $33a, $33b);
3175
3199
  }
3176
3200
  }
3177
- default: return $325 => $326 => Data_Promise_reject(Prelude_Types_foldMap_Foldable_List(csegen_49(), $32d => $32d, {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_51(), $3), a2: {a1: '.', a2: {h: 0}}}}), $325, $326);
3201
+ default: return $350 => $351 => Data_Promise_reject(Prelude_Types_foldMap_Foldable_List(csegen_49(), $358 => $358, {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_51(), $3), a2: {a1: '.', a2: {h: 0}}}}), $350, $351);
3178
3202
  }
3179
3203
  }
3180
3204
 
@@ -3245,7 +3269,7 @@ function Main_exitError($0, $1) {
3245
3269
 
3246
3270
  /* Main.bashCompletion : HasIO io => String -> String -> String -> io () */
3247
3271
  function Main_bashCompletion($0, $1, $2, $3) {
3248
- const $4 = Prelude_Types_maybe(() => Main_n__8058_1150_configuredOpts($0, $3, $2, $1), () => $d => $0.a1.a1.a2(undefined)($d), BashCompletion_cmdOpts($1, $2, $3));
3272
+ const $4 = Prelude_Types_maybe(() => Main_n__8297_1285_configuredOpts($0, $3, $2, $1), () => $d => $0.a1.a1.a2(undefined)($d), BashCompletion_cmdOpts($1, $2, $3));
3249
3273
  return $0.a1.a2(undefined)(undefined)($4)($24 => $0.a2(undefined)($2a => Prelude_IO_prim__putStr(Data_String_fastUnlines($24), $2a)));
3250
3274
  }
3251
3275
 
@@ -3616,7 +3640,7 @@ function Text_PrettyPrint_Prettyprinter_Doc_hsep($0) {
3616
3640
 
3617
3641
  /* Text.PrettyPrint.Prettyprinter.Doc.hcat : List (Doc ann) -> Doc ann */
3618
3642
  function Text_PrettyPrint_Prettyprinter_Doc_hcat($0) {
3619
- return Text_PrettyPrint_Prettyprinter_Doc_concatWith(csegen_85(), $0);
3643
+ return Text_PrettyPrint_Prettyprinter_Doc_concatWith(csegen_86(), $0);
3620
3644
  }
3621
3645
 
3622
3646
  /* Text.PrettyPrint.Prettyprinter.Doc.hardline : Doc ann */
@@ -3675,10 +3699,10 @@ function Text_PrettyPrint_Prettyprinter_Doc_encloseSep($0, $1, $2, $3) {
3675
3699
  case undefined: /* cons */ {
3676
3700
  switch($3.a2.h) {
3677
3701
  case 0: /* nil */ return Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29(Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29($0, $3.a1), $1);
3678
- default: return Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29(Text_PrettyPrint_Prettyprinter_Doc_cat(Data_List_zipWith_Zippable_List(csegen_85(), {a1: $0, a2: Data_List_replicateTR({h: 0}, Prelude_Types_prim__integerToNat((Prelude_Types_List_lengthTR($3)-1n)), $2)}, $3)), $1);
3702
+ default: return Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29(Text_PrettyPrint_Prettyprinter_Doc_cat(Data_List_zipWith_Zippable_List(csegen_86(), {a1: $0, a2: Data_List_replicateTR({h: 0}, Prelude_Types_prim__integerToNat((Prelude_Types_List_lengthTR($3)-1n)), $2)}, $3)), $1);
3679
3703
  }
3680
3704
  }
3681
- default: return Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29(Text_PrettyPrint_Prettyprinter_Doc_cat(Data_List_zipWith_Zippable_List(csegen_85(), {a1: $0, a2: Data_List_replicateTR({h: 0}, Prelude_Types_prim__integerToNat((Prelude_Types_List_lengthTR($3)-1n)), $2)}, $3)), $1);
3705
+ default: return Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29(Text_PrettyPrint_Prettyprinter_Doc_cat(Data_List_zipWith_Zippable_List(csegen_86(), {a1: $0, a2: Data_List_replicateTR({h: 0}, Prelude_Types_prim__integerToNat((Prelude_Types_List_lengthTR($3)-1n)), $2)}, $3)), $1);
3682
3706
  }
3683
3707
  }
3684
3708
 
@@ -3928,12 +3952,12 @@ function Data_String_lines($0) {
3928
3952
 
3929
3953
  /* Data.String.isSuffixOf : String -> String -> Bool */
3930
3954
  function Data_String_isSuffixOf($0, $1) {
3931
- return Data_List_isSuffixOf(csegen_90(), Prelude_Types_fastUnpack($0), Prelude_Types_fastUnpack($1));
3955
+ return Data_List_isSuffixOf(csegen_91(), Prelude_Types_fastUnpack($0), Prelude_Types_fastUnpack($1));
3932
3956
  }
3933
3957
 
3934
3958
  /* Data.String.isPrefixOf : String -> String -> Bool */
3935
3959
  function Data_String_isPrefixOf($0, $1) {
3936
- return Data_List_isPrefixOf(csegen_90(), Prelude_Types_fastUnpack($0), Prelude_Types_fastUnpack($1));
3960
+ return Data_List_isPrefixOf(csegen_91(), Prelude_Types_fastUnpack($0), Prelude_Types_fastUnpack($1));
3937
3961
  }
3938
3962
 
3939
3963
  /* Data.String.fastUnlines : List String -> String */
@@ -4021,7 +4045,7 @@ function Builtin_fst($0) {
4021
4045
  function Prelude_Types_traverse_Traversable_List($0, $1, $2) {
4022
4046
  switch($2.h) {
4023
4047
  case 0: /* nil */ return $0.a2(undefined)({h: 0});
4024
- case undefined: /* cons */ return $0.a3(undefined)(undefined)($0.a3(undefined)(undefined)($0.a2(undefined)(csegen_91()))($1($2.a1)))(Prelude_Types_traverse_Traversable_List($0, $1, $2.a2));
4048
+ case undefined: /* cons */ return $0.a3(undefined)(undefined)($0.a3(undefined)(undefined)($0.a2(undefined)(csegen_92()))($1($2.a1)))(Prelude_Types_traverse_Traversable_List($0, $1, $2.a2));
4025
4049
  }
4026
4050
  }
4027
4051
 
@@ -4035,12 +4059,12 @@ function Prelude_Types_traverse_Traversable_x28Eitherx20x24ex29($0, $1, $2) {
4035
4059
 
4036
4060
  /* Prelude.Types.toList */
4037
4061
  function Prelude_Types_toList_Foldable_Maybe($0) {
4038
- return Prelude_Types_foldr_Foldable_Maybe(csegen_91(), {h: 0}, $0);
4062
+ return Prelude_Types_foldr_Foldable_Maybe(csegen_92(), {h: 0}, $0);
4039
4063
  }
4040
4064
 
4041
4065
  /* Prelude.Types.toList */
4042
4066
  function Prelude_Types_toList_Foldable_x28Eitherx20x24ex29($0) {
4043
- return Prelude_Types_foldr_Foldable_x28Eitherx20x24ex29(csegen_91(), {h: 0}, $0);
4067
+ return Prelude_Types_foldr_Foldable_x28Eitherx20x24ex29(csegen_92(), {h: 0}, $0);
4044
4068
  }
4045
4069
 
4046
4070
  /* Prelude.Types.rangeFromTo */
@@ -4174,7 +4198,7 @@ function Prelude_Types_foldr_Foldable_x28Eitherx20x24ex29($0, $1, $2) {
4174
4198
 
4175
4199
  /* Prelude.Types.foldl */
4176
4200
  function Prelude_Types_foldl_Foldable_x28Eitherx20x24ex29($0, $1, $2) {
4177
- return Prelude_Types_foldr_Foldable_x28Eitherx20x24ex29($6 => $7 => Prelude_Basics_flip(csegen_92(), $c => Prelude_Basics_flip($0, $6, $c), $7), $13 => $13, $2)($1);
4201
+ return Prelude_Types_foldr_Foldable_x28Eitherx20x24ex29($6 => $7 => Prelude_Basics_flip(csegen_93(), $c => Prelude_Basics_flip($0, $6, $c), $7), $13 => $13, $2)($1);
4178
4202
  }
4179
4203
 
4180
4204
  /* Prelude.Types.foldlM */
@@ -4446,7 +4470,7 @@ function Prelude_Types_isAlpha($0) {
4446
4470
 
4447
4471
  /* Prelude.Types.elemBy : Foldable t => (a -> a -> Bool) -> a -> t a -> Bool */
4448
4472
  function Prelude_Types_elemBy($0, $1, $2, $3) {
4449
- return $0.a6(undefined)(undefined)(csegen_94())($1($2))($3);
4473
+ return $0.a6(undefined)(undefined)(csegen_95())($1($2))($3);
4450
4474
  }
4451
4475
 
4452
4476
  /* Prelude.Types.elem : Foldable t => Eq a => a -> t a -> Bool */
@@ -5759,7 +5783,7 @@ const ZshCompletion_script = __lazy(function () {
5759
5783
  });
5760
5784
 
5761
5785
  /* BashCompletion.case block in case block in unhashify */
5762
- function BashCompletion_case__casex20blockx20inx20unhashify_9344($0, $1, $2) {
5786
+ function BashCompletion_case__casex20blockx20inx20unhashify_9349($0, $1, $2) {
5763
5787
  switch($0) {
5764
5788
  case '': {
5765
5789
  switch($2.h) {
@@ -5782,7 +5806,7 @@ function BashCompletion_case__casex20blockx20inx20unhashify_9344($0, $1, $2) {
5782
5806
  }
5783
5807
 
5784
5808
  /* BashCompletion.case block in unhashify */
5785
- function BashCompletion_case__unhashify_9324($0, $1) {
5809
+ function BashCompletion_case__unhashify_9329($0, $1) {
5786
5810
  switch($0) {
5787
5811
  case '': {
5788
5812
  switch($1.h) {
@@ -5792,7 +5816,7 @@ function BashCompletion_case__unhashify_9324($0, $1) {
5792
5816
  case '#': return $1.a2;
5793
5817
  case '\u{5c}': {
5794
5818
  const $6 = ('\u{5c}'+$1.a2);
5795
- return BashCompletion_case__casex20blockx20inx20unhashify_9344($1.a2, $6, Data_String_strM($1.a2));
5819
+ return BashCompletion_case__casex20blockx20inx20unhashify_9349($1.a2, $6, Data_String_strM($1.a2));
5796
5820
  }
5797
5821
  default: return $0;
5798
5822
  }
@@ -5804,7 +5828,7 @@ function BashCompletion_case__unhashify_9324($0, $1) {
5804
5828
  case '#': return $1.a2;
5805
5829
  case '\u{5c}': {
5806
5830
  const $11 = ('\u{5c}'+$1.a2);
5807
- return BashCompletion_case__casex20blockx20inx20unhashify_9344($1.a2, $11, Data_String_strM($1.a2));
5831
+ return BashCompletion_case__casex20blockx20inx20unhashify_9349($1.a2, $11, Data_String_strM($1.a2));
5808
5832
  }
5809
5833
  default: return $0;
5810
5834
  }
@@ -5812,13 +5836,26 @@ function BashCompletion_case__unhashify_9324($0, $1) {
5812
5836
  }
5813
5837
  }
5814
5838
 
5815
- /* BashCompletion.4641:10034:slugsOrLoginsOrLabels */
5816
- function BashCompletion_n__4641_10034_slugsOrLoginsOrLabels($0, $1, $2) {
5839
+ /* BashCompletion.4751:10151:slugsOrLoginsOrLabels */
5840
+ function BashCompletion_n__4751_10151_slugsOrLoginsOrLabels($0, $1, $2) {
5841
+ switch(Data_String_isPrefixOf('+', $1)) {
5842
+ case 1: return Prelude_Types_List_mapAppend({h: 0}, $a => ('+'+$a), $2.a11);
5843
+ case 0: {
5844
+ switch(BashCompletion_isHashPrefix($1)) {
5845
+ case 1: return Prelude_Types_List_mapAppend({h: 0}, csegen_148(), $2.a10);
5846
+ case 0: return $2.a9;
5847
+ }
5848
+ }
5849
+ }
5850
+ }
5851
+
5852
+ /* BashCompletion.4751:10039:slugsOrLoginsOrLabels */
5853
+ function BashCompletion_n__4751_10039_slugsOrLoginsOrLabels($0, $1, $2) {
5817
5854
  switch(Data_String_isPrefixOf('+', $1)) {
5818
5855
  case 1: return Prelude_Types_List_mapAppend({h: 0}, $a => ('+'+$a), $2.a11);
5819
5856
  case 0: {
5820
5857
  switch(BashCompletion_isHashPrefix($1)) {
5821
- case 1: return Prelude_Types_List_mapAppend({h: 0}, csegen_147(), $2.a10);
5858
+ case 1: return Prelude_Types_List_mapAppend({h: 0}, csegen_148(), $2.a10);
5822
5859
  case 0: return $2.a9;
5823
5860
  }
5824
5861
  }
@@ -5827,17 +5864,17 @@ function BashCompletion_n__4641_10034_slugsOrLoginsOrLabels($0, $1, $2) {
5827
5864
 
5828
5865
  /* BashCompletion.unslugify : String -> String */
5829
5866
  function BashCompletion_unslugify($0) {
5830
- return Prelude_Types_fastPack(Data_List_replaceOn(csegen_90(), '\u{25cc}', ' ', Prelude_Types_fastUnpack($0)));
5867
+ return Prelude_Types_fastPack(Data_List_replaceOn(csegen_91(), '\u{25cc}', ' ', Prelude_Types_fastUnpack($0)));
5831
5868
  }
5832
5869
 
5833
5870
  /* BashCompletion.unhashify : String -> String */
5834
5871
  function BashCompletion_unhashify($0) {
5835
- return BashCompletion_case__unhashify_9324($0, Data_String_strM($0));
5872
+ return BashCompletion_case__unhashify_9329($0, Data_String_strM($0));
5836
5873
  }
5837
5874
 
5838
5875
  /* BashCompletion.slugify : String -> String */
5839
5876
  function BashCompletion_slugify($0) {
5840
- return Prelude_Types_fastPack(Data_List_replaceOn(csegen_90(), ' ', '\u{25cc}', Prelude_Types_fastUnpack($0)));
5877
+ return Prelude_Types_fastPack(Data_List_replaceOn(csegen_91(), ' ', '\u{25cc}', Prelude_Types_fastUnpack($0)));
5841
5878
  }
5842
5879
 
5843
5880
  /* BashCompletion.script : String */
@@ -5913,7 +5950,7 @@ function BashCompletion_opts($0, $1, $2, $3) {
5913
5950
  case 'graph': return {a1: '--completed', a2: $0.a9};
5914
5951
  case '--completed': return $0.a9;
5915
5952
  default: {
5916
- switch(Data_Maybe_isJust(Data_List_find($59 => Prelude_EqOrd_x3dx3d_Eq_String($59, $3), csegen_149()))) {
5953
+ switch(Data_Maybe_isJust(Data_List_find($59 => Prelude_EqOrd_x3dx3d_Eq_String($59, $3), csegen_150()))) {
5917
5954
  case 1: return Prelude_Types_List_filterAppend({h: 0}, $62 => Data_String_isPrefixOf($2, $62), $0.a9);
5918
5955
  case 0: return {h: 0};
5919
5956
  }
@@ -5921,7 +5958,7 @@ function BashCompletion_opts($0, $1, $2, $3) {
5921
5958
  }
5922
5959
  }
5923
5960
  default: {
5924
- switch(Data_Maybe_isJust(Data_List_find($6d => Prelude_EqOrd_x3dx3d_Eq_String($6d, $3), csegen_149()))) {
5961
+ switch(Data_Maybe_isJust(Data_List_find($6d => Prelude_EqOrd_x3dx3d_Eq_String($6d, $3), csegen_150()))) {
5925
5962
  case 1: return Prelude_Types_List_filterAppend({h: 0}, $76 => Data_String_isPrefixOf($2, $76), $0.a9);
5926
5963
  case 0: return {h: 0};
5927
5964
  }
@@ -5930,7 +5967,7 @@ function BashCompletion_opts($0, $1, $2, $3) {
5930
5967
  }
5931
5968
  case 'pr': {
5932
5969
  switch(BashCompletion_isHashPrefix($2)) {
5933
- case 1: return Prelude_Types_List_mapAppend({h: 0}, csegen_147(), $0.a10);
5970
+ case 1: return Prelude_Types_List_mapAppend({h: 0}, csegen_148(), $0.a10);
5934
5971
  case 0: return {h: 0};
5935
5972
  }
5936
5973
  }
@@ -5945,7 +5982,23 @@ function BashCompletion_opts($0, $1, $2, $3) {
5945
5982
  default: {
5946
5983
  switch(Data_String_isPrefixOf($2, '--dry')) {
5947
5984
  case 1: return {a1: '--dry', a2: {h: 0}};
5948
- case 0: return BashCompletion_n__4641_10034_slugsOrLoginsOrLabels($3, $2, $0);
5985
+ case 0: return BashCompletion_n__4751_10039_slugsOrLoginsOrLabels($3, $2, $0);
5986
+ }
5987
+ }
5988
+ }
5989
+ }
5990
+ case 'request': {
5991
+ switch($2) {
5992
+ case '--': {
5993
+ switch($3) {
5994
+ case 'request': return {a1: '--dry', a2: $0.a9};
5995
+ default: return $0.a9;
5996
+ }
5997
+ }
5998
+ default: {
5999
+ switch(Data_String_isPrefixOf($2, '--dry')) {
6000
+ case 1: return {a1: '--dry', a2: {h: 0}};
6001
+ case 0: return BashCompletion_n__4751_10151_slugsOrLoginsOrLabels($3, $2, $0);
5949
6002
  }
5950
6003
  }
5951
6004
  }
@@ -6068,8 +6121,8 @@ function BashCompletion_cmdOpts($0, $1, $2) {
6068
6121
  }
6069
6122
  case 'contribute': {
6070
6123
  switch($1) {
6071
- case '-': return csegen_153();
6072
- case '--': return csegen_153();
6124
+ case '-': return csegen_154();
6125
+ case '--': return csegen_154();
6073
6126
  default: {
6074
6127
  switch(Data_String_isPrefixOf($1, '--checkout')) {
6075
6128
  case 1: return {a1: {a1: '--checkout', a2: {h: 0}}};
@@ -6086,7 +6139,7 @@ function BashCompletion_cmdOpts($0, $1, $2) {
6086
6139
  case 'graph': {
6087
6140
  switch($1) {
6088
6141
  case '--': return {h: 0};
6089
- case '-': return csegen_155();
6142
+ case '-': return csegen_156();
6090
6143
  default: {
6091
6144
  switch(Data_String_isPrefixOf($1, '--completed')) {
6092
6145
  case 1: return {a1: {a1: '--completed', a2: {h: 0}}};
@@ -6197,8 +6250,8 @@ function BashCompletion_cmdOpts($0, $1, $2) {
6197
6250
  }
6198
6251
  case 'contribute': {
6199
6252
  switch($1) {
6200
- case '-': return csegen_153();
6201
- case '--': return csegen_153();
6253
+ case '-': return csegen_154();
6254
+ case '--': return csegen_154();
6202
6255
  default: {
6203
6256
  switch(Data_String_isPrefixOf($1, '--checkout')) {
6204
6257
  case 1: return {a1: {a1: '--checkout', a2: {h: 0}}};
@@ -6215,7 +6268,7 @@ function BashCompletion_cmdOpts($0, $1, $2) {
6215
6268
  case 'graph': {
6216
6269
  switch($1) {
6217
6270
  case '--': return {h: 0};
6218
- case '-': return csegen_155();
6271
+ case '-': return csegen_156();
6219
6272
  default: {
6220
6273
  switch(Data_String_isPrefixOf($1, '--completed')) {
6221
6274
  case 1: return {a1: {a1: '--completed', a2: {h: 0}}};
@@ -6234,44 +6287,73 @@ function BashCompletion_cmdOpts($0, $1, $2) {
6234
6287
 
6235
6288
  /* BashCompletion.allRootCmds : List String */
6236
6289
  const BashCompletion_allRootCmds = __lazy(function () {
6237
- return {a1: 'assign', a2: {a1: 'branch', a2: {a1: 'config', a2: {a1: 'contribute', a2: {a1: 'graph', a2: {a1: 'health', a2: {a1: 'help', a2: {a1: 'label', a2: {a1: 'list', a2: {a1: 'pr', a2: {a1: 'reflect', a2: {a1: 'sync', a2: {a1: 'version', a2: {a1: 'whoami', a2: {h: 0}}}}}}}}}}}}}}};
6290
+ return {a1: 'request', a2: {a1: 'assign', a2: {a1: 'branch', a2: {a1: 'config', a2: {a1: 'contribute', a2: {a1: 'graph', a2: {a1: 'health', a2: {a1: 'help', a2: {a1: 'label', a2: {a1: 'list', a2: {a1: 'pr', a2: {a1: 'reflect', a2: {a1: 'sync', a2: {a1: 'version', a2: {a1: 'whoami', a2: {h: 0}}}}}}}}}}}}}}}};
6238
6291
  });
6239
6292
 
6240
- /* Data.Config.7708:6019:personalAccessToken */
6241
- function Data_Config_n__7708_6019_personalAccessToken($0) {
6293
+ /* Data.Config.8977:4025:personalAccessToken */
6294
+ function Data_Config_n__8977_4025_personalAccessToken($0) {
6242
6295
  return Prelude_Types_maybe(() => 'Not set (will use $GITHUB_PAT environment variable)', () => $4 => Data_Config_show_Show_x28Hiddenx20x24ax29($4), $0.a13);
6243
6296
  }
6244
6297
 
6245
- /* Data.Config.8195:6496:parseConfigJson */
6246
- function Data_Config_n__8195_6496_parseConfigJson($0, $1) {
6298
+ /* Data.Config.9464:4502:parseConfigJson */
6299
+ function Data_Config_n__9464_4502_parseConfigJson($0, $1) {
6247
6300
  switch($1.h) {
6248
6301
  case 6: /* JObject */ {
6249
- const $20 = $21 => {
6250
- const $2f = Data_List_lookup(csegen_39(), 'githubPAT', $1.a1);
6251
- const $37 = Language_JSON_Accessors_integer($21.a1);
6252
- let $36;
6253
- switch($37.h) {
6254
- case 0: /* Left */ {
6255
- $36 = {h: 0 /* Left */, a1: $37.a1};
6256
- break;
6257
- }
6258
- case 1: /* Right */ {
6259
- $36 = {h: 1 /* Right */, a1: Number(_truncUBigInt32($37.a1))};
6260
- break;
6261
- }
6262
- }
6263
- return Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29($36, ua => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_string($21.a2.a1), o => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_string($21.a2.a2.a1), r => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_string($21.a2.a2.a2.a2.a2.a2.a2.a2.a1), dr => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_string($21.a2.a2.a2.a1), mb => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_bool($21.a2.a2.a2.a2.a1), at => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_bool($21.a2.a2.a2.a2.a2.a2.a2.a2.a2.a1), au => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_bool($21.a2.a2.a2.a2.a2.a1), ca => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_array($65 => Language_JSON_Accessors_string($65), $21.a2.a2.a2.a2.a2.a2.a1), ts => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_array($6e => Language_JSON_Accessors_string($6e), $21.a2.a2.a2.a2.a2.a2.a2.a2.a2.a2.a1), rl => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_array($77 => Language_JSON_Accessors_string($77), $21.a2.a2.a2.a2.a2.a2.a2.a1), om => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_array($80 => Language_JSON_Accessors_integer($80), $21.a2.a2.a2.a2.a2.a2.a2.a2.a2.a2.a2.a1), ip => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Prelude_Types_maybe(() => ({h: 1 /* Right */, a1: {h: 0}}), () => $8b => Language_JSON_Accessors_optional($8e => Language_JSON_Accessors_string($8e), $8b), $2f), gp => ({h: 1 /* Right */, a1: {a1: ua, a2: o, a3: r, a4: dr, a5: mb, a6: at, a7: au, a8: ca, a9: ts, a10: rl, a11: om, a12: ip, a13: Prelude_Types_map_Functor_Maybe($a4 => $a4, gp), a14: $0}}))))))))))))));
6302
+ const $1a = $1b => {
6303
+ const $2d = requestTeams => {
6304
+ const $35 = requestUsers => {
6305
+ const $3d = commentOnRequest => {
6306
+ const $3e = Data_List_lookup(csegen_39(), 'githubPAT', $1.a1);
6307
+ const $46 = Language_JSON_Accessors_integer($1b.a1);
6308
+ let $45;
6309
+ switch($46.h) {
6310
+ case 0: /* Left */ {
6311
+ $45 = {h: 0 /* Left */, a1: $46.a1};
6312
+ break;
6313
+ }
6314
+ case 1: /* Right */ {
6315
+ $45 = {h: 1 /* Right */, a1: Number(_truncUBigInt32($46.a1))};
6316
+ break;
6317
+ }
6318
+ }
6319
+ return Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29($45, ua => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_string($1b.a2.a1), o => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_string($1b.a2.a2.a1), r => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_string($1b.a2.a2.a2.a2.a2.a2.a1), dr => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_string($1b.a2.a2.a2.a1), mb => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_bool(requestTeams), at => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_bool(requestUsers), au => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_bool(commentOnRequest), ca => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_array($74 => Language_JSON_Accessors_string($74), $1b.a2.a2.a2.a2.a1), ts => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_array($7d => Language_JSON_Accessors_string($7d), $1b.a2.a2.a2.a2.a2.a2.a2.a1), rl => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_array($86 => Language_JSON_Accessors_string($86), $1b.a2.a2.a2.a2.a2.a1), om => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_array($8f => Language_JSON_Accessors_integer($8f), $1b.a2.a2.a2.a2.a2.a2.a2.a2.a1), ip => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Prelude_Types_maybe(() => ({h: 1 /* Right */, a1: {h: 0}}), () => $9a => Language_JSON_Accessors_optional($9d => Language_JSON_Accessors_string($9d), $9a), $3e), gp => ({h: 1 /* Right */, a1: {a1: ua, a2: o, a3: r, a4: dr, a5: mb, a6: at, a7: au, a8: ca, a9: ts, a10: rl, a11: om, a12: ip, a13: Prelude_Types_map_Functor_Maybe($b3 => $b3, gp), a14: $0}}))))))))))))));
6320
+ };
6321
+ return Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Data_Config_n__9473_4509_exactlyOneOf($0, $1.a1, 'commentOnAssign', 'commentOnRequest'), $3d);
6322
+ };
6323
+ return Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Data_Config_n__9473_4509_exactlyOneOf($0, $1.a1, 'assignUsers', 'requestUsers'), $35);
6324
+ };
6325
+ return Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Data_Config_n__9473_4509_exactlyOneOf($0, $1.a1, 'assignTeams', 'requestTeams'), $2d);
6264
6326
  };
6265
- 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: {a1: 'defaultRemote', a2: {a1: 'assignUsers', a2: {a1: 'repoLabels', a2: {a1: 'ignoredPRs', a2: {h: 0}}}}}}}}}}}}}, $1.a1), $20);
6327
+ return Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_lookupAll({a1: 'updatedAt', a2: {a1: 'org', a2: {a1: 'repo', a2: {a1: 'mainBranch', a2: {a1: 'teamSlugs', a2: {a1: 'orgMembers', a2: {a1: 'defaultRemote', a2: {a1: 'repoLabels', a2: {a1: 'ignoredPRs', a2: {h: 0}}}}}}}}}}, $1.a1), $1a);
6266
6328
  }
6267
6329
  case 5: /* JArray */ return {h: 0 /* Left */, a1: 'Expected config JSON to be an Object, not an array.'};
6268
6330
  default: return {h: 0 /* Left */, a1: 'Expected config JSON to be an Object.'};
6269
6331
  }
6270
6332
  }
6271
6333
 
6334
+ /* Data.Config.9473:4509:exactlyOneOf */
6335
+ function Data_Config_n__9473_4509_exactlyOneOf($0, $1, $2, $3) {
6336
+ const $4 = Data_List_lookup(csegen_39(), $2, $1);
6337
+ const $a = Data_List_lookup(csegen_39(), $3, $1);
6338
+ switch($4.h) {
6339
+ case 0: /* nothing */ {
6340
+ switch($a.h) {
6341
+ case 0: /* nothing */ return {h: 0 /* Left */, a1: Prelude_Types_foldMap_Foldable_List(csegen_49(), $17 => $17, {a1: 'Expected config JSON to contain either the \'', a2: {a1: $2, a2: {a1: '\' key (deprecated) or the \'', a2: {a1: $3, a2: {a1: '\' key (newer).', a2: {h: 0}}}}}})};
6342
+ case undefined: /* just */ return {h: 1 /* Right */, a1: $a.a1};
6343
+ }
6344
+ }
6345
+ case undefined: /* just */ {
6346
+ switch($a.h) {
6347
+ case 0: /* nothing */ return {h: 1 /* Right */, a1: $4.a1};
6348
+ case undefined: /* just */ return {h: 0 /* Left */, a1: Prelude_Types_foldMap_Foldable_List(csegen_49(), $2b => $2b, {a1: 'Expected config JSON to contain only one of the \'', a2: {a1: $2, a2: {a1: '\' key (deprecated) or the \'', a2: {a1: $3, a2: {a1: '\' key (newer). Found values for both.', a2: {h: 0}}}}}})};
6349
+ }
6350
+ }
6351
+ }
6352
+ }
6353
+
6272
6354
  /* Data.Config.show */
6273
6355
  function Data_Config_show_Show_Config($0) {
6274
- return Data_String_fastUnlines({a1: Prelude_Types_foldMap_Foldable_List(csegen_49(), $8 => $8, {a1: ' updatedAt: ', a2: {a1: Prelude_Show_show_Show_Bits32($0.a1), a2: {h: 0}}}), a2: {a1: Prelude_Types_foldMap_Foldable_List(csegen_49(), $17 => $17, {a1: ' org: ', a2: {a1: Prelude_Show_show_Show_String($0.a2), a2: {h: 0}}}), a2: {a1: Prelude_Types_foldMap_Foldable_List(csegen_49(), $26 => $26, {a1: ' repo: ', a2: {a1: Prelude_Show_show_Show_String($0.a3), a2: {h: 0}}}), a2: {a1: Prelude_Types_foldMap_Foldable_List(csegen_49(), $35 => $35, {a1: ' defaultRemote: ', a2: {a1: Prelude_Show_show_Show_String($0.a4), a2: {h: 0}}}), a2: {a1: Prelude_Types_foldMap_Foldable_List(csegen_49(), $44 => $44, {a1: ' mainBranch: ', a2: {a1: Prelude_Show_show_Show_String($0.a5), a2: {h: 0}}}), a2: {a1: Prelude_Types_foldMap_Foldable_List(csegen_49(), $53 => $53, {a1: ' assignTeams: ', a2: {a1: Prelude_Show_show_Show_Bool($0.a6), a2: {h: 0}}}), a2: {a1: Prelude_Types_foldMap_Foldable_List(csegen_49(), $62 => $62, {a1: ' assignUsers: ', a2: {a1: Prelude_Show_show_Show_Bool($0.a7), a2: {h: 0}}}), a2: {a1: Prelude_Types_foldMap_Foldable_List(csegen_49(), $71 => $71, {a1: 'commentOnAssign: ', a2: {a1: Prelude_Show_show_Show_Bool($0.a8), a2: {h: 0}}}), a2: {a1: Prelude_Types_foldMap_Foldable_List(csegen_49(), $80 => $80, {a1: ' teamSlugs: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_51(), $0.a9), a2: {h: 0}}}), a2: {a1: Prelude_Types_foldMap_Foldable_List(csegen_49(), $91 => $91, {a1: ' repoLabels: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_51(), $0.a10), a2: {h: 0}}}), a2: {a1: Prelude_Types_foldMap_Foldable_List(csegen_49(), $a2 => $a2, {a1: ' orgMembers: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_51(), $0.a11), a2: {h: 0}}}), a2: {a1: Prelude_Types_foldMap_Foldable_List(csegen_49(), $b3 => $b3, {a1: ' ignoredPRs: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29({a1: x => Prelude_Show_show_Show_Integer(x), a2: d => x => Prelude_Show_showPrec_Show_Integer(d, x)}, $0.a12), a2: {h: 0}}}), a2: {a1: Prelude_Types_foldMap_Foldable_List(csegen_49(), $ca => $ca, {a1: ' githubPAT: ', a2: {a1: Data_Config_n__7708_6019_personalAccessToken($0), a2: {h: 0}}}), a2: {h: 0}}}}}}}}}}}}}});
6356
+ return Data_String_fastUnlines({a1: Prelude_Types_foldMap_Foldable_List(csegen_49(), $8 => $8, {a1: ' updatedAt: ', a2: {a1: Prelude_Show_show_Show_Bits32($0.a1), a2: {h: 0}}}), a2: {a1: Prelude_Types_foldMap_Foldable_List(csegen_49(), $17 => $17, {a1: ' org: ', a2: {a1: Prelude_Show_show_Show_String($0.a2), a2: {h: 0}}}), a2: {a1: Prelude_Types_foldMap_Foldable_List(csegen_49(), $26 => $26, {a1: ' repo: ', a2: {a1: Prelude_Show_show_Show_String($0.a3), a2: {h: 0}}}), a2: {a1: Prelude_Types_foldMap_Foldable_List(csegen_49(), $35 => $35, {a1: ' defaultRemote: ', a2: {a1: Prelude_Show_show_Show_String($0.a4), a2: {h: 0}}}), a2: {a1: Prelude_Types_foldMap_Foldable_List(csegen_49(), $44 => $44, {a1: ' mainBranch: ', a2: {a1: Prelude_Show_show_Show_String($0.a5), a2: {h: 0}}}), a2: {a1: Prelude_Types_foldMap_Foldable_List(csegen_49(), $53 => $53, {a1: ' requestTeams: ', a2: {a1: Prelude_Show_show_Show_Bool($0.a6), a2: {h: 0}}}), a2: {a1: Prelude_Types_foldMap_Foldable_List(csegen_49(), $62 => $62, {a1: ' requestUsers: ', a2: {a1: Prelude_Show_show_Show_Bool($0.a7), a2: {h: 0}}}), a2: {a1: Prelude_Types_foldMap_Foldable_List(csegen_49(), $71 => $71, {a1: 'commentOnRequest: ', a2: {a1: Prelude_Show_show_Show_Bool($0.a8), a2: {h: 0}}}), a2: {a1: Prelude_Types_foldMap_Foldable_List(csegen_49(), $80 => $80, {a1: ' teamSlugs: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_51(), $0.a9), a2: {h: 0}}}), a2: {a1: Prelude_Types_foldMap_Foldable_List(csegen_49(), $91 => $91, {a1: ' repoLabels: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_51(), $0.a10), a2: {h: 0}}}), a2: {a1: Prelude_Types_foldMap_Foldable_List(csegen_49(), $a2 => $a2, {a1: ' orgMembers: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_51(), $0.a11), a2: {h: 0}}}), a2: {a1: Prelude_Types_foldMap_Foldable_List(csegen_49(), $b3 => $b3, {a1: ' ignoredPRs: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29({a1: x => Prelude_Show_show_Show_Integer(x), a2: d => x => Prelude_Show_showPrec_Show_Integer(d, x)}, $0.a12), a2: {h: 0}}}), a2: {a1: Prelude_Types_foldMap_Foldable_List(csegen_49(), $ca => $ca, {a1: ' githubPAT: ', a2: {a1: Data_Config_n__8977_4025_personalAccessToken($0), a2: {h: 0}}}), a2: {h: 0}}}}}}}}}}}}}});
6275
6357
  }
6276
6358
 
6277
6359
  /* Data.Config.show */
@@ -6296,7 +6378,7 @@ function Data_Config_rf__colors($0) {
6296
6378
 
6297
6379
  /* Data.Config.settableProps : List SomeSettableProp */
6298
6380
  const Data_Config_settableProps = __lazy(function () {
6299
- return {a1: {a1: 'assignTeams', a2: {a1: '[true/false] Determines whether or not to assign teams when assigning individual reviewers from a team.', a2: 0}}, a2: {a1: {a1: 'assignUsers', a2: {a1: '[true/false] Determines whether or not to assign an individual user based on Harmony\'s heuristics when assigning teams. You might want to disable `assginUsers` to allow GitHub to pick users to assign based on the team. This setting does not affect the ability to assign individual users withe Harmony\'s `+<username>` syntax.', a2: 1}}, a2: {a1: {a1: 'commentOnAssign', a2: {a1: '[true/false] Determines whether to comment on PR indicating that Harmony chose a reviewer.', a2: 2}}, a2: {a1: {a1: 'defaultRemote', a2: {a1: '[string] The name of the default Git remote to use (e.g. \'origin\').', a2: 3}}, a2: {a1: {a1: 'githubPAT', a2: {a1: '[string] The Personal Access Token Harmony should use to authenticate with GitHub. You can leave this unset if you want to set a PAT via the GITHUB_PAT environment variable.', a2: 4}}, a2: {h: 0}}}}}};
6381
+ return {a1: {a1: 'requestTeams', a2: {a1: '[true/false] Determines whether or not to request reviews from teams when requesting individual reviewers from a team.', a2: 0}}, a2: {a1: {a1: 'requestUsers', a2: {a1: '[true/false] Determines whether or not to request reviews from an individual user based on Harmony\'s heuristics when requestin review from teams. You might want to disable `requestUsers` to allow GitHub to pick users to request based on the team. This setting does not affect the ability to request reviews from individual users withe Harmony\'s `+<username>` syntax.', a2: 1}}, a2: {a1: {a1: 'commentOnRequest', a2: {a1: '[true/false] Determines whether to comment on PR indicating that Harmony chose a reviewer.', a2: 2}}, a2: {a1: {a1: 'defaultRemote', a2: {a1: '[string] The name of the default Git remote to use (e.g. \'origin\').', a2: 3}}, a2: {a1: {a1: 'githubPAT', a2: {a1: '[string] The Personal Access Token Harmony should use to authenticate with GitHub. You can leave this unset if you want to set a PAT via the GITHUB_PAT environment variable.', a2: 4}}, a2: {a1: {a1: 'assignUsers', a2: {a1: '[true/false] Deprecated alias for the \'requestUsers\' config option.', a2: 6}}, a2: {a1: {a1: 'assignTeams', a2: {a1: '[true/false] Deprecated alias for the \'requestTeams\' config option.', a2: 5}}, a2: {a1: {a1: 'commentOnAssign', a2: {a1: '[true/false] Deprecated alias for the \'commentOnRequest\' config option.', a2: 7}}, a2: {h: 0}}}}}}}}};
6300
6382
  });
6301
6383
 
6302
6384
  /* Data.Config.settablePropNamesAndHelp : List (String, String) */
@@ -6312,11 +6394,14 @@ const Data_Config_settablePropNames = __lazy(function () {
6312
6394
  /* Data.Config.settablePropNamed : (name : String) -> Maybe (Exists (SettableProp name)) */
6313
6395
  function Data_Config_settablePropNamed($0) {
6314
6396
  switch($0) {
6315
- case 'assignTeams': return {a1: 0};
6316
- case 'commentOnAssign': return {a1: 2};
6397
+ case 'requestTeams': return {a1: 0};
6398
+ case 'commentOnRequest': return {a1: 2};
6317
6399
  case 'defaultRemote': return {a1: 3};
6318
6400
  case 'githubPAT': return {a1: 4};
6319
- case 'assignUsers': return {a1: 1};
6401
+ case 'requestUsers': return {a1: 1};
6402
+ case 'assignTeams': return {a1: 5};
6403
+ case 'assignUsers': return {a1: 6};
6404
+ case 'commentOnAssign': return {a1: 7};
6320
6405
  default: return {h: 0};
6321
6406
  }
6322
6407
  }
@@ -6351,18 +6436,18 @@ function Data_Config_parseConfig($0, $1) {
6351
6436
  }
6352
6437
  };
6353
6438
  const $4 = {a1: $5, a2: a => $d => ({h: 1 /* Right */, a1: $d}), a3: $f};
6354
- const $3 = {a1: $4, a2: csegen_198(), a3: csegen_199()};
6355
- return Prelude_Interfaces_x3ex3dx3e($3, csegen_200(), $20 => Data_Config_n__8195_6496_parseConfigJson($0, $20), $1);
6439
+ const $3 = {a1: $4, a2: csegen_203(), a3: csegen_204()};
6440
+ return Prelude_Interfaces_x3ex3dx3e($3, csegen_205(), $20 => Data_Config_n__9464_4502_parseConfigJson($0, $20), $1);
6356
6441
  }
6357
6442
 
6358
6443
  /* Data.Config.longestSettablePropName : Nat */
6359
6444
  const Data_Config_longestSettablePropName = __lazy(function () {
6360
- return Prelude_Types_foldr_Foldable_List(csegen_201(), 0n, Prelude_Types_List_mapAppend({h: 0}, $8 => Prelude_Types_String_length(Data_Config_propNamex27($8)), Data_Config_settableProps()));
6445
+ return Prelude_Types_foldr_Foldable_List(csegen_206(), 0n, Prelude_Types_List_mapAppend({h: 0}, $8 => Prelude_Types_String_length(Data_Config_propNamex27($8)), Data_Config_settableProps()));
6361
6446
  });
6362
6447
 
6363
6448
  /* Data.Config.json : Config -> JSON */
6364
6449
  function Data_Config_json($0) {
6365
- return {h: 6 /* JObject */, a1: {a1: {a1: 'assignTeams', a2: {h: 3 /* JBool */, a1: $0.a6}}, a2: {a1: {a1: 'assignUsers', a2: {h: 3 /* JBool */, a1: $0.a7}}, a2: {a1: {a1: 'commentOnAssign', a2: {h: 3 /* JBool */, a1: $0.a8}}, a2: {a1: {a1: 'org', a2: {h: 4 /* JString */, a1: $0.a2}}, a2: {a1: {a1: 'repo', a2: {h: 4 /* JString */, a1: $0.a3}}, a2: {a1: {a1: 'defaultRemote', a2: {h: 4 /* JString */, a1: $0.a4}}, a2: {a1: {a1: 'mainBranch', a2: {h: 4 /* JString */, a1: $0.a5}}, a2: {a1: {a1: 'orgMembers', a2: {h: 5 /* JArray */, a1: Prelude_Types_List_mapAppend({h: 0}, $2d => ({h: 4 /* JString */, a1: $2d}), Data_List_sort(csegen_212(), $0.a11))}}, a2: {a1: {a1: 'teamSlugs', a2: {h: 5 /* JArray */, a1: Prelude_Types_List_mapAppend({h: 0}, $3c => ({h: 4 /* JString */, a1: $3c}), Data_List_sort(csegen_212(), $0.a9))}}, a2: {a1: {a1: 'repoLabels', a2: {h: 5 /* JArray */, a1: Prelude_Types_List_mapAppend({h: 0}, $4b => ({h: 4 /* JString */, a1: $4b}), Data_List_sort(csegen_212(), $0.a10))}}, a2: {a1: {a1: 'ignoredPRs', a2: {h: 5 /* JArray */, a1: Prelude_Types_List_mapAppend({h: 0}, $5a => ({h: 1 /* JInteger */, a1: $5a}), Data_List_sort({a1: csegen_215(), a2: csegen_216(), a3: $64 => $65 => Prelude_EqOrd_x3c_Ord_Integer($64, $65), a4: $6a => $6b => Prelude_EqOrd_x3e_Ord_Integer($6a, $6b), a5: $70 => $71 => Prelude_EqOrd_x3cx3d_Ord_Integer($70, $71), a6: $76 => $77 => Prelude_EqOrd_x3ex3d_Ord_Integer($76, $77), a7: $7c => $7d => Prelude_EqOrd_max_Ord_Integer($7c, $7d), a8: $82 => $83 => Prelude_EqOrd_min_Ord_Integer($82, $83)}, $0.a12))}}, a2: {a1: {a1: 'githubPAT', a2: Prelude_Types_maybe(() => ({h: 0 /* JNull */}), () => $8f => ({h: 4 /* JString */, a1: $8f}), $0.a13)}, a2: {a1: {a1: 'updatedAt', a2: {h: 1 /* JInteger */, a1: BigInt($0.a1)}}, a2: {h: 0}}}}}}}}}}}}}}};
6450
+ return {h: 6 /* JObject */, a1: {a1: {a1: 'requestTeams', a2: {h: 3 /* JBool */, a1: $0.a6}}, a2: {a1: {a1: 'requestUsers', a2: {h: 3 /* JBool */, a1: $0.a7}}, a2: {a1: {a1: 'commentOnRequest', a2: {h: 3 /* JBool */, a1: $0.a8}}, a2: {a1: {a1: 'org', a2: {h: 4 /* JString */, a1: $0.a2}}, a2: {a1: {a1: 'repo', a2: {h: 4 /* JString */, a1: $0.a3}}, a2: {a1: {a1: 'defaultRemote', a2: {h: 4 /* JString */, a1: $0.a4}}, a2: {a1: {a1: 'mainBranch', a2: {h: 4 /* JString */, a1: $0.a5}}, a2: {a1: {a1: 'orgMembers', a2: {h: 5 /* JArray */, a1: Prelude_Types_List_mapAppend({h: 0}, $2d => ({h: 4 /* JString */, a1: $2d}), Data_List_sort(csegen_217(), $0.a11))}}, a2: {a1: {a1: 'teamSlugs', a2: {h: 5 /* JArray */, a1: Prelude_Types_List_mapAppend({h: 0}, $3c => ({h: 4 /* JString */, a1: $3c}), Data_List_sort(csegen_217(), $0.a9))}}, a2: {a1: {a1: 'repoLabels', a2: {h: 5 /* JArray */, a1: Prelude_Types_List_mapAppend({h: 0}, $4b => ({h: 4 /* JString */, a1: $4b}), Data_List_sort(csegen_217(), $0.a10))}}, a2: {a1: {a1: 'ignoredPRs', a2: {h: 5 /* JArray */, a1: Prelude_Types_List_mapAppend({h: 0}, $5a => ({h: 1 /* JInteger */, a1: $5a}), Data_List_sort({a1: csegen_220(), a2: csegen_221(), a3: $64 => $65 => Prelude_EqOrd_x3c_Ord_Integer($64, $65), a4: $6a => $6b => Prelude_EqOrd_x3e_Ord_Integer($6a, $6b), a5: $70 => $71 => Prelude_EqOrd_x3cx3d_Ord_Integer($70, $71), a6: $76 => $77 => Prelude_EqOrd_x3ex3d_Ord_Integer($76, $77), a7: $7c => $7d => Prelude_EqOrd_max_Ord_Integer($7c, $7d), a8: $82 => $83 => Prelude_EqOrd_min_Ord_Integer($82, $83)}, $0.a12))}}, a2: {a1: {a1: 'githubPAT', a2: Prelude_Types_maybe(() => ({h: 0 /* JNull */}), () => $8f => ({h: 4 /* JString */, a1: $8f}), $0.a13)}, a2: {a1: {a1: 'updatedAt', a2: {h: 1 /* JInteger */, a1: BigInt($0.a1)}}, a2: {h: 0}}}}}}}}}}}}}}};
6366
6451
  }
6367
6452
 
6368
6453
  /* Data.Config.filename : String */
@@ -6380,7 +6465,7 @@ function Decidable_Equality_decEq_DecEq_FromEqx24a($0, $1, $2) {
6380
6465
 
6381
6466
  /* Decidable.Equality.decEq */
6382
6467
  function Decidable_Equality_decEq_DecEq_Char($0, $1) {
6383
- return Decidable_Equality_decEq_DecEq_FromEqx24a(csegen_90(), $0, $1);
6468
+ return Decidable_Equality_decEq_DecEq_FromEqx24a(csegen_91(), $0, $1);
6384
6469
  }
6385
6470
 
6386
6471
  /* Data.Either.maybeToEither : Lazy e -> Maybe a -> Either e a */
@@ -6924,13 +7009,13 @@ function JSON_Parser_eqJSON($0, $1) {
6924
7009
  }
6925
7010
  case 5: /* JArray */ {
6926
7011
  switch($1.h) {
6927
- case 5: /* JArray */ return Prelude_Types_x3dx3d_Eq_x28Listx20x24ax29(csegen_229(), $0.a1, $1.a1);
7012
+ case 5: /* JArray */ return Prelude_Types_x3dx3d_Eq_x28Listx20x24ax29(csegen_234(), $0.a1, $1.a1);
6928
7013
  default: return 0;
6929
7014
  }
6930
7015
  }
6931
7016
  case 6: /* JObject */ {
6932
7017
  switch($1.h) {
6933
- case 6: /* JObject */ return Prelude_Types_x3dx3d_Eq_x28Listx20x24ax29({a1: $1e => $1f => Prelude_EqOrd_x3dx3d_Eq_x28x7cx28x28Builtinx2ePairx20x24ax29x20x24bx29x2cx28x28Builtinx2eMkPairx20x24ax29x20x24bx29x7cx29(csegen_39(), csegen_229(), $1e, $1f), a2: $28 => $29 => Prelude_EqOrd_x2fx3d_Eq_x28x7cx28x28Builtinx2ePairx20x24ax29x20x24bx29x2cx28x28Builtinx2eMkPairx20x24ax29x20x24bx29x7cx29(csegen_39(), csegen_229(), $28, $29)}, $0.a1, $1.a1);
7018
+ case 6: /* JObject */ return Prelude_Types_x3dx3d_Eq_x28Listx20x24ax29({a1: $1e => $1f => Prelude_EqOrd_x3dx3d_Eq_x28x7cx28x28Builtinx2ePairx20x24ax29x20x24bx29x2cx28x28Builtinx2eMkPairx20x24ax29x20x24bx29x7cx29(csegen_39(), csegen_234(), $1e, $1f), a2: $28 => $29 => Prelude_EqOrd_x2fx3d_Eq_x28x7cx28x28Builtinx2ePairx20x24ax29x20x24bx29x2cx28x28Builtinx2eMkPairx20x24ax29x20x24bx29x7cx29(csegen_39(), csegen_234(), $28, $29)}, $0.a1, $1.a1);
6934
7019
  default: return 0;
6935
7020
  }
6936
7021
  }
@@ -7170,7 +7255,7 @@ function Text_ParseError_failInParenEOI($0, $1, $2, $3) {
7170
7255
  case 1: /* Right */ {
7171
7256
  const $8 = {h: 1 /* Fail0 */, a1: {a1: {h: 9 /* Unexpected */, a1: {h: 1 /* Right */, a1: $3.a1.a1.a1.a1}}, a2: $3.a1.a2}};
7172
7257
  switch($2($3.a1.a1.a1.a1)) {
7173
- case 1: return csegen_236()($0)({h: 8 /* Unclosed */, a1: {h: 1 /* Right */, a1: $1}});
7258
+ case 1: return csegen_241()($0)({h: 8 /* Unclosed */, a1: {h: 1 /* Right */, a1: $1}});
7174
7259
  case 0: return Text_ParseError_failInParen($0, $1, $8);
7175
7260
  }
7176
7261
  }
@@ -7190,7 +7275,7 @@ function Text_ParseError_failInParenEOI($0, $1, $2, $3) {
7190
7275
  case undefined: /* cons */ {
7191
7276
  const $2a = {h: 0 /* Succ0 */, a1: $3.a1, a2: {a1: {a1: $3.a2.a1.a1, a2: $3.a2.a1.a2}, a2: $3.a2.a2}};
7192
7277
  switch($2($3.a2.a1.a1)) {
7193
- case 1: return csegen_236()($0)({h: 8 /* Unclosed */, a1: {h: 1 /* Right */, a1: $1}});
7278
+ case 1: return csegen_241()($0)({h: 8 /* Unclosed */, a1: {h: 1 /* Right */, a1: $1}});
7194
7279
  case 0: return Text_ParseError_failInParen($0, $1, $2a);
7195
7280
  }
7196
7281
  }
@@ -7211,7 +7296,7 @@ function Text_ParseError_failInParen($0, $1, $2) {
7211
7296
  switch($2.a1.h) {
7212
7297
  case undefined: /* cons */ {
7213
7298
  switch($2.a1.a1.h) {
7214
- case 1: /* EOI */ return csegen_236()($0)({h: 8 /* Unclosed */, a1: {h: 1 /* Right */, a1: $1}});
7299
+ case 1: /* EOI */ return csegen_241()($0)({h: 8 /* Unclosed */, a1: {h: 1 /* Right */, a1: $1}});
7215
7300
  default: return {h: 1 /* Fail0 */, a1: $2.a1};
7216
7301
  }
7217
7302
  }
@@ -7220,8 +7305,8 @@ function Text_ParseError_failInParen($0, $1, $2) {
7220
7305
  }
7221
7306
  case 0: /* Succ0 */ {
7222
7307
  switch($2.a2.h) {
7223
- case 0: /* nil */ return csegen_236()($0)({h: 8 /* Unclosed */, a1: {h: 1 /* Right */, a1: $1}});
7224
- case undefined: /* cons */ return csegen_236()($2.a2.a1.a2)({h: 9 /* Unexpected */, a1: {h: 1 /* Right */, a1: $2.a2.a1.a1}});
7308
+ case 0: /* nil */ return csegen_241()($0)({h: 8 /* Unclosed */, a1: {h: 1 /* Right */, a1: $1}});
7309
+ case undefined: /* cons */ return csegen_241()($2.a2.a1.a2)({h: 9 /* Unexpected */, a1: {h: 1 /* Right */, a1: $2.a2.a1.a1}});
7225
7310
  }
7226
7311
  }
7227
7312
  }
@@ -7230,8 +7315,8 @@ function Text_ParseError_failInParen($0, $1, $2) {
7230
7315
  /* Text.ParseError.fail : List (Bounded t) -> Result0 b (Bounded t) ts (Bounded (ParseError t y)) a */
7231
7316
  function Text_ParseError_fail($0) {
7232
7317
  switch($0.h) {
7233
- case undefined: /* cons */ return csegen_236()($0.a1.a2)({h: 9 /* Unexpected */, a1: {h: 1 /* Right */, a1: $0.a1.a1}});
7234
- case 0: /* nil */ return csegen_236()({h: 0})({h: 1 /* EOI */});
7318
+ case undefined: /* cons */ return csegen_241()($0.a1.a2)({h: 9 /* Unexpected */, a1: {h: 1 /* Right */, a1: $0.a1.a1}});
7319
+ case 0: /* nil */ return csegen_241()({h: 0})({h: 1 /* EOI */});
7235
7320
  }
7236
7321
  }
7237
7322
 
@@ -7277,18 +7362,18 @@ function Util_with__yesNoPromptx2cyesUnlessNo_1292($0, $1, $2, $3, $4) {
7277
7362
  }
7278
7363
  }
7279
7364
 
7280
- /* Util.5058:1284:yesUnlessNo */
7281
- function Util_n__5058_1284_yesUnlessNo($0, $1, $2) {
7365
+ /* Util.5163:1284:yesUnlessNo */
7366
+ function Util_n__5163_1284_yesUnlessNo($0, $1, $2) {
7282
7367
  return Util_with__yesNoPromptx2cyesUnlessNo_1292(undefined, $0, $1, $2, Data_String_toLower($2));
7283
7368
  }
7284
7369
 
7285
- /* Util.5161:1391:startOver */
7286
- const Util_n__5161_1391_startOver = __lazy(function () {
7370
+ /* Util.5266:1391:startOver */
7371
+ const Util_n__5266_1391_startOver = __lazy(function () {
7287
7372
  return {a1: 0, a2: {h: 0}};
7288
7373
  });
7289
7374
 
7290
- /* Util.5161:1390:guardSuccess */
7291
- function Util_n__5161_1390_guardSuccess($0) {
7375
+ /* Util.5266:1390:guardSuccess */
7376
+ function Util_n__5266_1390_guardSuccess($0) {
7292
7377
  switch($0.h) {
7293
7378
  case undefined: /* cons */ {
7294
7379
  switch($0.a1) {
@@ -7301,13 +7386,13 @@ function Util_n__5161_1390_guardSuccess($0) {
7301
7386
  }
7302
7387
  }
7303
7388
 
7304
- /* Util.5161:1389:go */
7305
- function Util_n__5161_1389_go($0, $1) {
7389
+ /* Util.5266:1389:go */
7390
+ function Util_n__5266_1389_go($0, $1) {
7306
7391
  switch($0.a1) {
7307
7392
  case 0: {
7308
7393
  switch(Prelude_Types_isAlpha($1)) {
7309
7394
  case 1: return {a1: 1, a2: {a1: $1, a2: $0.a2}};
7310
- case 0: return Util_n__5161_1391_startOver();
7395
+ case 0: return Util_n__5266_1391_startOver();
7311
7396
  }
7312
7397
  }
7313
7398
  case 1: {
@@ -7316,7 +7401,7 @@ function Util_n__5161_1389_go($0, $1) {
7316
7401
  default: {
7317
7402
  switch(Prelude_Types_isAlpha($1)) {
7318
7403
  case 1: return {a1: 1, a2: {a1: $1, a2: $0.a2}};
7319
- case 0: return Util_n__5161_1391_startOver();
7404
+ case 0: return Util_n__5266_1391_startOver();
7320
7405
  }
7321
7406
  }
7322
7407
  }
@@ -7324,7 +7409,7 @@ function Util_n__5161_1389_go($0, $1) {
7324
7409
  case 2: {
7325
7410
  switch(Prelude_Types_isDigit($1)) {
7326
7411
  case 1: return {a1: 3, a2: {a1: $1, a2: $0.a2}};
7327
- case 0: return Util_n__5161_1391_startOver();
7412
+ case 0: return Util_n__5266_1391_startOver();
7328
7413
  }
7329
7414
  }
7330
7415
  case 3: {
@@ -7337,8 +7422,8 @@ function Util_n__5161_1389_go($0, $1) {
7337
7422
  }
7338
7423
  }
7339
7424
 
7340
- /* Util.4945:1172:getMoreLines */
7341
- function Util_n__4945_1172_getMoreLines($0, $1, $2) {
7425
+ /* Util.5050:1172:getMoreLines */
7426
+ function Util_n__5050_1172_getMoreLines($0, $1, $2) {
7342
7427
  switch($2.h) {
7343
7428
  case 0: /* nothing */ return $0.a1.a1.a2(undefined)(Prelude_Types_List_reverse($1));
7344
7429
  case undefined: /* just */ {
@@ -7349,13 +7434,13 @@ function Util_n__4945_1172_getMoreLines($0, $1, $2) {
7349
7434
  case '': {
7350
7435
  switch(line) {
7351
7436
  case '': return $0.a1.a1.a2(undefined)(Prelude_Types_List_reverse($1.a2));
7352
- default: return Util_n__4945_1172_getMoreLines($0, {a1: line, a2: $1}, $2.a1());
7437
+ default: return Util_n__5050_1172_getMoreLines($0, {a1: line, a2: $1}, $2.a1());
7353
7438
  }
7354
7439
  }
7355
- default: return Util_n__4945_1172_getMoreLines($0, {a1: line, a2: $1}, $2.a1());
7440
+ default: return Util_n__5050_1172_getMoreLines($0, {a1: line, a2: $1}, $2.a1());
7356
7441
  }
7357
7442
  }
7358
- default: return Util_n__4945_1172_getMoreLines($0, {a1: line, a2: $1}, $2.a1());
7443
+ default: return Util_n__5050_1172_getMoreLines($0, {a1: line, a2: $1}, $2.a1());
7359
7444
  }
7360
7445
  };
7361
7446
  return $0.a1.a2(undefined)(undefined)($0.a1.a1.a1(undefined)(undefined)($20 => Data_String_trim($20))($0.a2(undefined)($29 => Prelude_IO_prim__getStr($29))))($2c);
@@ -7365,7 +7450,7 @@ function Util_n__4945_1172_getMoreLines($0, $1, $2) {
7365
7450
 
7366
7451
  /* Util.yesNoPrompt : HasIO io => String -> io Bool */
7367
7452
  function Util_yesNoPrompt($0, $1) {
7368
- return $0.a1.a2(undefined)(undefined)($0.a2(undefined)($10 => Prelude_IO_prim__putStr(Prelude_Types_foldMap_Foldable_List(csegen_49(), $17 => $17, {a1: $1, a2: {a1: ' [Y/n] ', a2: {h: 0}}}), $10)))($1f => $0.a1.a1.a1(undefined)(undefined)($2a => Util_n__5058_1284_yesUnlessNo($0, $1, Data_String_trim($2a)))($0.a2(undefined)($37 => Prelude_IO_prim__getStr($37))));
7453
+ return $0.a1.a2(undefined)(undefined)($0.a2(undefined)($10 => Prelude_IO_prim__putStr(Prelude_Types_foldMap_Foldable_List(csegen_49(), $17 => $17, {a1: $1, a2: {a1: ' [Y/n] ', a2: {h: 0}}}), $10)))($1f => $0.a1.a1.a1(undefined)(undefined)($2a => Util_n__5163_1284_yesUnlessNo($0, $1, Data_String_trim($2a)))($0.a2(undefined)($37 => Prelude_IO_prim__getStr($37))));
7369
7454
  }
7370
7455
 
7371
7456
  /* Util.whenNothing : Applicative f => Maybe a -> f () -> f () */
@@ -7419,12 +7504,12 @@ function Util_relativeToRoot($0, $1, $2, $3) {
7419
7504
 
7420
7505
  /* Util.parseJiraPrefix : String -> Maybe String */
7421
7506
  function Util_parseJiraPrefix($0) {
7422
- return Prelude_Types_map_Functor_Maybe($3 => Prelude_Types_fastPack(Prelude_Types_List_reverse($3)), Util_n__5161_1390_guardSuccess(Prelude_Types_foldl_Foldable_List($d => $e => Util_n__5161_1389_go($d, $e), Util_n__5161_1391_startOver(), Prelude_Types_fastUnpack($0))));
7507
+ return Prelude_Types_map_Functor_Maybe($3 => Prelude_Types_fastPack(Prelude_Types_List_reverse($3)), Util_n__5266_1390_guardSuccess(Prelude_Types_foldl_Foldable_List($d => $e => Util_n__5266_1389_go($d, $e), Util_n__5266_1391_startOver(), Prelude_Types_fastUnpack($0))));
7423
7508
  }
7424
7509
 
7425
7510
  /* Util.getManyLines : HasIO io => Fuel -> io (List String) */
7426
7511
  function Util_getManyLines($0, $1) {
7427
- return Util_n__4945_1172_getMoreLines($0, {h: 0}, $1);
7512
+ return Util_n__5050_1172_getMoreLines($0, {h: 0}, $1);
7428
7513
  }
7429
7514
 
7430
7515
  /* FFI.Git.case block in unpushedCommits */
@@ -7713,14 +7798,14 @@ function System_File_ReadWrite_readLinesOnto($0, $1, $2, $3, $4) {
7713
7798
  }
7714
7799
  };
7715
7800
  const $26 = {a1: $27, a2: a => $2f => ({h: 1 /* Right */, a1: $2f}), a3: $31};
7716
- const $25 = {a1: $26, a2: csegen_198(), a3: csegen_199()};
7801
+ const $25 = {a1: $26, a2: csegen_203(), a3: csegen_204()};
7717
7802
  const $40 = b => a => func => $41 => {
7718
7803
  switch($41.h) {
7719
7804
  case 0: /* Left */ return {h: 0 /* Left */, a1: $41.a1};
7720
7805
  case 1: /* Right */ return {h: 1 /* Right */, a1: func($41.a1)};
7721
7806
  }
7722
7807
  };
7723
- const $3f = {a1: $40, a2: csegen_256(), a3: csegen_260()};
7808
+ const $3f = {a1: $40, a2: csegen_261(), a3: csegen_265()};
7724
7809
  return Prelude_Interfaces_Monad_x3ex3ex3d_Monad_Composex28x28x2ex20x24mx29x20x24tx29($0.a1, $25, $3f, System_File_ReadWrite_fGetLine($0, $4), str => System_File_ReadWrite_readLinesOnto($0, {a1: str, a2: $1}, 0n, $3.a1(), $4));
7725
7810
  }
7726
7811
  default: {
@@ -8019,7 +8104,7 @@ const System_Info_os = __lazy(function () {
8019
8104
 
8020
8105
  /* System.Info.isWindows : Bool */
8021
8106
  const System_Info_isWindows = __lazy(function () {
8022
- return Prelude_Types_elem(csegen_144(), csegen_39(), System_Info_os(), {a1: 'windows', a2: {a1: 'mingw32', a2: {a1: 'cygwin32', a2: {h: 0}}}});
8107
+ return Prelude_Types_elem(csegen_145(), csegen_39(), System_Info_os(), {a1: 'windows', a2: {a1: 'mingw32', a2: {a1: 'cygwin32', a2: {h: 0}}}});
8023
8108
  });
8024
8109
 
8025
8110
  /* System.File.Meta.isTTY : HasIO io => File -> io Bool */
@@ -8158,7 +8243,7 @@ function System_getEnv($0, $1) {
8158
8243
  function System_getArgs($0) {
8159
8244
  const $12 = n => {
8160
8245
  switch(Prelude_EqOrd_x3e_Ord_Int(n, Number(_truncBigInt32(0n)))) {
8161
- case 1: return Prelude_Basics_flip($1a => $1b => Prelude_Types_traverse_Traversable_List($0.a1.a1, $1a, $1b), Prelude_Types_rangeFromTo_Range_x24a({a1: {a1: csegen_274(), a2: $29 => $2a => Prelude_Num_div_Integral_Int($29, $2a), a3: $2f => $30 => Prelude_Num_mod_Integral_Int($2f, $30)}, a2: {a1: {a1: {a1: $38 => $39 => Prelude_EqOrd_x3dx3d_Eq_Int($38, $39), a2: $3e => $3f => Prelude_EqOrd_x2fx3d_Eq_Int($3e, $3f)}, a2: $44 => $45 => Prelude_EqOrd_compare_Ord_Int($44, $45), a3: $4a => $4b => Prelude_EqOrd_x3c_Ord_Int($4a, $4b), a4: $50 => $51 => Prelude_EqOrd_x3e_Ord_Int($50, $51), a5: $56 => $57 => Prelude_EqOrd_x3cx3d_Ord_Int($56, $57), a6: $5c => $5d => Prelude_EqOrd_x3ex3d_Ord_Int($5c, $5d), a7: $62 => $63 => Prelude_EqOrd_max_Ord_Int($62, $63), a8: $68 => $69 => Prelude_EqOrd_min_Ord_Int($68, $69)}, a2: {a1: csegen_274(), a2: $71 => _sub32s(0, $71), a3: $75 => $76 => _sub32s($75, $76)}}}, 0, _sub32s(n, 1)), $7e => $0.a2(undefined)($84 => System_prim__getArg($7e, $84)));
8246
+ case 1: return Prelude_Basics_flip($1a => $1b => Prelude_Types_traverse_Traversable_List($0.a1.a1, $1a, $1b), Prelude_Types_rangeFromTo_Range_x24a({a1: {a1: csegen_279(), a2: $29 => $2a => Prelude_Num_div_Integral_Int($29, $2a), a3: $2f => $30 => Prelude_Num_mod_Integral_Int($2f, $30)}, a2: {a1: {a1: {a1: $38 => $39 => Prelude_EqOrd_x3dx3d_Eq_Int($38, $39), a2: $3e => $3f => Prelude_EqOrd_x2fx3d_Eq_Int($3e, $3f)}, a2: $44 => $45 => Prelude_EqOrd_compare_Ord_Int($44, $45), a3: $4a => $4b => Prelude_EqOrd_x3c_Ord_Int($4a, $4b), a4: $50 => $51 => Prelude_EqOrd_x3e_Ord_Int($50, $51), a5: $56 => $57 => Prelude_EqOrd_x3cx3d_Ord_Int($56, $57), a6: $5c => $5d => Prelude_EqOrd_x3ex3d_Ord_Int($5c, $5d), a7: $62 => $63 => Prelude_EqOrd_max_Ord_Int($62, $63), a8: $68 => $69 => Prelude_EqOrd_min_Ord_Int($68, $69)}, a2: {a1: csegen_279(), a2: $71 => _sub32s(0, $71), a3: $75 => $76 => _sub32s($75, $76)}}}, 0, _sub32s(n, 1)), $7e => $0.a2(undefined)($84 => System_prim__getArg($7e, $84)));
8162
8247
  case 0: return $0.a1.a1.a2(undefined)({h: 0});
8163
8248
  }
8164
8249
  };
@@ -8186,21 +8271,21 @@ function System_exitFailure($0) {
8186
8271
  /* Help.subcommandHelp' : String -> Doc AnsiStyle */
8187
8272
  function Help_subcommandHelpx27($0) {
8188
8273
  switch($0) {
8189
- case 'label': return Help_subcommand($0, {a1: Help_argument(1, '<label>'), a2: csegen_294()}, {a1: Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29(Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('Add one or more labels to a PR, creating a new PR if one does not exist.'), Text_PrettyPrint_Prettyprinter_Doc_line()), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('Labels that do not exist yet will be created automatically.')), a2: {h: 0}});
8190
- case 'assign': return Help_subcommand($0, {a1: Help_argument(1, '<team-slug> | +<user-login>'), a2: csegen_299()}, {a1: Text_PrettyPrint_Prettyprinter_Util_reflow(Prelude_Types_foldMap_Foldable_List(csegen_49(), $2a => $2a, {a1: 'Assign the given team(s) and one lucky member from one of those teams\nto review the PR for the current branch.', a2: {h: 0}})), a2: {a1: Text_PrettyPrint_Prettyprinter_Util_reflow(Prelude_Types_foldMap_Foldable_List(csegen_49(), $36 => $36, {a1: 'Also assign any users with logins specified. You specify these\nadditional users by prefixing their logins with \'+\'.', a2: {h: 0}})), a2: csegen_305()}});
8191
- case 'config': return Help_subcommand($0, {a1: Help_argument(1, '<property>'), a2: {a1: Help_argument(0, '<value>'), a2: {h: 0}}}, {a1: Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29(Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29(Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29(Text_PrettyPrint_Prettyprinter_Util_reflow(Prelude_Types_foldMap_Foldable_List(csegen_49(), $59 => $59, {a1: 'Get or set the value of a configuration property. Not all properties\ncan be set and read via this subcommand.', a2: {h: 0}})), Text_PrettyPrint_Prettyprinter_Doc_line()), Help_argumentx27('properties')), Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Text_PrettyPrint_Prettyprinter_Doc_unsafeTextWithoutNewLines(':'), a2: {h: 0}})), Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29(Text_PrettyPrint_Prettyprinter_Doc_concatWith(a => b => Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29(a, Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Text_PrettyPrint_Prettyprinter_Doc_unsafeTextWithoutNewLines(','), a2: {h: 0}})), b), Prelude_Types_List_mapAppend({h: 0}, $7e => Help_option($7e), Data_Config_settablePropNames())), csegen_323())), a2: {h: 0}});
8192
- case 'pr': return Help_subcommand($0, {a1: Help_argument(0, '--draft'), a2: csegen_299()}, {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('Identify an existing PR or create a new one for the current branch.'), a2: csegen_305()});
8193
- case 'contribute': return Help_subcommand($0, {a1: Help_argument(0, '-c/--checkout'), a2: {a1: Help_argument(0, '-<num>'), a2: {a1: Help_argument(0, '-i/--ignore {<uri>/<pr-number>}'), a2: {h: 0}}}}, {a1: Text_PrettyPrint_Prettyprinter_Util_reflow(Prelude_Types_foldMap_Foldable_List(csegen_49(), $af => $af, {a1: 'Contribute to an open PR. Prints a URL. Prioritizes PRs you are\nrequested to review but will also return other PRs.', a2: {h: 0}})), a2: {a1: Text_PrettyPrint_Prettyprinter_Util_reflow(Prelude_Types_foldMap_Foldable_List(csegen_49(), $bb => $bb, {a1: 'Use dash followed by a number (e.g. \'-3\') to skip that number of\npotential PRs and return the next.', a2: {h: 0}})), a2: {a1: Text_PrettyPrint_Prettyprinter_Util_reflow(Prelude_Types_foldMap_Foldable_List(csegen_49(), $c7 => $c7, {a1: 'Specify a PR to ignore (only affects the local Harmony config on\nthis machine) if you would like to more permanently skip a potential\nPR. Do this with the \'--ignore\' option followed by a GitHub URI or\nPull Request number.', a2: {h: 0}})), a2: {h: 0}}}});
8194
- case 'graph': return Help_subcommand($0, {a1: Help_argument(0, '-c/--completed'), a2: csegen_341()}, {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('Graph the relative review workload of the members of the given GitHub Team.'), a2: {h: 0}});
8274
+ case 'label': return Help_subcommand($0, {a1: Help_argument(1, '<label>'), a2: csegen_299()}, {a1: Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29(Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('Add one or more labels to a PR, creating a new PR if one does not exist.'), Text_PrettyPrint_Prettyprinter_Doc_line()), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('Labels that do not exist yet will be created automatically.')), a2: {h: 0}});
8275
+ case 'request': return Help_subcommand($0, {a1: Help_argument(1, '<team-slug> | +<user-login>'), a2: csegen_304()}, {a1: Text_PrettyPrint_Prettyprinter_Util_reflow(Prelude_Types_foldMap_Foldable_List(csegen_49(), $2a => $2a, {a1: 'Request review from the given team(s) and one lucky member from one\nof those teams to review the PR for the current branch.', a2: {h: 0}})), a2: {a1: Text_PrettyPrint_Prettyprinter_Util_reflow(Prelude_Types_foldMap_Foldable_List(csegen_49(), $36 => $36, {a1: 'Also request reviews from any users with logins specified. You specify\nthese additional users by prefixing their logins with \'+\'.', a2: {h: 0}})), a2: csegen_310()}});
8276
+ case 'config': return Help_subcommand($0, {a1: Help_argument(1, '<property>'), a2: {a1: Help_argument(0, '<value>'), a2: {h: 0}}}, {a1: Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29(Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29(Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29(Text_PrettyPrint_Prettyprinter_Util_reflow(Prelude_Types_foldMap_Foldable_List(csegen_49(), $59 => $59, {a1: 'Get or set the value of a configuration property. Not all properties\ncan be set and read via this subcommand.', a2: {h: 0}})), Text_PrettyPrint_Prettyprinter_Doc_line()), Help_argumentx27('properties')), Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Text_PrettyPrint_Prettyprinter_Doc_unsafeTextWithoutNewLines(':'), a2: {h: 0}})), Text_PrettyPrint_Prettyprinter_Doc_align(Text_PrettyPrint_Prettyprinter_Doc_concatWith(a => b => Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29(Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29(Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29(a, Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Text_PrettyPrint_Prettyprinter_Doc_unsafeTextWithoutNewLines(','), a2: {h: 0}})), Text_PrettyPrint_Prettyprinter_Doc_softline()), b), Prelude_Types_List_mapAppend({h: 0}, $82 => Help_option($82), Data_Config_settablePropNames())))), a2: {h: 0}});
8277
+ case 'pr': return Help_subcommand($0, {a1: Help_argument(0, '--draft'), a2: csegen_304()}, {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('Identify an existing PR or create a new one for the current branch.'), a2: csegen_310()});
8278
+ case 'contribute': return Help_subcommand($0, {a1: Help_argument(0, '-c/--checkout'), a2: {a1: Help_argument(0, '-<num>'), a2: {a1: Help_argument(0, '-i/--ignore {<uri>/<pr-number>}'), a2: {h: 0}}}}, {a1: Text_PrettyPrint_Prettyprinter_Util_reflow(Prelude_Types_foldMap_Foldable_List(csegen_49(), $b1 => $b1, {a1: 'Contribute to an open PR. Prints a URL. Prioritizes PRs you are\nrequested to review but will also return other PRs.', a2: {h: 0}})), a2: {a1: Text_PrettyPrint_Prettyprinter_Util_reflow(Prelude_Types_foldMap_Foldable_List(csegen_49(), $bd => $bd, {a1: 'Use dash followed by a number (e.g. \'-3\') to skip that number of\npotential PRs and return the next.', a2: {h: 0}})), a2: {a1: Text_PrettyPrint_Prettyprinter_Util_reflow(Prelude_Types_foldMap_Foldable_List(csegen_49(), $c9 => $c9, {a1: 'Specify a PR to ignore (only affects the local Harmony config on\nthis machine) if you would like to more permanently skip a potential\nPR. Do this with the \'--ignore\' option followed by a GitHub URI or\nPull Request number.', a2: {h: 0}})), a2: {h: 0}}}});
8279
+ case 'graph': return Help_subcommand($0, {a1: Help_argument(0, '-c/--completed'), a2: csegen_344()}, {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('Graph the relative review workload of the members of the given GitHub Team.'), a2: {h: 0}});
8195
8280
  case 'help': return Help_subcommand($0, {a1: Help_argument(0, '<subcommand>'), a2: {h: 0}}, {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('Print help'), a2: {h: 0}});
8196
8281
  case 'version': return Help_subcommand($0, {h: 0}, {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('Print version'), a2: {h: 0}});
8197
8282
  case 'sync': return Help_subcommand($0, {h: 0}, {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('Synchronize local config with information from GitHub.'), a2: {h: 0}});
8198
8283
  case 'branch': return Help_subcommand($0, {h: 0}, {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('Print the GitHub URI for the currently checked out branch.'), a2: {h: 0}});
8199
8284
  case 'whoami': return Help_subcommand($0, {h: 0}, {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('Print information about the configured and authenticated user.'), a2: {h: 0}});
8200
8285
  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}});
8201
- case 'list': return Help_subcommand($0, csegen_341(), {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('List the members of the given GitHub Team.'), a2: {h: 0}});
8286
+ 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}});
8202
8287
  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}});
8203
- default: return Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(Prelude_Types_foldMap_Foldable_List(csegen_49(), $126 => $126, {a1: 'Unreconized command: ', a2: {a1: $0, 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}}}));
8204
8289
  }
8205
8290
  }
8206
8291
 
@@ -8240,7 +8325,7 @@ function Help_option($0) {
8240
8325
 
8241
8326
  /* Help.helpDocs : Doc AnsiStyle */
8242
8327
  const Help_helpDocs = __lazy(function () {
8243
- 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('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}}}});
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}}}});
8244
8329
  });
8245
8330
 
8246
8331
  /* Help.help : Bool -> String */
@@ -8355,12 +8440,12 @@ function FFI_GitHub_listPullRequestsJsonStr($0, $1, $2, $3, $4, $5) {
8355
8440
  String -> String -> Maybe GitHubPRState -> Fin 101 -> {default 0 _ : Nat} ->
8356
8441
  Promise (List PullRequest) */
8357
8442
  function FFI_GitHub_listPullRequests($0, $1, $2, $3, $4, $5) {
8358
- return Prelude_Basics_flip(csegen_393(), csegen_394(), FFI_GitHub_listPullRequestsJsonStr($0, $1, $2, $3, $4, $5));
8443
+ return Prelude_Basics_flip(csegen_396(), csegen_397(), FFI_GitHub_listPullRequestsJsonStr($0, $1, $2, $3, $4, $5));
8359
8444
  }
8360
8445
 
8361
8446
  /* FFI.GitHub.listPRsForBranch : Octokit => String -> String -> String -> Promise (List PullRequest) */
8362
8447
  function FFI_GitHub_listPRsForBranch($0, $1, $2, $3) {
8363
- return Prelude_Basics_flip(csegen_393(), csegen_394(), $a => $b => FFI_promiseIO($e => $f => $10 => FFI_GitHub_prim__listPRsForBranch($0, $1, $2, $3, $e, $f, $10), $a, $b));
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));
8364
8449
  }
8365
8450
 
8366
8451
  /* FFI.GitHub.listOrgMembers : Octokit => String -> Promise (List String) */
@@ -8375,12 +8460,12 @@ function FFI_GitHub_listMyTeams($0, $1, $2) {
8375
8460
 
8376
8461
  /* FFI.GitHub.getUser : Octokit => String -> Promise User */
8377
8462
  function FFI_GitHub_getUser($0) {
8378
- return Prelude_Interfaces_x3cx3dx3c(csegen_69(), csegen_395(), $7 => $8 => $9 => FFI_promiseIO($c => $d => $e => FFI_GitHub_prim__getUser($0, $7, $c, $d, $e), $8, $9));
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));
8379
8464
  }
8380
8465
 
8381
8466
  /* FFI.GitHub.getSelf : Octokit => Promise User */
8382
8467
  function FFI_GitHub_getSelf($0) {
8383
- return Prelude_Basics_flip(csegen_393(), csegen_395(), $7 => $8 => FFI_promiseIO($b => $c => $d => FFI_GitHub_prim__getSelf($0, $b, $c, $d), $7, $8));
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));
8384
8469
  }
8385
8470
 
8386
8471
  /* FFI.GitHub.getRepoDefaultBranch : Octokit => String -> String -> Promise String */
@@ -8391,7 +8476,7 @@ function FFI_GitHub_getRepoDefaultBranch($0, $1, $2, $3, $4) {
8391
8476
  /* FFI.GitHub.createPR : Octokit => {default False _ : Bool} ->
8392
8477
  String -> String -> String -> String -> String -> String -> Promise PullRequest */
8393
8478
  function FFI_GitHub_createPR($0, $1, $2, $3, $4, $5, $6, $7) {
8394
- return Prelude_Basics_flip(csegen_393(), $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));
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));
8395
8480
  }
8396
8481
 
8397
8482
  /* FFI.GitHub.createComment : Octokit => String -> String -> Integer -> String -> Promise () */
@@ -8402,12 +8487,12 @@ function FFI_GitHub_createComment($0, $1, $2, $3, $4, $5, $6) {
8402
8487
  /* FFI.GitHub.addPullReviewers : Octokit =>
8403
8488
  String -> String -> Integer -> List String -> List String -> Promise (List String) */
8404
8489
  function FFI_GitHub_addPullReviewers($0, $1, $2, $3, $4, $5, $6, $7) {
8405
- return Data_Promise_x3ex3ex3d_Monad_Promise($a => $b => Data_Promise_map_Functor_Promise($e => Data_String_lines($e), $12 => $13 => FFI_promiseIO($16 => $17 => $18 => FFI_GitHub_prim__addPullReviewers($0, $1, $2, $3, '', Data_String_Extra_join(',', csegen_144(), $5), $16, $17, $18), $12, $13), $a, $b), teamReviewers => $2d => $2e => Data_Promise_x3ex3ex3d_Monad_Promise($31 => $32 => Data_Promise_map_Functor_Promise($35 => Data_String_lines($35), $39 => $3a => FFI_promiseIO($3d => $3e => $3f => FFI_GitHub_prim__addPullReviewers($0, $1, $2, $3, Data_String_Extra_join(',', csegen_144(), $4), '', $3d, $3e, $3f), $39, $3a), $31, $32), individualReviewers => $54 => $55 => Data_Promise_pure_Applicative_Promise(Prelude_Types_List_tailRecAppend(teamReviewers, individualReviewers), $54, $55), $2d, $2e), $6, $7);
8490
+ return Data_Promise_x3ex3ex3d_Monad_Promise($a => $b => Data_Promise_map_Functor_Promise($e => Data_String_lines($e), $12 => $13 => FFI_promiseIO($16 => $17 => $18 => FFI_GitHub_prim__addPullReviewers($0, $1, $2, $3, '', Data_String_Extra_join(',', csegen_145(), $5), $16, $17, $18), $12, $13), $a, $b), teamReviewers => $2d => $2e => Data_Promise_x3ex3ex3d_Monad_Promise($31 => $32 => Data_Promise_map_Functor_Promise($35 => Data_String_lines($35), $39 => $3a => FFI_promiseIO($3d => $3e => $3f => FFI_GitHub_prim__addPullReviewers($0, $1, $2, $3, Data_String_Extra_join(',', csegen_145(), $4), '', $3d, $3e, $3f), $39, $3a), $31, $32), individualReviewers => $54 => $55 => Data_Promise_pure_Applicative_Promise(Prelude_Types_List_tailRecAppend(teamReviewers, individualReviewers), $54, $55), $2d, $2e), $6, $7);
8406
8491
  }
8407
8492
 
8408
8493
  /* FFI.GitHub.addPullLabels : Octokit => String -> String -> Integer -> List String -> Promise (List String) */
8409
8494
  function FFI_GitHub_addPullLabels($0, $1, $2, $3, $4, $5, $6) {
8410
- return Data_Promise_map_Functor_Promise($9 => Data_String_lines($9), $d => $e => FFI_promiseIO($11 => $12 => $13 => FFI_GitHub_prim__addLabels($0, $1, $2, $3, Data_String_Extra_join(',', csegen_144(), $4), $11, $12, $13), $d, $e), $5, $6);
8495
+ return Data_Promise_map_Functor_Promise($9 => Data_String_lines($9), $d => $e => FFI_promiseIO($11 => $12 => $13 => FFI_GitHub_prim__addLabels($0, $1, $2, $3, Data_String_Extra_join(',', csegen_145(), $4), $11, $12, $13), $d, $e), $5, $6);
8411
8496
  }
8412
8497
 
8413
8498
  /* Data.User.parseUserString : String -> Either String User */
@@ -8430,8 +8515,8 @@ function Data_User_parseUserString($0) {
8430
8515
  }
8431
8516
  };
8432
8517
  const $3 = {a1: $4, a2: a => $c => ({h: 1 /* Right */, a1: $c}), a3: $e};
8433
- const $2 = {a1: $3, a2: csegen_198(), a3: csegen_199()};
8434
- return Prelude_Interfaces_x3ex3dx3e($2, csegen_200(), $1f => Data_User_parseUser($1f), $0);
8518
+ const $2 = {a1: $3, a2: csegen_203(), a3: csegen_204()};
8519
+ return Prelude_Interfaces_x3ex3dx3e($2, csegen_205(), $1f => Data_User_parseUser($1f), $0);
8435
8520
  }
8436
8521
 
8437
8522
  /* Data.User.parseUser : JSON -> Either String User */
@@ -8461,7 +8546,7 @@ function Data_Review_parseState($0) {
8461
8546
 
8462
8547
  /* Data.Review.parseReview : JSON -> Either String Review */
8463
8548
  function Data_Review_parseReview($0) {
8464
- 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_400(), $22 => Data_Review_parseState($22), Language_JSON_Accessors_string($12.a2.a1)), state => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Prelude_Basics_flip(csegen_400(), $2f => Data_Review_parseDateTime($2f), Language_JSON_Accessors_string($12.a2.a2.a1)), submittedAt => ({h: 1 /* Right */, a1: {a1: submittedAt, a2: author, a3: state}}))))));
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}}))))));
8465
8550
  }
8466
8551
 
8467
8552
  /* Data.Review.parseDateTime : String -> Either String Date */
@@ -8595,7 +8680,7 @@ function Data_Date_max_Ord_Date($0, $1) {
8595
8680
 
8596
8681
  /* Data.Date.compare */
8597
8682
  function Data_Date_compare_Ord_Date($0, $1) {
8598
- return Prelude_Types_compare_Ord_x28Listx20x24ax29({a1: {a1: $8 => $9 => (($8===$9)?1:0), a2: $d => $e => Prelude_Types_x2fx3d_Eq_Nat($d, $e)}, a2: csegen_216(), a3: $15 => $16 => Prelude_Types_x3c_Ord_Nat($15, $16), a4: $1b => $1c => Prelude_Types_x3e_Ord_Nat($1b, $1c), a5: $21 => $22 => Prelude_Types_x3cx3d_Ord_Nat($21, $22), a6: $27 => $28 => Prelude_Types_x3ex3d_Ord_Nat($27, $28), a7: $2d => $2e => Prelude_Types_max_Ord_Nat($2d, $2e), a8: $33 => $34 => Prelude_Types_min_Ord_Nat($33, $34)}, {a1: $0.a1, a2: {a1: $0.a2, a2: {a1: $0.a3, a2: {h: 0}}}}, {a1: $1.a1, a2: {a1: $1.a2, a2: {a1: $1.a3, a2: {h: 0}}}});
8683
+ return Prelude_Types_compare_Ord_x28Listx20x24ax29({a1: {a1: $8 => $9 => (($8===$9)?1:0), a2: $d => $e => Prelude_Types_x2fx3d_Eq_Nat($d, $e)}, a2: csegen_221(), a3: $15 => $16 => Prelude_Types_x3c_Ord_Nat($15, $16), a4: $1b => $1c => Prelude_Types_x3e_Ord_Nat($1b, $1c), a5: $21 => $22 => Prelude_Types_x3cx3d_Ord_Nat($21, $22), a6: $27 => $28 => Prelude_Types_x3ex3d_Ord_Nat($27, $28), a7: $2d => $2e => Prelude_Types_max_Ord_Nat($2d, $2e), a8: $33 => $34 => Prelude_Types_min_Ord_Nat($33, $34)}, {a1: $0.a1, a2: {a1: $0.a2, a2: {a1: $0.a3, a2: {h: 0}}}}, {a1: $1.a1, a2: {a1: $1.a2, a2: {a1: $1.a3, a2: {h: 0}}}});
8599
8684
  }
8600
8685
 
8601
8686
  /* Data.Date.> */
@@ -8751,8 +8836,8 @@ function Data_PullRequest_parsePullRequestsString($0) {
8751
8836
  }
8752
8837
  };
8753
8838
  const $3 = {a1: $4, a2: a => $c => ({h: 1 /* Right */, a1: $c}), a3: $e};
8754
- const $2 = {a1: $3, a2: csegen_198(), a3: csegen_199()};
8755
- return Prelude_Interfaces_x3ex3dx3e($2, csegen_200(), csegen_413(), $0);
8839
+ const $2 = {a1: $3, a2: csegen_203(), a3: csegen_204()};
8840
+ return Prelude_Interfaces_x3ex3dx3e($2, csegen_205(), csegen_416(), $0);
8756
8841
  }
8757
8842
 
8758
8843
  /* Data.PullRequest.parsePullRequestString : String -> Either String PullRequest */
@@ -8775,13 +8860,13 @@ function Data_PullRequest_parsePullRequestString($0) {
8775
8860
  }
8776
8861
  };
8777
8862
  const $3 = {a1: $4, a2: a => $c => ({h: 1 /* Right */, a1: $c}), a3: $e};
8778
- const $2 = {a1: $3, a2: csegen_198(), a3: csegen_199()};
8779
- return Prelude_Interfaces_x3ex3dx3e($2, csegen_200(), $1f => Data_PullRequest_parsePR($1f), $0);
8863
+ const $2 = {a1: $3, a2: csegen_203(), a3: csegen_204()};
8864
+ return Prelude_Interfaces_x3ex3dx3e($2, csegen_205(), $1f => Data_PullRequest_parsePR($1f), $0);
8780
8865
  }
8781
8866
 
8782
8867
  /* Data.PullRequest.parsePR : JSON -> Either String PullRequest */
8783
8868
  function Data_PullRequest_parsePR($0) {
8784
- 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_400(), $40 => Data_PullRequest_parseState(merged, $40), Language_JSON_Accessors_string($1c.a2.a2.a1)), state => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Prelude_Basics_flip(csegen_400(), $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}})))))))))));
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}})))))))))));
8785
8870
  }
8786
8871
 
8787
8872
  /* Data.PullRequest.parseDateTime : String -> Either String Date */
@@ -8791,7 +8876,7 @@ function Data_PullRequest_parseDateTime($0) {
8791
8876
 
8792
8877
  /* Data.PullRequest.isRequestedReviewer : String -> PullRequest -> Bool */
8793
8878
  function Data_PullRequest_isRequestedReviewer($0, $1) {
8794
- return Prelude_Types_foldMap_Foldable_List(csegen_94(), $6 => Prelude_EqOrd_x3dx3d_Eq_String($6, $0), $1.a6);
8879
+ return Prelude_Types_foldMap_Foldable_List(csegen_95(), $6 => Prelude_EqOrd_x3dx3d_Eq_String($6, $0), $1.a6);
8795
8880
  }
8796
8881
 
8797
8882
  /* Data.PullRequest.isAuthor : String -> PullRequest -> Bool */
@@ -8800,7 +8885,7 @@ function Data_PullRequest_isAuthor($0, $1) {
8800
8885
  }
8801
8886
 
8802
8887
  /* Config.with block in getConfig */
8803
- function Config_with__getConfig_2108($0, $1, $2, $3) {
8888
+ function Config_with__getConfig_2267($0, $1, $2, $3) {
8804
8889
  return $4 => {
8805
8890
  switch($1.h) {
8806
8891
  case 0: /* nothing */ return Data_Promise_reject(Prelude_Types_foldMap_Foldable_List(csegen_49(), $c => $c, {a1: $0, a2: {a1: ' cannot get read via `config` command.', a2: {h: 0}}}), $3, $4);
@@ -8810,20 +8895,20 @@ function Config_with__getConfig_2108($0, $1, $2, $3) {
8810
8895
  }
8811
8896
 
8812
8897
  /* Config.with block in with block in setConfig */
8813
- function Config_with__withx20blockx20inx20setConfig_1978($0, $1, $2, $3, $4, $5, $6) {
8898
+ function Config_with__withx20blockx20inx20setConfig_2104($0, $1, $2, $3, $4, $5, $6) {
8814
8899
  return $7 => {
8815
8900
  switch($5.h) {
8816
8901
  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);
8817
- case undefined: /* just */ return Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Types_either(() => $1f => Util_renderIO($5.a1, csegen_72(), $1f), () => csegen_421(), Config_checkConfigConsistency($5.a1)), $2b => $2c => $2d => Config_writeConfig($5.a1, $2c, $2d), $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);
8818
8903
  }
8819
8904
  };
8820
8905
  }
8821
8906
 
8822
8907
  /* Config.with block in setConfig */
8823
- function Config_with__setConfig_1948($0, $1, $2, $3) {
8908
+ function Config_with__setConfig_2074($0, $1, $2, $3) {
8824
8909
  switch($1.h) {
8825
8910
  case 0: /* nothing */ return $5 => $6 => Data_Promise_reject(Prelude_Types_foldMap_Foldable_List(csegen_49(), $d => $d, {a1: $0, a2: {a1: ' cannot be set via `config` command.', a2: {h: 0}}}), $5, $6);
8826
- case undefined: /* just */ return $15 => Config_with__withx20blockx20inx20setConfig_1978(undefined, $0, $1.a1, $3, $2, Config_propSetter($1.a1, $3)($2), $15);
8911
+ case undefined: /* just */ return $15 => Config_with__withx20blockx20inx20setConfig_2104(undefined, $0, $1.a1, $3, $2, Config_propSetter($1.a1, $3)($2), $15);
8827
8912
  }
8828
8913
  }
8829
8914
 
@@ -8864,36 +8949,36 @@ function Config_case__parseGitHubURIx2cparseSuffix_1509($0, $1, $2) {
8864
8949
  default: return {h: 0};
8865
8950
  }
8866
8951
  };
8867
- return Prelude_Types_x3ex3ex3d_Monad_Maybe({a1: Data_String_split(csegen_422(), $2.a1)}, $b);
8952
+ return Prelude_Types_x3ex3ex3d_Monad_Maybe({a1: Data_String_split(csegen_425(), $2.a1)}, $b);
8868
8953
  }
8869
8954
 
8870
- /* Config.8973:2259:repo */
8871
- function Config_n__8973_2259_repo($0, $1, $2, $3, $4) {
8872
- return Prelude_Types_map_Functor_Maybe(csegen_423(), $4);
8955
+ /* Config.9228:2418:repo */
8956
+ function Config_n__9228_2418_repo($0, $1, $2, $3, $4) {
8957
+ return Prelude_Types_map_Functor_Maybe(csegen_426(), $4);
8873
8958
  }
8874
8959
 
8875
- /* Config.8227:1489:parseSuffix */
8876
- function Config_n__8227_1489_parseSuffix($0, $1) {
8960
+ /* Config.8332:1489:parseSuffix */
8961
+ function Config_n__8332_1489_parseSuffix($0, $1) {
8877
8962
  return Config_case__parseGitHubURIx2cparseSuffix_1509($0, $1, Data_String_break$($8 => Prelude_EqOrd_x3dx3d_Eq_Char($8, '.'), $1));
8878
8963
  }
8879
8964
 
8880
- /* Config.8227:1488:parseSSH */
8881
- function Config_n__8227_1488_parseSSH($0, $1) {
8882
- return Prelude_Interfaces_x3ex3dx3e(csegen_14(), $6 => Config_dropPrefixx27('git@github.com:', $6), $b => Config_n__8227_1489_parseSuffix($0, $b), $1);
8965
+ /* Config.8332:1488:parseSSH */
8966
+ function Config_n__8332_1488_parseSSH($0, $1) {
8967
+ return Prelude_Interfaces_x3ex3dx3e(csegen_14(), $6 => Config_dropPrefixx27('git@github.com:', $6), $b => Config_n__8332_1489_parseSuffix($0, $b), $1);
8883
8968
  }
8884
8969
 
8885
- /* Config.8227:1487:parseHTTPS */
8886
- function Config_n__8227_1487_parseHTTPS($0, $1) {
8887
- return Prelude_Interfaces_x3ex3dx3e(csegen_14(), $6 => Config_dropPrefixx27('https://github/com/', $6), $b => Config_n__8227_1489_parseSuffix($0, $b), $1);
8970
+ /* Config.8332:1487:parseHTTPS */
8971
+ function Config_n__8332_1487_parseHTTPS($0, $1) {
8972
+ return Prelude_Interfaces_x3ex3dx3e(csegen_14(), $6 => Config_dropPrefixx27('https://github/com/', $6), $b => Config_n__8332_1489_parseSuffix($0, $b), $1);
8888
8973
  }
8889
8974
 
8890
- /* Config.8973:2258:org */
8891
- function Config_n__8973_2258_org($0, $1, $2, $3, $4) {
8892
- return Prelude_Types_map_Functor_Maybe(csegen_427(), $4);
8975
+ /* Config.9228:2417:org */
8976
+ function Config_n__9228_2417_org($0, $1, $2, $3, $4) {
8977
+ return Prelude_Types_map_Functor_Maybe(csegen_430(), $4);
8893
8978
  }
8894
8979
 
8895
- /* Config.8973:2257:orIfEmpty */
8896
- function Config_n__8973_2257_orIfEmpty($0, $1, $2, $3, $4, $5) {
8980
+ /* Config.9228:2416:orIfEmpty */
8981
+ function Config_n__9228_2416_orIfEmpty($0, $1, $2, $3, $4, $5) {
8897
8982
  switch($4.h) {
8898
8983
  case 0: /* nothing */ return $5;
8899
8984
  case undefined: /* just */ {
@@ -8905,33 +8990,33 @@ function Config_n__8973_2257_orIfEmpty($0, $1, $2, $3, $4, $5) {
8905
8990
  }
8906
8991
  }
8907
8992
 
8908
- /* Config.7943:1213:oneDayAgo */
8909
- function Config_n__7943_1213_oneDayAgo($0, $1, $2) {
8993
+ /* Config.8048:1213:oneDayAgo */
8994
+ function Config_n__8048_1213_oneDayAgo($0, $1, $2) {
8910
8995
  return $2.a1.a2(undefined)(undefined)(System_time($2))(now => $2.a1.a1.a2(undefined)(Number(_truncUBigInt32((now-86400n)))));
8911
8996
  }
8912
8997
 
8913
- /* Config.8876:2148:help */
8914
- function Config_n__8876_2148_help($0, $1) {
8998
+ /* Config.9131:2307:help */
8999
+ function Config_n__9131_2307_help($0, $1) {
8915
9000
  return Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29(Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_color(2), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String($1.a1)), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(Prelude_Types_foldMap_Foldable_List(csegen_49(), $13 => $13, {a1: ': ', a2: {a1: (Data_String_replicate(Prelude_Types_prim__integerToNat((Data_Config_longestSettablePropName()-Prelude_Types_String_length($1.a1))), ' ')+$1.a2), a2: {h: 0}}})));
8916
9001
  }
8917
9002
 
8918
- /* Config.8973:2256:enterForDefaultStr */
8919
- function Config_n__8973_2256_enterForDefaultStr($0, $1, $2, $3, $4) {
9003
+ /* Config.9228:2415:enterForDefaultStr */
9004
+ function Config_n__9228_2415_enterForDefaultStr($0, $1, $2, $3, $4) {
8920
9005
  return Prelude_Types_foldMap_Foldable_List(csegen_49(), $9 => $9, {a1: ' (ENTER for default: ', a2: {a1: $4, a2: {a1: ')', a2: {h: 0}}}});
8921
9006
  }
8922
9007
 
8923
- /* Config.8180:1440:drop' */
8924
- function Config_n__8180_1440_dropx27($0, $1) {
9008
+ /* Config.8285:1440:drop' */
9009
+ function Config_n__8285_1440_dropx27($0, $1) {
8925
9010
  return Config_with__dropPrefixx27x2cdropx27_1448($0, $1, Data_List_PrefixSuffix_dropPrefix($8 => $9 => Decidable_Equality_decEq_DecEq_Char($8, $9), Prelude_Types_fastUnpack($0), $1));
8926
9011
  }
8927
9012
 
8928
- /* Config.8973:2255:defaultStr */
8929
- function Config_n__8973_2255_defaultStr($0, $1, $2, $3, $4, $5) {
8930
- return Data_Maybe_fromMaybe(() => '', Prelude_Types_map_Functor_Maybe($b => Config_n__8973_2256_enterForDefaultStr($0, $1, $2, $3, $4($b)), $5));
9013
+ /* Config.9228:2414:defaultStr */
9014
+ function Config_n__9228_2414_defaultStr($0, $1, $2, $3, $4, $5) {
9015
+ return Data_Maybe_fromMaybe(() => '', Prelude_Types_map_Functor_Maybe($b => Config_n__9228_2415_enterForDefaultStr($0, $1, $2, $3, $4($b)), $5));
8931
9016
  }
8932
9017
 
8933
- /* Config.8069:1333:checkAssignSettings */
8934
- function Config_n__8069_1333_checkAssignSettings($0, $1) {
9018
+ /* Config.8174:1333:checkRequestSettings */
9019
+ function Config_n__8174_1333_checkRequestSettings($0, $1) {
8935
9020
  let $2;
8936
9021
  switch($1.a6) {
8937
9022
  case 1: {
@@ -8945,7 +9030,7 @@ function Config_n__8069_1333_checkAssignSettings($0, $1) {
8945
9030
  }
8946
9031
  switch($2) {
8947
9032
  case 1: return {h: 1 /* Right */, a1: undefined};
8948
- case 0: return {h: 0 /* Left */, a1: Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29(Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_color(3), Text_PrettyPrint_Prettyprinter_Doc_hsep({a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('`assignUsers` and `assignTeams` are both False.'), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('This means `harmony assign` commands will only ever assign users that are specified with the `+<userlogin>` syntax.'), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('More commonly, you want Harmony to at least assign either a team or a user from a team when you say `harmony assign teamname`;'), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('It\'s suggested to either `harmony config assignUsers true` or `harmony config assignTeams true` (or both).'), a2: {h: 0}}}}})), Text_PrettyPrint_Prettyprinter_Doc_hardline())};
9033
+ case 0: return {h: 0 /* Left */, a1: Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29(Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_color(3), Text_PrettyPrint_Prettyprinter_Doc_hsep({a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('`requestUsers` and `requestTeams` are both False.'), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('This means `harmony request` commands will only ever request reviews from users that are specified with the `+<userlogin>` syntax.'), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('More commonly, you want Harmony to at least request review for either a team or a user from a team when you say `harmony request teamname`;'), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('It\'s suggested to either `harmony config requestUsers true` or `harmony config requestTeams true` (or both).'), a2: {h: 0}}}}})), Text_PrettyPrint_Prettyprinter_Doc_hardline())};
8949
9034
  }
8950
9035
  }
8951
9036
 
@@ -8981,7 +9066,7 @@ function Config_syncIfOld($0, $1, $2, $3) {
8981
9066
  case 0: return $1a => Data_Promise_pure_Applicative_Promise($1, $d, $1a);
8982
9067
  }
8983
9068
  };
8984
- return Data_Promise_x3ex3ex3d_Monad_Promise(Config_n__7943_1213_oneDayAgo($0, $1, csegen_72()), $b, $2, $3);
9069
+ return Data_Promise_x3ex3ex3d_Monad_Promise(Config_n__8048_1213_oneDayAgo($0, $1, csegen_72()), $b, $2, $3);
8985
9070
  }
8986
9071
 
8987
9072
  /* Config.syncConfig : Config => Octokit => Bool -> Promise Config */
@@ -8993,7 +9078,7 @@ function Config_syncConfig($0, $1, $2, $3, $4) {
8993
9078
  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};
8994
9079
  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);
8995
9080
  };
8996
- return Data_Promise_x3ex3ex3d_Monad_Promise(csegen_438(), $31, $2c, $2d);
9081
+ return Data_Promise_x3ex3ex3d_Monad_Promise(csegen_441(), $31, $2c, $2d);
8997
9082
  };
8998
9083
  return Data_Promise_x3ex3ex3d_Monad_Promise($23 => $24 => FFI_GitHub_listOrgMembers($1, $0.a2, $23, $24), $2b, $1f, $20);
8999
9084
  };
@@ -9004,23 +9089,26 @@ function Config_syncConfig($0, $1, $2, $3, $4) {
9004
9089
 
9005
9090
  /* Config.settablePropsWithHelp : Config => String */
9006
9091
  function Config_settablePropsWithHelp($0) {
9007
- return Util_renderString($0, Text_PrettyPrint_Prettyprinter_Doc_vsep(Prelude_Types_List_mapAppend({h: 0}, $9 => Config_n__8876_2148_help($0, $9), Data_Config_settablePropNamesAndHelp())));
9092
+ return Util_renderString($0, Text_PrettyPrint_Prettyprinter_Doc_vsep(Prelude_Types_List_mapAppend({h: 0}, $9 => Config_n__9131_2307_help($0, $9), Data_Config_settablePropNamesAndHelp())));
9008
9093
  }
9009
9094
 
9010
9095
  /* Config.setConfig : Config => String -> String -> Promise Config */
9011
9096
  function Config_setConfig($0, $1, $2) {
9012
- return Config_with__setConfig_1948($1, Data_Config_settablePropNamed($1), $2, $0);
9097
+ return Config_with__setConfig_2074($1, Data_Config_settablePropNamed($1), $2, $0);
9013
9098
  }
9014
9099
 
9015
9100
  /* Config.propSetter : SettableProp n h -> Config -> String -> Maybe Config */
9016
9101
  function Config_propSetter($0, $1) {
9017
9102
  return $2 => {
9018
9103
  switch($0) {
9019
- case 0: return Config_update(csegen_443(), $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);
9020
- case 1: return Config_update(csegen_443(), $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);
9021
- case 2: return Config_update(csegen_443(), $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);
9022
- case 3: return Config_update(csegen_443(), $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);
9023
- case 4: return Config_update(csegen_443(), $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);
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);
9024
9112
  }
9025
9113
  };
9026
9114
  }
@@ -9033,6 +9121,9 @@ function Config_propGetter($0, $1) {
9033
9121
  case 2: return Prelude_Show_show_Show_Bool($1.a8);
9034
9122
  case 3: return Prelude_Show_show_Show_String($1.a4);
9035
9123
  case 4: return Prelude_Types_maybe(() => 'Not set (will use $GITHUB_PAT environment variable)', () => $12 => Data_Config_show_Show_x28Hiddenx20x24ax29($12), $1.a13);
9124
+ case 5: return Prelude_Show_show_Show_Bool($1.a6);
9125
+ case 6: return Prelude_Show_show_Show_Bool($1.a7);
9126
+ case 7: return Prelude_Show_show_Show_Bool($1.a8);
9036
9127
  }
9037
9128
  }
9038
9129
 
@@ -9047,7 +9138,7 @@ function Config_preferOriginRemote($0) {
9047
9138
 
9048
9139
  /* Config.parseGitHubURI : String -> Maybe GitRemote */
9049
9140
  function Config_parseGitHubURI($0) {
9050
- return Prelude_Types_x3cx7cx3e_Alternative_Maybe(Config_n__8227_1487_parseHTTPS($0, $0), () => Config_n__8227_1488_parseSSH($0, $0));
9141
+ return Prelude_Types_x3cx7cx3e_Alternative_Maybe(Config_n__8332_1487_parseHTTPS($0, $0), () => Config_n__8332_1488_parseSSH($0, $0));
9051
9142
  }
9052
9143
 
9053
9144
  /* Config.parseBool : String -> Maybe Bool */
@@ -9101,14 +9192,14 @@ function Config_loadConfig($0, $1, $2) {
9101
9192
  }
9102
9193
  };
9103
9194
  const $a = {a1: $b, a2: a => $13 => ({h: 1 /* Right */, a1: $13}), a3: $15};
9104
- const $9 = {a1: $a, a2: csegen_198(), a3: csegen_199()};
9195
+ const $9 = {a1: $a, a2: csegen_203(), a3: csegen_204()};
9105
9196
  const $24 = b => a => func => $25 => {
9106
9197
  switch($25.h) {
9107
9198
  case 0: /* Left */ return {h: 0 /* Left */, a1: $25.a1};
9108
9199
  case 1: /* Right */ return {h: 1 /* Right */, a1: func($25.a1)};
9109
9200
  }
9110
9201
  };
9111
- const $23 = {a1: $24, a2: csegen_256(), a3: csegen_260()};
9202
+ const $23 = {a1: $24, a2: csegen_261(), a3: csegen_265()};
9112
9203
  return Prelude_Interfaces_Monad_x3ex3ex3d_Monad_Composex28x28x2ex20x24mx29x20x24tx29($0.a1, $9, $23, $4, $5);
9113
9204
  };
9114
9205
  const $3d = $3e => {
@@ -9153,7 +9244,7 @@ function Config_loadConfig($0, $1, $2) {
9153
9244
 
9154
9245
  /* Config.getConfig : Config => String -> Promise String */
9155
9246
  function Config_getConfig($0, $1) {
9156
- return $2 => Config_with__getConfig_2108($1, Data_Config_settablePropNamed($1), $0, $2);
9247
+ return $2 => Config_with__getConfig_2267($1, Data_Config_settablePropNamed($1), $0, $2);
9157
9248
  }
9158
9249
 
9159
9250
  /* Config.findConfig : HasIO io => String -> Fuel -> io (Maybe String) */
@@ -9175,14 +9266,14 @@ function Config_findConfig($0, $1, $2) {
9175
9266
 
9176
9267
  /* Config.dropPrefix' : String -> String -> Maybe String */
9177
9268
  function Config_dropPrefixx27($0, $1) {
9178
- return Prelude_Types_map_Functor_Maybe($4 => Prelude_Types_fastPack($4), Config_n__8180_1440_dropx27($0, Prelude_Types_fastUnpack($1)));
9269
+ return Prelude_Types_map_Functor_Maybe($4 => Prelude_Types_fastPack($4), Config_n__8285_1440_dropx27($0, Prelude_Types_fastUnpack($1)));
9179
9270
  }
9180
9271
 
9181
9272
  /* Config.createConfig : Git => Maybe String -> Bool -> Maybe String -> Promise Config */
9182
9273
  function Config_createConfig($0, $1, $2, $3, $4, $5) {
9183
9274
  const $23 = $24 => $25 => $26 => {
9184
9275
  const $35 = $36 => {
9185
- const $38 = Config_n__8973_2256_enterForDefaultStr($0, $3, $2, $1, 'unset');
9276
+ const $38 = Config_n__9228_2415_enterForDefaultStr($0, $3, $2, $1, 'unset');
9186
9277
  const $37 = () => $3f => $40 => {
9187
9278
  const $69 = $6a => $6b => $6c => {
9188
9279
  const $6e = $6f => $70 => {
@@ -9192,7 +9283,7 @@ function Config_createConfig($0, $1, $2, $3, $4, $5) {
9192
9283
  default: return {a1: Data_String_trim($73)};
9193
9284
  }
9194
9285
  };
9195
- return Data_Promise_map_Functor_Promise($72, csegen_456(), $6f, $70);
9286
+ return Data_Promise_map_Functor_Promise($72, csegen_459(), $6f, $70);
9196
9287
  };
9197
9288
  const $7e = configPAT => $7f => $80 => {
9198
9289
  const $8c = $8d => $8e => $8f => {
@@ -9200,21 +9291,21 @@ function Config_createConfig($0, $1, $2, $3, $4, $5) {
9200
9291
  case undefined: /* just */ {
9201
9292
  const $a3 = remoteGuess => $a4 => $a5 => {
9202
9293
  const $c1 = defaultOrgAndRepo => {
9203
- const $c2 = Config_n__8973_2255_defaultStr($0, $3, $2, $1, csegen_427(), defaultOrgAndRepo);
9294
+ const $c2 = Config_n__9228_2414_defaultStr($0, $3, $2, $1, csegen_430(), defaultOrgAndRepo);
9204
9295
  return $cb => $cc => {
9205
9296
  const $e9 = $ea => $eb => $ec => {
9206
9297
  const $107 = org => {
9207
- const $108 = Config_n__8973_2255_defaultStr($0, $3, $2, $1, csegen_423(), defaultOrgAndRepo);
9298
+ const $108 = Config_n__9228_2414_defaultStr($0, $3, $2, $1, csegen_426(), defaultOrgAndRepo);
9208
9299
  return $111 => $112 => {
9209
9300
  const $12f = $130 => $131 => $132 => {
9210
9301
  const $14d = repo => {
9211
- const $14e = Config_n__8973_2256_enterForDefaultStr($0, $3, $2, $1, remoteGuess);
9302
+ const $14e = Config_n__9228_2415_enterForDefaultStr($0, $3, $2, $1, remoteGuess);
9212
9303
  return $155 => $156 => {
9213
9304
  const $173 = $174 => $175 => $176 => {
9214
9305
  const $18c = defaultRemote => $18d => $18e => {
9215
- const $195 = commentOnAssign => $196 => $197 => {
9216
- const $19e = assignTeams => $19f => $1a0 => {
9217
- const $1a7 = assignUsers => $1a8 => $1a9 => {
9306
+ const $195 = commentOnRequest => $196 => $197 => {
9307
+ const $19e = requestTeams => $19f => $1a0 => {
9308
+ const $1a7 = requestUsers => $1a8 => $1a9 => {
9218
9309
  const $1b8 = _ => $1b9 => $1ba => {
9219
9310
  const $1c9 = $1ca => $1cb => $1cc => {
9220
9311
  const $1d7 = mainBranch => $1d8 => $1d9 => {
@@ -9224,8 +9315,8 @@ function Config_createConfig($0, $1, $2, $3, $4, $5) {
9224
9315
  const $1f8 = teamSlugs => $1f9 => $1fa => {
9225
9316
  const $205 = repoLabels => $206 => $207 => {
9226
9317
  const $211 = orgMembers => {
9227
- const $212 = {a1: updatedAt, a2: org, a3: repo, a4: defaultRemote, a5: mainBranch, a6: assignTeams, a7: assignUsers, a8: commentOnAssign, a9: teamSlugs, a10: repoLabels, a11: orgMembers, a12: {h: 0}, a13: Prelude_Types_map_Functor_Maybe($222 => $222, configPAT), a14: $1de};
9228
- 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_421(), Config_checkConfigConsistency($212)), $273 => $274 => $275 => Data_Promise_pure_Applicative_Promise($212, $274, $275), $261, $262), $24b, $24c), $239, $23a), $225, $226);
9318
+ 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);
9229
9320
  };
9230
9321
  return Data_Promise_x3ex3ex3d_Monad_Promise($20a => $20b => FFI_GitHub_listOrgMembers(_, org, $20a, $20b), $211, $206, $207);
9231
9322
  };
@@ -9234,7 +9325,7 @@ function Config_createConfig($0, $1, $2, $3, $4, $5) {
9234
9325
  return Data_Promise_x3ex3ex3d_Monad_Promise($1f1 => $1f2 => FFI_GitHub_listTeams(_, org, $1f1, $1f2), $1f8, $1ed, $1ee);
9235
9326
  };
9236
9327
  };
9237
- return Data_Promise_x3ex3ex3d_Monad_Promise(csegen_438(), $1dd, $1d8, $1d9);
9328
+ return Data_Promise_x3ex3ex3d_Monad_Promise(csegen_441(), $1dd, $1d8, $1d9);
9238
9329
  };
9239
9330
  return Data_Promise_x3ex3ex3d_Monad_Promise($1cf => $1d0 => FFI_GitHub_getRepoDefaultBranch(_, org, repo, $1cf, $1d0), $1d7, $1cb, $1cc);
9240
9331
  };
@@ -9242,28 +9333,28 @@ function Config_createConfig($0, $1, $2, $3, $4, $5) {
9242
9333
  };
9243
9334
  return Data_Promise_x3ex3ex3d_Monad_Promise($1ac => $1ad => $1ae => Data_Promise_liftIO_HasIO_Promise($1b1 => FFI_GitHub_octokit($8d.a1, $1b1), $1ac, $1ad, $1ae), $1b8, $1a8, $1a9);
9244
9335
  };
9245
- return Data_Promise_x3ex3ex3d_Monad_Promise(Util_yesNoPrompt(csegen_72(), 'Would you like harmony to assign individual users when it assigns reviewers?'), $1a7, $19f, $1a0);
9336
+ return Data_Promise_x3ex3ex3d_Monad_Promise(Util_yesNoPrompt(csegen_72(), 'Would you like harmony to request reviews from individual users when it requests a teams review?'), $1a7, $19f, $1a0);
9246
9337
  };
9247
- return Data_Promise_x3ex3ex3d_Monad_Promise(Util_yesNoPrompt(csegen_72(), 'Would you like harmony to assign teams when it assigns reviewers?'), $19e, $196, $197);
9338
+ return Data_Promise_x3ex3ex3d_Monad_Promise(Util_yesNoPrompt(csegen_72(), 'Would you like harmony to request reviews from teams when it requests reviewers?'), $19e, $196, $197);
9248
9339
  };
9249
- return Data_Promise_x3ex3ex3d_Monad_Promise(Util_yesNoPrompt(csegen_72(), 'Would you like harmony to comment when it assigns reviewers?'), $195, $18d, $18e);
9340
+ return Data_Promise_x3ex3ex3d_Monad_Promise(Util_yesNoPrompt(csegen_72(), 'Would you like harmony to comment when it requests reviewers?'), $195, $18d, $18e);
9250
9341
  };
9251
- return Data_Promise_x3ex3ex3d_Monad_Promise($179 => $17a => Data_Promise_map_Functor_Promise($17d => Config_n__8973_2257_orIfEmpty($0, $3, $2, $1, {a1: remoteGuess}, Data_String_trim($17d)), csegen_456(), $179, $17a), $18c, $175, $176);
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);
9252
9343
  };
9253
9344
  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);
9254
9345
  };
9255
9346
  };
9256
- return Data_Promise_x3ex3ex3d_Monad_Promise($135 => $136 => Data_Promise_map_Functor_Promise($139 => Config_n__8973_2257_orIfEmpty($0, $3, $2, $1, Config_n__8973_2259_repo($0, $3, $2, $1, defaultOrgAndRepo), Data_String_trim($139)), csegen_456(), $135, $136), $14d, $131, $132);
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);
9257
9348
  };
9258
9349
  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);
9259
9350
  };
9260
9351
  };
9261
- return Data_Promise_x3ex3ex3d_Monad_Promise($ef => $f0 => Data_Promise_map_Functor_Promise($f3 => Config_n__8973_2257_orIfEmpty($0, $3, $2, $1, Config_n__8973_2258_org($0, $3, $2, $1, defaultOrgAndRepo), Data_String_trim($f3)), csegen_456(), $ef, $f0), $107, $eb, $ec);
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);
9262
9353
  };
9263
9354
  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);
9264
9355
  };
9265
9356
  };
9266
- 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_458(), $a8, $a9), $c1, $a4, $a5);
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);
9267
9358
  };
9268
9359
  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);
9269
9360
  }
@@ -9285,12 +9376,12 @@ function Config_createConfig($0, $1, $2, $3, $4, $5) {
9285
9376
 
9286
9377
  /* Config.checkConfigConsistency : Config -> Either (Doc AnsiStyle) () */
9287
9378
  function Config_checkConfigConsistency($0) {
9288
- return Config_n__8069_1333_checkAssignSettings($0, $0);
9379
+ return Config_n__8174_1333_checkRequestSettings($0, $0);
9289
9380
  }
9290
9381
 
9291
9382
  /* Config.addIgnoredPRs : Config -> List Integer -> Promise Config */
9292
9383
  function Config_addIgnoredPRs($0, $1, $2, $3) {
9293
- return Config_writeConfig({a1: $0.a1, a2: $0.a2, a3: $0.a3, a4: $0.a4, a5: $0.a5, a6: $0.a6, a7: $0.a7, a8: $0.a8, a9: $0.a9, a10: $0.a10, a11: $0.a11, a12: Data_List_nub(csegen_215(), Prelude_Types_List_tailRecAppend($0.a12, $1)), a13: $0.a13, a14: $0.a14}, $2, $3);
9384
+ return Config_writeConfig({a1: $0.a1, a2: $0.a2, a3: $0.a3, a4: $0.a4, a5: $0.a5, a6: $0.a6, a7: $0.a7, a8: $0.a8, a9: $0.a9, a10: $0.a10, a11: $0.a11, a12: Data_List_nub(csegen_220(), Prelude_Types_List_tailRecAppend($0.a12, $1)), a13: $0.a13, a14: $0.a14}, $2, $3);
9294
9385
  }
9295
9386
 
9296
9387
  /* Data.List.PrefixSuffix.with block in with block in dropPrefix */
@@ -9369,7 +9460,7 @@ function Commands_case__casex20blockx20inx20graph_2168($0, $1, $2, $3, $4, $5, $
9369
9460
  case 0: return Data_Promise_pure_Applicative_Promise({h: 0}, $d, $e);
9370
9461
  }
9371
9462
  };
9372
- return Data_Promise_x3ex3ex3d_Monad_Promise($c, completedReviews => Util_renderIO($2, csegen_72(), Graph_reviewsGraph(csegen_212(), {a1: ann => $2f => Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String($2f), a2: ann => $33 => $34 => Text_PrettyPrint_Prettyprinter_Doc_prettyPrec_Pretty_String($33, $34)}, $7.a2, $7.a1, $5, completedReviews)), $8, $9);
9463
+ return Data_Promise_x3ex3ex3d_Monad_Promise($c, completedReviews => Util_renderIO($2, csegen_72(), Graph_reviewsGraph(csegen_217(), {a1: ann => $2f => Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String($2f), a2: ann => $33 => $34 => Text_PrettyPrint_Prettyprinter_Doc_prettyPrec_Pretty_String($33, $34)}, $7.a2, $7.a1, $5, completedReviews)), $8, $9);
9373
9464
  };
9374
9465
  }
9375
9466
 
@@ -9383,8 +9474,8 @@ function Commands_case__graph_2126($0, $1, $2, $3, $4, $5) {
9383
9474
  };
9384
9475
  }
9385
9476
 
9386
- /* Commands.case block in assign */
9387
- function Commands_case__assign_1766($0, $1, $2, $3, $4, $5) {
9477
+ /* Commands.case block in request */
9478
+ function Commands_case__request_1766($0, $1, $2, $3, $4, $5) {
9388
9479
  return $7 => $9 => {
9389
9480
  let $a;
9390
9481
  switch(Prelude_Types_null_Foldable_List($5.a1)) {
@@ -9398,7 +9489,7 @@ function Commands_case__assign_1766($0, $1, $2, $3, $4, $5) {
9398
9489
  }
9399
9490
  }
9400
9491
  switch($a) {
9401
- case 1: return Data_Promise_reject('The assign command expects one or more names of GitHub Teams or Users as arguments.', $7, $9);
9492
+ case 1: return Data_Promise_reject('The request command expects one or more names of GitHub Teams or Users as arguments.', $7, $9);
9402
9493
  case 0: {
9403
9494
  const $2e = $2f => $30 => $31 => {
9404
9495
  const $40 = $41 => {
@@ -9434,19 +9525,19 @@ function Commands_case__assign_1766($0, $1, $2, $3, $4, $5) {
9434
9525
  };
9435
9526
  }
9436
9527
 
9437
- /* Commands.case block in case block in assign,partitionedArgs */
9438
- function Commands_case__casex20blockx20inx20assignx2cpartitionedArgs_1686($0, $1, $2, $3, $4, $5, $6, $7) {
9528
+ /* Commands.case block in case block in request,partitionedArgs */
9529
+ function Commands_case__casex20blockx20inx20requestx2cpartitionedArgs_1686($0, $1, $2, $3, $4, $5, $6, $7) {
9439
9530
  const $9 = Prelude_Interfaces_mapHom({a1: d => b => c => a => $d => $e => $f => ({a1: $d($f.a1), a2: $e($f.a2)}), a2: b => c => a => $18 => $19 => ({a1: $18($19.a1), a2: $19.a2}), a3: a => d => b => $20 => $21 => ({a1: $21.a1, a2: $20($21.a2)})}, $28 => Prelude_Types_List_mapAppend({h: 0}, $2c => Data_String_Extra_drop(1n, $2c), $28), {a1: $5, a2: $7.a1});
9440
9531
  return {a1: $9.a1, a2: {a1: $7.a2, a2: $9.a2}};
9441
9532
  }
9442
9533
 
9443
- /* Commands.case block in assign,partitionedArgs */
9444
- function Commands_case__assignx2cpartitionedArgs_1663($0, $1, $2, $3, $4, $5) {
9445
- return Commands_case__casex20blockx20inx20assignx2cpartitionedArgs_1686($0, $1, $2, $3, $4, $5.a1, $5.a2, Data_List_partition($12 => BashCompletion_isHashPrefix($12), $5.a2));
9534
+ /* Commands.case block in request,partitionedArgs */
9535
+ function Commands_case__requestx2cpartitionedArgs_1663($0, $1, $2, $3, $4, $5) {
9536
+ return Commands_case__casex20blockx20inx20requestx2cpartitionedArgs_1686($0, $1, $2, $3, $4, $5.a1, $5.a2, Data_List_partition($12 => BashCompletion_isHashPrefix($12), $5.a2));
9446
9537
  }
9447
9538
 
9448
- /* Commands.9677:2511:recombineIgnoreArgs */
9449
- function Commands_n__9677_2511_recombineIgnoreArgs($0, $1) {
9539
+ /* Commands.9789:2511:recombineIgnoreArgs */
9540
+ function Commands_n__9789_2511_recombineIgnoreArgs($0, $1) {
9450
9541
  switch($1.h) {
9451
9542
  case 0: /* nil */ return {a1: {h: 0}, a2: {h: 0}};
9452
9543
  case undefined: /* cons */ {
@@ -9455,20 +9546,20 @@ function Commands_n__9677_2511_recombineIgnoreArgs($0, $1) {
9455
9546
  switch($1.a2.h) {
9456
9547
  case 0: /* nil */ return {a1: {h: 0}, a2: {a1: '-i', a2: {h: 0}}};
9457
9548
  case undefined: /* cons */ {
9458
- const $b = Commands_n__9677_2509_parseIgnoreOpt($0, $1.a2.a1);
9549
+ const $b = Commands_n__9789_2509_parseIgnoreOpt($0, $1.a2.a1);
9459
9550
  switch($b.h) {
9460
9551
  case undefined: /* just */ {
9461
- const $f = Commands_n__9677_2511_recombineIgnoreArgs($0, $1.a2.a2);
9552
+ const $f = Commands_n__9789_2511_recombineIgnoreArgs($0, $1.a2.a2);
9462
9553
  return {a1: {a1: $b.a1, a2: $f.a1}, a2: $f.a2};
9463
9554
  }
9464
9555
  case 0: /* nothing */ {
9465
- const $17 = Commands_n__9677_2511_recombineIgnoreArgs($0, $1.a2.a2);
9556
+ const $17 = Commands_n__9789_2511_recombineIgnoreArgs($0, $1.a2.a2);
9466
9557
  return {a1: $17.a1, a2: {a1: '-i', a2: {a1: $1.a2.a1, a2: $17.a2}}};
9467
9558
  }
9468
9559
  }
9469
9560
  }
9470
9561
  default: {
9471
- const $21 = Commands_n__9677_2511_recombineIgnoreArgs($0, $1.a2);
9562
+ const $21 = Commands_n__9789_2511_recombineIgnoreArgs($0, $1.a2);
9472
9563
  return {a1: $21.a1, a2: {a1: $1.a1, a2: $21.a2}};
9473
9564
  }
9474
9565
  }
@@ -9477,26 +9568,26 @@ function Commands_n__9677_2511_recombineIgnoreArgs($0, $1) {
9477
9568
  switch($1.a2.h) {
9478
9569
  case 0: /* nil */ return {a1: {h: 0}, a2: {a1: '--ignore', a2: {h: 0}}};
9479
9570
  case undefined: /* cons */ {
9480
- const $2e = Commands_n__9677_2509_parseIgnoreOpt($0, $1.a2.a1);
9571
+ const $2e = Commands_n__9789_2509_parseIgnoreOpt($0, $1.a2.a1);
9481
9572
  switch($2e.h) {
9482
9573
  case undefined: /* just */ {
9483
- const $32 = Commands_n__9677_2511_recombineIgnoreArgs($0, $1.a2.a2);
9574
+ const $32 = Commands_n__9789_2511_recombineIgnoreArgs($0, $1.a2.a2);
9484
9575
  return {a1: {a1: $2e.a1, a2: $32.a1}, a2: $32.a2};
9485
9576
  }
9486
9577
  case 0: /* nothing */ {
9487
- const $3a = Commands_n__9677_2511_recombineIgnoreArgs($0, $1.a2.a2);
9578
+ const $3a = Commands_n__9789_2511_recombineIgnoreArgs($0, $1.a2.a2);
9488
9579
  return {a1: $3a.a1, a2: {a1: '--ignore', a2: {a1: $1.a2.a1, a2: $3a.a2}}};
9489
9580
  }
9490
9581
  }
9491
9582
  }
9492
9583
  default: {
9493
- const $44 = Commands_n__9677_2511_recombineIgnoreArgs($0, $1.a2);
9584
+ const $44 = Commands_n__9789_2511_recombineIgnoreArgs($0, $1.a2);
9494
9585
  return {a1: $44.a1, a2: {a1: $1.a1, a2: $44.a2}};
9495
9586
  }
9496
9587
  }
9497
9588
  }
9498
9589
  default: {
9499
- const $4c = Commands_n__9677_2511_recombineIgnoreArgs($0, $1.a2);
9590
+ const $4c = Commands_n__9789_2511_recombineIgnoreArgs($0, $1.a2);
9500
9591
  return {a1: $4c.a1, a2: {a1: $1.a1, a2: $4c.a2}};
9501
9592
  }
9502
9593
  }
@@ -9504,33 +9595,33 @@ function Commands_n__9677_2511_recombineIgnoreArgs($0, $1) {
9504
9595
  }
9505
9596
  }
9506
9597
 
9507
- /* Commands.9068:1922:putNameLn */
9508
- function Commands_n__9068_1922_putNameLn($0, $1, $2, $3) {
9598
+ /* Commands.9180:1922:putNameLn */
9599
+ function Commands_n__9180_1922_putNameLn($0, $1, $2, $3) {
9509
9600
  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}}}});
9510
9601
  }
9511
9602
 
9512
- /* Commands.8389:1299:putLabels */
9513
- function Commands_n__8389_1299_putLabels($0, $1, $2, $3, $4) {
9514
- return Text_PrettyPrint_Prettyprinter_Doc_hcat(Data_List_intersperse(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(', '), Prelude_Types_List_mapAppend({h: 0}, $f => Commands_n__8389_1298_putLabel($0, $1, $2, $3, $f), $4)));
9603
+ /* Commands.8501:1299:putLabels */
9604
+ function Commands_n__8501_1299_putLabels($0, $1, $2, $3, $4) {
9605
+ return Text_PrettyPrint_Prettyprinter_Doc_hcat(Data_List_intersperse(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(', '), Prelude_Types_List_mapAppend({h: 0}, $f => Commands_n__8501_1298_putLabel($0, $1, $2, $3, $f), $4)));
9515
9606
  }
9516
9607
 
9517
- /* Commands.8389:1298:putLabel */
9518
- function Commands_n__8389_1298_putLabel($0, $1, $2, $3, $4) {
9608
+ /* Commands.8501:1298:putLabel */
9609
+ function Commands_n__8501_1298_putLabel($0, $1, $2, $3, $4) {
9519
9610
  return Text_PrettyPrint_Prettyprinter_Doc_enclose(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('\"'), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('\"'), Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_color(2), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String($4)));
9520
9611
  }
9521
9612
 
9522
- /* Commands.8744:1651:partitionedArgs */
9523
- function Commands_n__8744_1651_partitionedArgs($0, $1, $2, $3, $4) {
9524
- return Commands_case__assignx2cpartitionedArgs_1663($0, $1, $2, $3, $4, Data_List_partition($e => Data_String_isPrefixOf('+', $e), $4));
9613
+ /* Commands.8856:1651:partitionedArgs */
9614
+ function Commands_n__8856_1651_partitionedArgs($0, $1, $2, $3, $4) {
9615
+ return Commands_case__requestx2cpartitionedArgs_1663($0, $1, $2, $3, $4, Data_List_partition($e => Data_String_isPrefixOf('+', $e), $4));
9525
9616
  }
9526
9617
 
9527
- /* Commands.9518:2373:parseTeamArg */
9528
- function Commands_n__9518_2373_parseTeamArg($0, $1) {
9618
+ /* Commands.9630:2373:parseTeamArg */
9619
+ function Commands_n__9630_2373_parseTeamArg($0, $1) {
9529
9620
  return {a1: {a1: $1}};
9530
9621
  }
9531
9622
 
9532
- /* Commands.9677:2510:parseSkipArg */
9533
- function Commands_n__9677_2510_parseSkipArg($0, $1) {
9623
+ /* Commands.9789:2510:parseSkipArg */
9624
+ function Commands_n__9789_2510_parseSkipArg($0, $1) {
9534
9625
  const $2 = Prelude_Types_fastUnpack($1);
9535
9626
  switch($2.h) {
9536
9627
  case undefined: /* cons */ {
@@ -9543,15 +9634,15 @@ function Commands_n__9677_2510_parseSkipArg($0, $1) {
9543
9634
  }
9544
9635
  }
9545
9636
 
9546
- /* Commands.9677:2509:parseIgnoreOpt */
9547
- function Commands_n__9677_2509_parseIgnoreOpt($0, $1) {
9548
- const $2 = Data_String_split(csegen_422(), $1);
9637
+ /* Commands.9789:2509:parseIgnoreOpt */
9638
+ function Commands_n__9789_2509_parseIgnoreOpt($0, $1) {
9639
+ const $2 = Data_String_split(csegen_425(), $1);
9549
9640
  const $7 = Data_List1_last($2);
9550
9641
  return Prelude_Types_map_Functor_Maybe($c => $c, Data_String_parsePositive(csegen_2(), $7));
9551
9642
  }
9552
9643
 
9553
- /* Commands.9518:2372:parseCompletedFlag */
9554
- function Commands_n__9518_2372_parseCompletedFlag($0, $1) {
9644
+ /* Commands.9630:2372:parseCompletedFlag */
9645
+ function Commands_n__9630_2372_parseCompletedFlag($0, $1) {
9555
9646
  switch($1) {
9556
9647
  case '-c': return {a1: {h: 0}};
9557
9648
  case '--completed': return {a1: {h: 0}};
@@ -9559,8 +9650,8 @@ function Commands_n__9518_2372_parseCompletedFlag($0, $1) {
9559
9650
  }
9560
9651
  }
9561
9652
 
9562
- /* Commands.9677:2508:parseCheckoutFlag */
9563
- function Commands_n__9677_2508_parseCheckoutFlag($0, $1) {
9653
+ /* Commands.9789:2508:parseCheckoutFlag */
9654
+ function Commands_n__9789_2508_parseCheckoutFlag($0, $1) {
9564
9655
  switch($1) {
9565
9656
  case '-c': return {a1: {h: 0 /* Checkout */}};
9566
9657
  case '--checkout': return {a1: {h: 0 /* Checkout */}};
@@ -9568,13 +9659,13 @@ function Commands_n__9677_2508_parseCheckoutFlag($0, $1) {
9568
9659
  }
9569
9660
  }
9570
9661
 
9571
- /* Commands.10007:2847:isNotIgnored */
9572
- function Commands_n__10007_2847_isNotIgnored($0, $1, $2, $3, $4, $5) {
9662
+ /* Commands.10119:2847:isNotIgnored */
9663
+ function Commands_n__10119_2847_isNotIgnored($0, $1, $2, $3, $4, $5) {
9573
9664
  return Data_Maybe_isNothing(Data_List_find($a => Prelude_EqOrd_x3dx3d_Eq_Integer($a, $5.a1), $4.a12));
9574
9665
  }
9575
9666
 
9576
- /* Commands.9068:1921:forkedUser */
9577
- function Commands_n__9068_1921_forkedUser($0, $1, $2, $3) {
9667
+ /* Commands.9180:1921:forkedUser */
9668
+ function Commands_n__9180_1921_forkedUser($0, $1, $2, $3) {
9578
9669
  return FFI_Concurrency_fork(csegen_72(), ('user --json '+$3));
9579
9670
  }
9580
9671
 
@@ -9613,6 +9704,12 @@ function Commands_skipArg($0) {
9613
9704
  }
9614
9705
  }
9615
9706
 
9707
+ /* Commands.request : Config => Git => Octokit => List String -> {default False _ : Bool} ->
9708
+ Promise () */
9709
+ function Commands_request($0, $1, $2, $3, $4) {
9710
+ return Commands_case__request_1766($0, $1, $2, $4, $3, Commands_n__8856_1651_partitionedArgs($0, $1, $2, $4, $3));
9711
+ }
9712
+
9616
9713
  /* Commands.reflect : Config => Octokit => Promise () */
9617
9714
  function Commands_reflect($0, $1, $2, $3) {
9618
9715
  return User_Reflect_reflectOnSelf($0, $1, $2, $3);
@@ -9664,7 +9761,7 @@ function Commands_parseGraphArgs($0) {
9664
9761
  switch($0.a2.a2.h) {
9665
9762
  case undefined: /* cons */ return {h: 0 /* Left */, a1: 'graph accepts at most one team name and the --completed flag.'};
9666
9763
  default: {
9667
- const $6 = Prelude_Types_traverse_Traversable_List(csegen_9(), $b => Commands_x3cx7cx7cx3e(csegen_486(), $10 => Commands_n__9518_2372_parseCompletedFlag($0, $10), $15 => Commands_n__9518_2373_parseTeamArg($0, $15), $b), $0);
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);
9668
9765
  switch($6.h) {
9669
9766
  case undefined: /* just */ return {h: 1 /* Right */, a1: $6.a1};
9670
9767
  case 0: /* nothing */ return {h: 0 /* Left */, a1: 'The graph command expects the name of a GitHub Team and optionally --completed as arguments.'};
@@ -9673,7 +9770,7 @@ function Commands_parseGraphArgs($0) {
9673
9770
  }
9674
9771
  }
9675
9772
  default: {
9676
- const $1d = Prelude_Types_traverse_Traversable_List(csegen_9(), $22 => Commands_x3cx7cx7cx3e(csegen_486(), $27 => Commands_n__9518_2372_parseCompletedFlag($0, $27), $2c => Commands_n__9518_2373_parseTeamArg($0, $2c), $22), $0);
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);
9677
9774
  switch($1d.h) {
9678
9775
  case undefined: /* just */ return {h: 1 /* Right */, a1: $1d.a1};
9679
9776
  case 0: /* nothing */ return {h: 0 /* Left */, a1: 'The graph command expects the name of a GitHub Team and optionally --completed as arguments.'};
@@ -9682,7 +9779,7 @@ function Commands_parseGraphArgs($0) {
9682
9779
  }
9683
9780
  }
9684
9781
  default: {
9685
- const $34 = Prelude_Types_traverse_Traversable_List(csegen_9(), $39 => Commands_x3cx7cx7cx3e(csegen_486(), $3e => Commands_n__9518_2372_parseCompletedFlag($0, $3e), $43 => Commands_n__9518_2373_parseTeamArg($0, $43), $39), $0);
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);
9686
9783
  switch($34.h) {
9687
9784
  case undefined: /* just */ return {h: 1 /* Right */, a1: $34.a1};
9688
9785
  case 0: /* nothing */ return {h: 0 /* Left */, a1: 'The graph command expects the name of a GitHub Team and optionally --completed as arguments.'};
@@ -9696,9 +9793,9 @@ function Commands_parseContributeArgs($0) {
9696
9793
  switch($0.h) {
9697
9794
  case 0: /* nil */ return {h: 1 /* Right */, a1: {h: 0}};
9698
9795
  default: {
9699
- const $3 = Commands_n__9677_2511_recombineIgnoreArgs($0, $0);
9796
+ const $3 = Commands_n__9789_2511_recombineIgnoreArgs($0, $0);
9700
9797
  const $7 = Prelude_Types_List_mapAppend({h: 0}, $b => ({h: 1 /* Ignore */, a1: $b}), $3.a1);
9701
- const $e = Prelude_Types_traverse_Traversable_List(csegen_9(), $13 => Commands_x3cx7cx7cx3e(csegen_486(), $18 => Commands_n__9677_2510_parseSkipArg($0, $18), $1d => Commands_n__9677_2508_parseCheckoutFlag($0, $1d), $13), $3.a2);
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);
9702
9799
  return Data_Either_maybeToEither(() => Commands_contributeUsageError(), Prelude_Types_map_Functor_Maybe($29 => Prelude_Types_List_tailRecAppend($7, $29), $e));
9703
9800
  }
9704
9801
  }
@@ -9706,14 +9803,14 @@ function Commands_parseContributeArgs($0) {
9706
9803
 
9707
9804
  /* Commands.list : Config => Octokit => String -> Promise () */
9708
9805
  function Commands_list($0, $1, $2, $3, $4) {
9709
- return Data_Promise_x3ex3ex3d_Monad_Promise($7 => $8 => Data_Promise_map_Functor_Promise(csegen_487(), $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_393(), csegen_488(), Prelude_Types_traverse_Traversable_List(csegen_64(), $27 => Commands_n__9068_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__9068_1922_putNameLn($1, $2, $0, $4c), teamMembers))), $2f, $30), $19, $1a), $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);
9710
9807
  }
9711
9808
 
9712
9809
  /* Commands.label : Config => Git => Octokit => List String -> Promise () */
9713
9810
  function Commands_label($0, $1, $2, $3, $4, $5) {
9714
9811
  const $20 = $21 => {
9715
9812
  const $23 = Prelude_Types_List_mapAppend({h: 0}, $27 => Commands_unslugifyLabel($0.a10, $27), $3);
9716
- return $2d => $2e => Data_Promise_x3ex3ex3d_Monad_Promise($31 => $32 => Label_addLabels($0, $2, $21.a2, $23, $31, $32), allLabels => Util_renderIO($0, csegen_72(), Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('Added'), Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29(Commands_n__8389_1299_putLabels($1, $2, $3, $0, $23), Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Text_PrettyPrint_Prettyprinter_Doc_unsafeTextWithoutNewLines(' to PR.'), a2: {h: 0}}))), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(Prelude_Types_foldMap_Foldable_List(csegen_49(), $61 => $61, {a1: 'All labels for PR of ', a2: {a1: $21.a2.a7, a2: {a1: ':', a2: {h: 0}}}})), Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29(Commands_n__8389_1299_putLabels($1, $2, $3, $0, allLabels), csegen_323())), a2: {h: 0}}})), $2d, $2e);
9813
+ return $2d => $2e => Data_Promise_x3ex3ex3d_Monad_Promise($31 => $32 => Label_addLabels($0, $2, $21.a2, $23, $31, $32), allLabels => Util_renderIO($0, csegen_72(), Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('Added'), Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29(Commands_n__8501_1299_putLabels($1, $2, $3, $0, $23), Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Text_PrettyPrint_Prettyprinter_Doc_unsafeTextWithoutNewLines(' to PR.'), a2: {h: 0}}))), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(Prelude_Types_foldMap_Foldable_List(csegen_49(), $61 => $61, {a1: 'All labels for PR of ', a2: {a1: $21.a2.a7, a2: {a1: ':', a2: {h: 0}}}})), Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29(Commands_n__8501_1299_putLabels($1, $2, $3, $0, allLabels), Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Text_PrettyPrint_Prettyprinter_Doc_unsafeTextWithoutNewLines('.'), a2: {h: 0}}))), a2: {h: 0}}})), $2d, $2e);
9717
9814
  };
9718
9815
  return Data_Promise_x3ex3ex3d_Monad_Promise($8 => $9 => Data_Promise_x3ex3ex3d_Monad_Promise($c => $d => FFI_Git_currentBranch($1, $c, $d), $13 => $14 => $15 => PullRequest_identifyOrCreatePR($0, $1, $2, 0, $13, $14, $15), $8, $9), $20, $4, $5);
9719
9816
  }
@@ -9776,14 +9873,14 @@ function Commands_contribute($0, $1, $2, $3, $4, $5) {
9776
9873
  }
9777
9874
  };
9778
9875
  const $53 = Prelude_Types_List_filterAppend({h: 0}, $56, $13);
9779
- const $5d = Prelude_Types_List_filterAppend({h: 0}, $61 => Commands_n__10007_2847_isNotIgnored($1, $2, $3, $0, configx27, $61), $53);
9876
+ const $5d = Prelude_Types_List_filterAppend({h: 0}, $61 => Commands_n__10119_2847_isNotIgnored($1, $2, $3, $0, configx27, $61), $53);
9780
9877
  const $6a = Data_List_partition($6d => Data_PullRequest_isRequestedReviewer(myLogin, $6d), $5d);
9781
- 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_498(), $a0), $6a));
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));
9782
9879
  };
9783
9880
  return Data_Promise_x3ex3ex3d_Monad_Promise($30, $3f, $2d, $2e);
9784
9881
  };
9785
9882
  };
9786
- return Data_Promise_x3ex3ex3d_Monad_Promise($1f => $20 => Data_Promise_map_Functor_Promise(csegen_494(), FFI_GitHub_getSelf($2), $1f, $20), $29, $1b, $1c);
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);
9787
9884
  };
9788
9885
  };
9789
9886
  return Data_Promise_x3ex3ex3d_Monad_Promise(FFI_GitHub_listPullRequests($2, $0.a2, $0.a3, {a1: 0}, 100n, 0n), $12, $4, $5);
@@ -9800,12 +9897,6 @@ function Commands_branch($0, $1, $2, $3) {
9800
9897
  return Data_Promise_x3ex3ex3d_Monad_Promise($6 => $7 => FFI_Git_currentBranch($1, $6, $7), $c, $2, $3);
9801
9898
  }
9802
9899
 
9803
- /* Commands.assign : Config => Git => Octokit => List String -> {default False _ : Bool} ->
9804
- Promise () */
9805
- function Commands_assign($0, $1, $2, $3, $4) {
9806
- return Commands_case__assign_1766($0, $1, $2, $4, $3, Commands_n__8744_1651_partitionedArgs($0, $1, $2, $4, $3));
9807
- }
9808
-
9809
9900
  /* Commands.(<||>) : Alternative t => (a -> t b) -> (a -> t b) -> a -> t b */
9810
9901
  function Commands_x3cx7cx7cx3e($0, $1, $2, $3) {
9811
9902
  return $0.a3(undefined)($1($3))(() => $2($3));
@@ -9813,63 +9904,63 @@ function Commands_x3cx7cx7cx3e($0, $1, $2, $3) {
9813
9904
 
9814
9905
  /* User.Reflect.case block in case block in reflectOnSelf */
9815
9906
  function User_Reflect_case__casex20blockx20inx20reflectOnSelf_1862($0, $1, $2, $3, $4, $5, $6, $7, $8, $9) {
9816
- 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_511(), $2a))), {a1: $7, a2: $9.a1});
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});
9817
9908
  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));
9818
9909
  }
9819
9910
 
9820
- /* User.Me.7116:1985:ul */
9821
- function User_Me_n__7116_1985_ul($0, $1, $2, $3) {
9911
+ /* User.Me.7221:1985:ul */
9912
+ function User_Me_n__7221_1985_ul($0, $1, $2, $3) {
9822
9913
  return Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_underline(), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String($3));
9823
9914
  }
9824
9915
 
9825
- /* User.Me.7116:1984:teams */
9826
- function User_Me_n__7116_1984_teams($0, $1, $2) {
9827
- return Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: User_Me_n__7116_1985_ul($0, $1, $2, 'GitHub Teams:'), a2: Prelude_Types_List_mapAppend({h: 0}, $f => User_Me_n__7116_1982_it($0, $1, $2, $f), $0)});
9916
+ /* User.Me.7221:1984:teams */
9917
+ function User_Me_n__7221_1984_teams($0, $1, $2) {
9918
+ return Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: User_Me_n__7221_1985_ul($0, $1, $2, 'GitHub Teams:'), a2: Prelude_Types_List_mapAppend({h: 0}, $f => User_Me_n__7221_1982_it($0, $1, $2, $f), $0)});
9828
9919
  }
9829
9920
 
9830
- /* User.Me.7116:1983:login */
9831
- function User_Me_n__7116_1983_login($0, $1, $2) {
9832
- return Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('GitHub Login:'), User_Me_n__7116_1981_green($0, $1, $2, $1.a1));
9921
+ /* User.Me.7221:1983:login */
9922
+ function User_Me_n__7221_1983_login($0, $1, $2) {
9923
+ return Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('GitHub Login:'), User_Me_n__7221_1981_green($0, $1, $2, $1.a1));
9833
9924
  }
9834
9925
 
9835
- /* User.Reflect.6209:1056:ital */
9836
- function User_Reflect_n__6209_1056_ital($0, $1) {
9926
+ /* User.Reflect.6314:1056:ital */
9927
+ function User_Reflect_n__6314_1056_ital($0, $1) {
9837
9928
  return Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_italic(), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String($1));
9838
9929
  }
9839
9930
 
9840
- /* User.Me.7116:1982:it */
9841
- function User_Me_n__7116_1982_it($0, $1, $2, $3) {
9931
+ /* User.Me.7221:1982:it */
9932
+ function User_Me_n__7221_1982_it($0, $1, $2, $3) {
9842
9933
  return Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_italic(), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String($3));
9843
9934
  }
9844
9935
 
9845
- /* User.Me.7256:2135:handleUnsetEmail */
9846
- function User_Me_n__7256_2135_handleUnsetEmail($0, $1, $2, $3) {
9936
+ /* User.Me.7361:2135:handleUnsetEmail */
9937
+ function User_Me_n__7361_2135_handleUnsetEmail($0, $1, $2, $3) {
9847
9938
  switch($3) {
9848
9939
  case '': return {h: 0};
9849
9940
  default: return {a1: $3};
9850
9941
  }
9851
9942
  }
9852
9943
 
9853
- /* User.Me.7116:1981:green */
9854
- function User_Me_n__7116_1981_green($0, $1, $2, $3) {
9944
+ /* User.Me.7221:1981:green */
9945
+ function User_Me_n__7221_1981_green($0, $1, $2, $3) {
9855
9946
  return Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_color(2), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String($3));
9856
9947
  }
9857
9948
 
9858
- /* User.Me.7116:1980:fullName */
9859
- function User_Me_n__7116_1980_fullName($0, $1, $2) {
9860
- return Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('GitHub Name:'), User_Me_n__7116_1981_green($0, $1, $2, $1.a2));
9949
+ /* User.Me.7221:1980:fullName */
9950
+ function User_Me_n__7221_1980_fullName($0, $1, $2) {
9951
+ return Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('GitHub Name:'), User_Me_n__7221_1981_green($0, $1, $2, $1.a2));
9861
9952
  }
9862
9953
 
9863
- /* User.Me.7116:1979:email */
9864
- function User_Me_n__7116_1979_email($0, $1, $2) {
9954
+ /* User.Me.7221:1979:email */
9955
+ function User_Me_n__7221_1979_email($0, $1, $2) {
9865
9956
  let $7;
9866
9957
  switch($2.h) {
9867
9958
  case undefined: /* just */ {
9868
- $7 = User_Me_n__7116_1981_green($0, $1, $2, $2.a1);
9959
+ $7 = User_Me_n__7221_1981_green($0, $1, $2, $2.a1);
9869
9960
  break;
9870
9961
  }
9871
9962
  case 0: /* nothing */ {
9872
- $7 = User_Me_n__7116_1982_it($0, $1, $2, 'Not set');
9963
+ $7 = User_Me_n__7221_1982_it($0, $1, $2, 'Not set');
9873
9964
  break;
9874
9965
  }
9875
9966
  }
@@ -9896,21 +9987,21 @@ function User_Reflect_reflectOnSelf($0, $1, $2, $3) {
9896
9987
  const $c = prs => $d => $e => {
9897
9988
  const $1b = myLogin => $1c => $1d => {
9898
9989
  const $39 = reviews => {
9899
- const $3a = Prelude_Types_map_Functor_Maybe(csegen_514(), Data_List_headx27(Data_List_sortBy($43 => $44 => Prelude_Basics_on(csegen_496(), csegen_514(), $43, $44), 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)));
9900
9991
  const $4d = PullRequest_tuple(prs);
9901
9992
  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);
9902
- 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_94(), $ac => Prelude_EqOrd_x3dx3d_Eq_String($ac, myLogin), $a7.a6), $a3), $4d));
9993
+ 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));
9903
9994
  };
9904
- 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_496(), csegen_511(), $2d, $2e), PullRequest_combined(prs))))), $39, $1c, $1d);
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);
9905
9996
  };
9906
- return Data_Promise_x3ex3ex3d_Monad_Promise($11 => $12 => Data_Promise_map_Functor_Promise(csegen_494(), FFI_GitHub_getSelf($1), $11, $12), $1b, $d, $e);
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);
9907
9998
  };
9908
9999
  return Data_Promise_x3ex3ex3d_Monad_Promise(PullRequest_listPartitionedPRs($0, $1, 4n, User_Reflect_prCount()), $c, $2, $3);
9909
10000
  }
9910
10001
 
9911
10002
  /* User.Me.printInfoOnSelf : Config => Octokit => Git => Promise () */
9912
10003
  function User_Me_printInfoOnSelf($0, $1, $2, $3, $4) {
9913
- return Data_Promise_x3ex3ex3d_Monad_Promise($7 => $8 => Data_Promise_map_Functor_Promise($b => User_Me_n__7256_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_487(), $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);
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);
9914
10005
  }
9915
10006
 
9916
10007
  /* User.Reflect.print : Nat -> Nat -> Nat -> Nat -> Nat -> Nat -> Maybe Date -> Maybe Date -> Maybe Date -> Doc AnsiStyle */
@@ -9920,7 +10011,7 @@ function User_Reflect_print($0, $1, $2, $3, $4, $5, $6, $7, $8) {
9920
10011
 
9921
10012
  /* User.Me.print : Maybe String -> User -> List String -> Doc AnsiStyle */
9922
10013
  function User_Me_print($0, $1, $2) {
9923
- return Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {a1: User_Me_n__7116_1979_email($2, $1, $0), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {a1: User_Me_n__7116_1980_fullName($2, $1, $0), a2: {a1: User_Me_n__7116_1983_login($2, $1, $0), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {a1: User_Me_n__7116_1984_teams($2, $1, $0), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {h: 0}}}}}}}}});
10014
+ return Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {a1: User_Me_n__7221_1979_email($2, $1, $0), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {a1: User_Me_n__7221_1980_fullName($2, $1, $0), a2: {a1: User_Me_n__7221_1983_login($2, $1, $0), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {a1: User_Me_n__7221_1984_teams($2, $1, $0), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {h: 0}}}}}}}}});
9924
10015
  }
9925
10016
 
9926
10017
  /* User.Reflect.prCount : Fin 101 */
@@ -9940,15 +10031,15 @@ const User_Reflect_intro = __lazy(function () {
9940
10031
 
9941
10032
  /* User.Reflect.header : Nat -> Doc AnsiStyle */
9942
10033
  function User_Reflect_header($0) {
9943
- return Text_PrettyPrint_Prettyprinter_Doc_indent(Number(_truncBigInt32($0)), Text_PrettyPrint_Prettyprinter_Doc_hsep({a1: User_Reflect_n__6209_1056_ital($0, User_Reflect_leftTitle()), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(' '), a2: {a1: User_Reflect_n__6209_1056_ital($0, User_Reflect_rightTitle()), a2: {h: 0}}}}));
10034
+ return Text_PrettyPrint_Prettyprinter_Doc_indent(Number(_truncBigInt32($0)), Text_PrettyPrint_Prettyprinter_Doc_hsep({a1: User_Reflect_n__6314_1056_ital($0, User_Reflect_leftTitle()), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(' '), a2: {a1: User_Reflect_n__6314_1056_ital($0, User_Reflect_rightTitle()), a2: {h: 0}}}}));
9944
10035
  }
9945
10036
 
9946
10037
  /* User.Reflect.graph : Nat -> Nat -> Nat -> Nat -> Nat -> Nat -> Doc AnsiStyle */
9947
10038
  function User_Reflect_graph($0, $1, $2, $3, $4, $5) {
9948
10039
  const $6 = ($2+$3);
9949
10040
  const $9 = ($5+$4);
9950
- const $c = Prelude_Types_foldr_Foldable_List(csegen_201(), Prelude_Types_String_length(User_Reflect_leftTitle()), {a1: ($6+$1), a2: {a1: $9, a2: {h: 0}}});
9951
- const $1b = Prelude_Types_foldr_Foldable_List(csegen_201(), Prelude_Types_String_length(User_Reflect_rightTitle()), {a1: $6, a2: {a1: $9, a2: {h: 0}}});
10041
+ const $c = Prelude_Types_foldr_Foldable_List(csegen_206(), Prelude_Types_String_length(User_Reflect_leftTitle()), {a1: ($6+$1), a2: {a1: $9, a2: {h: 0}}});
10042
+ const $1b = Prelude_Types_foldr_Foldable_List(csegen_206(), Prelude_Types_String_length(User_Reflect_rightTitle()), {a1: $6, a2: {a1: $9, a2: {h: 0}}});
9952
10043
  const $28 = (($c+$1b)+3n);
9953
10044
  const $2d = ((Number($0)/2.0)-(Number($28)/2.0));
9954
10045
  const $36 = (Prelude_Types_prim__integerToNat(BigInt(Math.trunc($2d)))+Prelude_Types_prim__integerToNat(($c-Prelude_Types_String_length(User_Reflect_leftTitle()))));
@@ -9958,7 +10049,7 @@ function User_Reflect_graph($0, $1, $2, $3, $4, $5) {
9958
10049
 
9959
10050
  /* User.Reflect.details : Nat -> Nat -> Nat -> Nat -> Nat -> Nat -> Maybe Date -> Maybe Date -> Maybe Date -> Doc AnsiStyle */
9960
10051
  function User_Reflect_details($0, $1, $2, $3, $4, $5, $6, $7, $8) {
9961
- 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_520(), $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_520(), $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}}}}}}}}}});
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}}}}}}}}}});
9962
10053
  }
9963
10054
 
9964
10055
  /* User.Reflect.chart : Nat -> Nat -> Nat -> Nat -> Nat -> Nat -> Nat -> Doc AnsiStyle */
@@ -10020,55 +10111,55 @@ function PullRequest_case__casex20blockx20inx20casex20blockx20inx20identifyOrCre
10020
10111
  }
10021
10112
  }
10022
10113
 
10023
- /* PullRequest.9490:1965:userNotice */
10024
- function PullRequest_n__9490_1965_userNotice($0, $1, $2, $3, $4, $5, $6) {
10114
+ /* PullRequest.9595:1965:userNotice */
10115
+ function PullRequest_n__9595_1965_userNotice($0, $1, $2, $3, $4, $5, $6) {
10025
10116
  switch($6.h) {
10026
10117
  case 0: /* nothing */ {
10027
10118
  switch($2.h) {
10028
10119
  case 0: /* nil */ return 'no users';
10029
- default: return Prelude_Types_foldMap_Foldable_List(csegen_49(), $d => $d, {a1: PullRequest_n__9490_1962_csv($0, $1, $2, $3, $4, $5, $2), a2: {h: 0}});
10120
+ default: return Prelude_Types_foldMap_Foldable_List(csegen_49(), $d => $d, {a1: PullRequest_n__9595_1962_csv($0, $1, $2, $3, $4, $5, $2), a2: {h: 0}});
10030
10121
  }
10031
10122
  }
10032
- case undefined: /* just */ return Prelude_Types_foldMap_Foldable_List(csegen_49(), $1d => $1d, {a1: PullRequest_n__9490_1962_csv($0, $1, $2, $3, $4, $5, {a1: $6.a1, a2: $2}), a2: {h: 0}});
10123
+ case undefined: /* just */ return Prelude_Types_foldMap_Foldable_List(csegen_49(), $1d => $1d, {a1: PullRequest_n__9595_1962_csv($0, $1, $2, $3, $4, $5, {a1: $6.a1, a2: $2}), a2: {h: 0}});
10033
10124
  }
10034
10125
  }
10035
10126
 
10036
- /* PullRequest.9490:1964:teamNotice */
10037
- function PullRequest_n__9490_1964_teamNotice($0, $1, $2, $3, $4, $5, $6) {
10127
+ /* PullRequest.9595:1964:teamNotice */
10128
+ function PullRequest_n__9595_1964_teamNotice($0, $1, $2, $3, $4, $5, $6) {
10038
10129
  switch($6.h) {
10039
10130
  case 0: /* nil */ return '';
10040
10131
  case undefined: /* cons */ {
10041
10132
  switch($6.a2.h) {
10042
- case 0: /* nil */ return Prelude_Types_foldMap_Foldable_List(csegen_49(), $d => $d, {a1: ' and team ', a2: {a1: PullRequest_n__9490_1962_csv($0, $1, $2, $3, $4, $5, {a1: $6.a1, a2: {h: 0}}), a2: {h: 0}}});
10043
- default: return Prelude_Types_foldMap_Foldable_List(csegen_49(), $21 => $21, {a1: ' and teams ', a2: {a1: PullRequest_n__9490_1962_csv($0, $1, $2, $3, $4, $5, $6), a2: {h: 0}}});
10133
+ case 0: /* nil */ return Prelude_Types_foldMap_Foldable_List(csegen_49(), $d => $d, {a1: ' and team ', a2: {a1: PullRequest_n__9595_1962_csv($0, $1, $2, $3, $4, $5, {a1: $6.a1, a2: {h: 0}}), a2: {h: 0}}});
10134
+ default: return Prelude_Types_foldMap_Foldable_List(csegen_49(), $21 => $21, {a1: ' and teams ', a2: {a1: PullRequest_n__9595_1962_csv($0, $1, $2, $3, $4, $5, $6), a2: {h: 0}}});
10044
10135
  }
10045
10136
  }
10046
- default: return Prelude_Types_foldMap_Foldable_List(csegen_49(), $33 => $33, {a1: ' and teams ', a2: {a1: PullRequest_n__9490_1962_csv($0, $1, $2, $3, $4, $5, $6), a2: {h: 0}}});
10137
+ default: return Prelude_Types_foldMap_Foldable_List(csegen_49(), $33 => $33, {a1: ' and teams ', a2: {a1: PullRequest_n__9595_1962_csv($0, $1, $2, $3, $4, $5, $6), a2: {h: 0}}});
10047
10138
  }
10048
10139
  }
10049
10140
 
10050
- /* PullRequest.10180:2629:prepareDescriptionFile */
10051
- function PullRequest_n__10180_2629_prepareDescriptionFile($0, $1, $2, $3, $4, $5, $6) {
10141
+ /* PullRequest.10285:2629:prepareDescriptionFile */
10142
+ function PullRequest_n__10285_2629_prepareDescriptionFile($0, $1, $2, $3, $4, $5, $6) {
10052
10143
  return $5.a1.a2(undefined)(undefined)(System_File_Meta_exists($5, $6))($14 => Prelude_Interfaces_when($5.a1.a1, $14, () => $5.a1.a1.a1(undefined)(undefined)($25 => (undefined))(System_File_copyFile($5, $6, 'pr_description.tmp.md'))));
10053
10144
  }
10054
10145
 
10055
- /* PullRequest.9490:1963:prComment */
10056
- function PullRequest_n__9490_1963_prComment($0, $1, $2, $3, $4, $5, $6) {
10057
- return Prelude_Types_foldMap_Foldable_List(csegen_49(), $b => $b, {a1: ':musical_note: Harmoniously assigned @', a2: {a1: $6, a2: {a1: ' to review this PR.', a2: {h: 0}}}});
10146
+ /* PullRequest.9595:1963:prComment */
10147
+ function PullRequest_n__9595_1963_prComment($0, $1, $2, $3, $4, $5, $6) {
10148
+ return Prelude_Types_foldMap_Foldable_List(csegen_49(), $b => $b, {a1: ':musical_note: Harmoniously requested review from @', a2: {a1: $6, a2: {a1: '.', a2: {h: 0}}}});
10058
10149
  }
10059
10150
 
10060
- /* PullRequest.10180:2628:inlineDescription */
10061
- function PullRequest_n__10180_2628_inlineDescription($0, $1, $2, $3, $4, $5) {
10151
+ /* PullRequest.10285:2628:inlineDescription */
10152
+ function PullRequest_n__10285_2628_inlineDescription($0, $1, $2, $3, $4, $5) {
10062
10153
  return $5.a1.a2(undefined)(undefined)($5.a2(undefined)($14 => Prelude_IO_prim__putStr('What would you like the description to be (two blank lines to finish)?\n', $14)))($19 => $5.a1.a1.a1(undefined)(undefined)($24 => Data_String_fastUnlines($24))(Util_getManyLines($5, Data_Fuel_limit(100n))));
10063
10154
  }
10064
10155
 
10065
- /* PullRequest.9263:1704:forkedReviews */
10066
- function PullRequest_n__9263_1704_forkedReviews($0, $1, $2, $3) {
10156
+ /* PullRequest.9368:1704:forkedReviews */
10157
+ function PullRequest_n__9368_1704_forkedReviews($0, $1, $2, $3) {
10067
10158
  return FFI_Concurrency_fork(csegen_72(), ('reviews --json '+Prelude_Show_show_Show_Integer($3.a1)));
10068
10159
  }
10069
10160
 
10070
- /* PullRequest.8696:1169:filterString */
10071
- function PullRequest_n__8696_1169_filterString($0, $1, $2, $3, $4) {
10161
+ /* PullRequest.8801:1169:filterString */
10162
+ function PullRequest_n__8801_1169_filterString($0, $1, $2, $3, $4) {
10072
10163
  switch($4.h) {
10073
10164
  case 0: /* nothing */ return 'none';
10074
10165
  case undefined: /* just */ {
@@ -10080,8 +10171,8 @@ function PullRequest_n__8696_1169_filterString($0, $1, $2, $3, $4) {
10080
10171
  }
10081
10172
  }
10082
10173
 
10083
- /* PullRequest.10180:2627:editorDescription */
10084
- function PullRequest_n__10180_2627_editorDescription($0, $1, $2, $3, $4, $5, $6, $7) {
10174
+ /* PullRequest.10285:2627:editorDescription */
10175
+ function PullRequest_n__10285_2627_editorDescription($0, $1, $2, $3, $4, $5, $6, $7) {
10085
10176
  const $19 = $1a => {
10086
10177
  const $31 = $32 => {
10087
10178
  switch($32) {
@@ -10091,16 +10182,16 @@ function PullRequest_n__10180_2627_editorDescription($0, $1, $2, $3, $4, $5, $6,
10091
10182
  };
10092
10183
  return $5.a1.a2(undefined)(undefined)(System_system($5, Prelude_Types_foldMap_Foldable_List(csegen_49(), $2b => $2b, {a1: $6, a2: {a1: ' pr_description.tmp.md', a2: {h: 0}}})))($31);
10093
10184
  };
10094
- return $5.a1.a2(undefined)(undefined)(PullRequest_n__10180_2629_prepareDescriptionFile($0, $1, $2, $3, $4, $5, $7))($19);
10185
+ return $5.a1.a2(undefined)(undefined)(PullRequest_n__10285_2629_prepareDescriptionFile($0, $1, $2, $3, $4, $5, $7))($19);
10095
10186
  }
10096
10187
 
10097
- /* PullRequest.9490:1962:csv */
10098
- function PullRequest_n__9490_1962_csv($0, $1, $2, $3, $4, $5, $6) {
10188
+ /* PullRequest.9595:1962:csv */
10189
+ function PullRequest_n__9595_1962_csv($0, $1, $2, $3, $4, $5, $6) {
10099
10190
  return Util_renderString($5, Text_PrettyPrint_Prettyprinter_Doc_encloseSep(Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(', '), Prelude_Types_List_mapAppend({h: 0}, $16 => Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_color(2), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String($16)), $6)));
10100
10191
  }
10101
10192
 
10102
- /* PullRequest.10180:2626:createPR */
10103
- function PullRequest_n__10180_2626_createPR($0, $1, $2, $3, $4, $5, $6) {
10193
+ /* PullRequest.10285:2626:createPR */
10194
+ function PullRequest_n__10285_2626_createPR($0, $1, $2, $3, $4, $5, $6) {
10104
10195
  const $39 = $3a => $3b => $3c => {
10105
10196
  const $49 = $4a => $4b => $4c => {
10106
10197
  switch($4a) {
@@ -10133,11 +10224,11 @@ function PullRequest_n__10180_2626_createPR($0, $1, $2, $3, $4, $5, $6) {
10133
10224
  let $17a;
10134
10225
  switch($17b.h) {
10135
10226
  case 0: /* nothing */ {
10136
- $17a = PullRequest_n__10180_2628_inlineDescription($0, $1, $2, $3, $4, csegen_72());
10227
+ $17a = PullRequest_n__10285_2628_inlineDescription($0, $1, $2, $3, $4, csegen_72());
10137
10228
  break;
10138
10229
  }
10139
10230
  case undefined: /* just */ {
10140
- $17a = $186 => $187 => Data_Promise_map_Functor_Promise($18a => Prelude_Types_either(() => $18d => '', () => $18f => $18f, $18a), PullRequest_n__10180_2627_editorDescription($0, $1, $2, $3, $4, csegen_72(), $17b.a1, templateFilePath), $186, $187);
10231
+ $17a = $186 => $187 => Data_Promise_map_Functor_Promise($18a => Prelude_Types_either(() => $18d => '', () => $18f => $18f, $18a), PullRequest_n__10285_2627_editorDescription($0, $1, $2, $3, $4, csegen_72(), $17b.a1, templateFilePath), $186, $187);
10141
10232
  break;
10142
10233
  }
10143
10234
  }
@@ -10145,7 +10236,7 @@ function PullRequest_n__10180_2626_createPR($0, $1, $2, $3, $4, $5, $6) {
10145
10236
  };
10146
10237
  return Data_Promise_x3ex3ex3d_Monad_Promise($16f => $170 => Util_relativeToRoot($0, '.github/PULL_REQUEST_TEMPLATE.md', $16f, $170), $176, $16b, $16c);
10147
10238
  };
10148
- return Data_Promise_x3ex3ex3d_Monad_Promise($15d => $15e => Data_Promise_map_Functor_Promise($161 => ($13b+Data_String_trim($161)), csegen_456(), $15d, $15e), $16a, $159, $15a);
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);
10149
10240
  };
10150
10241
  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);
10151
10242
  };
@@ -10154,7 +10245,7 @@ function PullRequest_n__10180_2626_createPR($0, $1, $2, $3, $4, $5, $6) {
10154
10245
  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);
10155
10246
  };
10156
10247
  };
10157
- return Data_Promise_x3ex3ex3d_Monad_Promise($10f => $110 => Data_Promise_map_Functor_Promise($113 => Data_String_trim($113), csegen_456(), $10f, $110), $11a, $10b, $10c);
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);
10158
10249
  };
10159
10250
  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);
10160
10251
  };
@@ -10165,32 +10256,32 @@ function PullRequest_n__10180_2626_createPR($0, $1, $2, $3, $4, $5, $6) {
10165
10256
  case 0: return Data_Promise_reject('Not creating a PR (for now)...', $5c, $5d);
10166
10257
  }
10167
10258
  };
10168
- return Data_Promise_x3ex3ex3d_Monad_Promise($50 => $51 => PullRequest_n__10180_2624_continueGivenStagedChanges($0, $1, $2, $3, $4, $50, $51), $5a, $4b, $4c);
10259
+ return Data_Promise_x3ex3ex3d_Monad_Promise($50 => $51 => PullRequest_n__10285_2624_continueGivenStagedChanges($0, $1, $2, $3, $4, $50, $51), $5a, $4b, $4c);
10169
10260
  }
10170
10261
  case 0: return Data_Promise_reject('Not creating a PR (for now)...', $4b, $4c);
10171
10262
  }
10172
10263
  };
10173
- return Data_Promise_x3ex3ex3d_Monad_Promise($3f => $40 => PullRequest_n__10180_2625_continueGivenUncommittedChanges($0, $1, $2, $3, $4, $3f, $40), $49, $3b, $3c);
10264
+ return Data_Promise_x3ex3ex3d_Monad_Promise($3f => $40 => PullRequest_n__10285_2625_continueGivenUncommittedChanges($0, $1, $2, $3, $4, $3f, $40), $49, $3b, $3c);
10174
10265
  };
10175
10266
  return Data_Promise_x3ex3ex3d_Monad_Promise($9 => $a => Data_Promise_x3ex3ex3d_Monad_Promise($d => $e => FFI_Git_remoteTrackingBranch($0, $d, $e), $14 => Util_whenNothing(csegen_64(), $14, $1a => $1b => Data_Promise_x3ex3ex3d_Monad_Promise($1e => $1f => $20 => Data_Promise_liftIO_HasIO_Promise($23 => Prelude_IO_prim__putStr('Creating a new remote branch...\n', $23), $1e, $1f, $20), $2b => $2c => $2d => FFI_Git_pushNewBranch($0, $4.a4, $2, $2c, $2d), $1a, $1b)), $9, $a), $39, $5, $6);
10176
10267
  }
10177
10268
 
10178
- /* PullRequest.10180:2625:continueGivenUncommittedChanges */
10179
- function PullRequest_n__10180_2625_continueGivenUncommittedChanges($0, $1, $2, $3, $4, $5, $6) {
10269
+ /* PullRequest.10285:2625:continueGivenUncommittedChanges */
10270
+ function PullRequest_n__10285_2625_continueGivenUncommittedChanges($0, $1, $2, $3, $4, $5, $6) {
10180
10271
  const $f = $10 => $11 => $12 => {
10181
10272
  switch($10.h) {
10182
- 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_550(), $24, $25), $11, $12);
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);
10183
10274
  case 0: /* nothing */ return Data_Promise_pure_Applicative_Promise(1, $11, $12);
10184
10275
  }
10185
10276
  };
10186
10277
  return Data_Promise_x3ex3ex3d_Monad_Promise($9 => $a => FFI_Git_uncommittedChanges($0, $9, $a), $f, $5, $6);
10187
10278
  }
10188
10279
 
10189
- /* PullRequest.10180:2624:continueGivenStagedChanges */
10190
- function PullRequest_n__10180_2624_continueGivenStagedChanges($0, $1, $2, $3, $4, $5, $6) {
10280
+ /* PullRequest.10285:2624:continueGivenStagedChanges */
10281
+ function PullRequest_n__10285_2624_continueGivenStagedChanges($0, $1, $2, $3, $4, $5, $6) {
10191
10282
  const $f = $10 => $11 => $12 => {
10192
10283
  switch($10.h) {
10193
- 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_550(), $24, $25), $11, $12);
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);
10194
10285
  case 0: /* nothing */ return Data_Promise_pure_Applicative_Promise(1, $11, $12);
10195
10286
  }
10196
10287
  };
@@ -10234,7 +10325,7 @@ function PullRequest_reviewsForPrs($0, $1, $2, $3, $4) {
10234
10325
  };
10235
10326
  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);
10236
10327
  };
10237
- return Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Basics_flip(csegen_393(), csegen_488(), Prelude_Types_traverse_Traversable_List(csegen_64(), $11 => PullRequest_n__9263_1704_forkedReviews($0, $1, $2, $11), $2)), $18, $3, $4);
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);
10238
10329
  }
10239
10330
 
10240
10331
  /* PullRequest.reviewsByUser : Config => Octokit => String -> List PullRequest -> Promise (List Review) */
@@ -10264,9 +10355,9 @@ function PullRequest_reviewsByUser($0, $1, $2, $3) {
10264
10355
  List PullRequest -> Promise (SortedMap String (List Review)) */
10265
10356
  function PullRequest_reviewsByEachUser($0, $1, $2, $3, $4) {
10266
10357
  const $f = reviews => {
10267
- const $10 = Data_List_groupAllWith(csegen_212(), $15 => $15.a2, reviews);
10358
+ const $10 = Data_List_groupAllWith(csegen_217(), $15 => $15.a2, reviews);
10268
10359
  const $18 = Prelude_Types_List_mapAppend({h: 0}, rs => ({a1: rs.a1.a2, a2: Data_List1_forget(rs)}), $10);
10269
- return $23 => $24 => Data_Promise_pure_Applicative_Promise(Data_SortedMap_fromList(csegen_212(), $18), $23, $24);
10360
+ return $23 => $24 => Data_Promise_pure_Applicative_Promise(Data_SortedMap_fromList(csegen_217(), $18), $23, $24);
10270
10361
  };
10271
10362
  return Data_Promise_x3ex3ex3d_Monad_Promise($7 => $8 => PullRequest_reviewsForPrs($0, $1, $2, $7, $8), $f, $3, $4);
10272
10363
  }
@@ -10280,12 +10371,12 @@ function PullRequest_requestReviewers($0, $1, $2, $3, $4, $5, $6, $7) {
10280
10371
  let $37;
10281
10372
  switch($0.a7) {
10282
10373
  case 1: {
10283
- const $3a = Reviewer_chooseReviewers(csegen_212(), $14.a2, $14.a1, teamMembers, {h: 0}, $2.a4);
10374
+ const $3a = Reviewer_chooseReviewers(csegen_217(), $14.a2, $14.a1, teamMembers, {h: 0}, $2.a4);
10284
10375
  $37 = Reviewer_randomReviewer(csegen_72(), $3a);
10285
10376
  break;
10286
10377
  }
10287
10378
  case 0: {
10288
- $37 = csegen_458();
10379
+ $37 = csegen_461();
10289
10380
  break;
10290
10381
  }
10291
10382
  }
@@ -10316,7 +10407,7 @@ function PullRequest_requestReviewers($0, $1, $2, $3, $4, $5, $6, $7) {
10316
10407
  }
10317
10408
  const $56 = Prelude_Interfaces_when(csegen_64(), $5a, () => $5d => $5e => Data_Promise_x3ex3ex3d_Monad_Promise($61 => $62 => Data_Promise_map_Functor_Promise($65 => (undefined), $67 => $68 => FFI_GitHub_addPullReviewers($1, $0.a2, $0.a3, $2.a1, $4a, $50, $67, $68), $61, $62), $78 => Prelude_Interfaces_when(csegen_64(), $0.a8, () => $7f => $80 => {
10318
10409
  switch(chosenUser.h) {
10319
- case undefined: /* just */ return FFI_GitHub_createComment($1, $0.a2, $0.a3, $2.a1, PullRequest_n__9490_1963_prComment($1, $5, $4, $3, $2, $0, chosenUser.a1), $7f, $80);
10410
+ case undefined: /* just */ return FFI_GitHub_createComment($1, $0.a2, $0.a3, $2.a1, PullRequest_n__9595_1963_prComment($1, $5, $4, $3, $2, $0, chosenUser.a1), $7f, $80);
10320
10411
  case 0: /* nothing */ return Data_Promise_pure_Applicative_Promise(undefined, $7f, $80);
10321
10412
  }
10322
10413
  }), $5d, $5e));
@@ -10335,11 +10426,11 @@ function PullRequest_requestReviewers($0, $1, $2, $3, $4, $5, $6, $7) {
10335
10426
  let $9d;
10336
10427
  switch($9e) {
10337
10428
  case 1: {
10338
- $9d = () => $a3 => $a4 => $a5 => Data_Promise_liftIO_HasIO_Promise($a8 => Prelude_IO_prim__putStr((Util_renderString($0, Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_color(3), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('Could not pick a user from the given Team ')), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('(perhaps the only option was the author of the pull request?).'), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(Prelude_Types_foldMap_Foldable_List(csegen_49(), $c5 => $c5, {a1: 'Assigned ', a2: {a1: PullRequest_n__9490_1964_teamNotice($1, $5, $4, $3, $2, $0, $50), a2: {a1: ' to the open PR ', a2: {h: 0}}}})), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(Prelude_Types_foldMap_Foldable_List(csegen_49(), $dd => $dd, {a1: 'for the current branch (', a2: {a1: Data_PullRequest_rf__webURI($0, $2), a2: {a1: ').', a2: {h: 0}}}})), a2: {h: 0}}}}}))+'\n'), $a8), $a3, $a4, $a5);
10429
+ $9d = () => $a3 => $a4 => $a5 => Data_Promise_liftIO_HasIO_Promise($a8 => Prelude_IO_prim__putStr((Util_renderString($0, Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_color(3), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('Could not pick a user from the given Team ')), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('(perhaps the only option was the author of the pull request?).'), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(Prelude_Types_foldMap_Foldable_List(csegen_49(), $c5 => $c5, {a1: 'Requested review from ', a2: {a1: PullRequest_n__9595_1964_teamNotice($1, $5, $4, $3, $2, $0, $50), a2: {a1: ' for the open PR ', a2: {h: 0}}}})), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(Prelude_Types_foldMap_Foldable_List(csegen_49(), $dd => $dd, {a1: 'for the current branch (', a2: {a1: Data_PullRequest_rf__webURI($0, $2), a2: {a1: ').', a2: {h: 0}}}})), a2: {h: 0}}}}}))+'\n'), $a8), $a3, $a4, $a5);
10339
10430
  break;
10340
10431
  }
10341
10432
  case 0: {
10342
- $9d = () => $ee => $ef => $f0 => Data_Promise_liftIO_HasIO_Promise($f3 => Prelude_IO_prim__putStr((Util_renderString($0, Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(Prelude_Types_foldMap_Foldable_List(csegen_49(), $103 => $103, {a1: 'Assigned ', a2: {a1: PullRequest_n__9490_1965_userNotice($1, $5, $4, $3, $2, $0, chosenUser), a2: {a1: PullRequest_n__9490_1964_teamNotice($1, $5, $4, $3, $2, $0, $50), a2: {a1: ' to the open PR ', a2: {h: 0}}}}})), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(Prelude_Types_foldMap_Foldable_List(csegen_49(), $125 => $125, {a1: 'for the current branch (', a2: {a1: Data_PullRequest_rf__webURI($0, $2), a2: {a1: ').', a2: {h: 0}}}})), a2: {h: 0}}}))+'\n'), $f3), $ee, $ef, $f0);
10433
+ $9d = () => $ee => $ef => $f0 => Data_Promise_liftIO_HasIO_Promise($f3 => Prelude_IO_prim__putStr((Util_renderString($0, Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(Prelude_Types_foldMap_Foldable_List(csegen_49(), $103 => $103, {a1: 'Requested review from ', a2: {a1: PullRequest_n__9595_1965_userNotice($1, $5, $4, $3, $2, $0, chosenUser), a2: {a1: PullRequest_n__9595_1964_teamNotice($1, $5, $4, $3, $2, $0, $50), a2: {a1: ' for the open PR ', a2: {h: 0}}}}})), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(Prelude_Types_foldMap_Foldable_List(csegen_49(), $125 => $125, {a1: 'for the current branch (', a2: {a1: Data_PullRequest_rf__webURI($0, $2), a2: {a1: ').', a2: {h: 0}}}})), a2: {h: 0}}}))+'\n'), $f3), $ee, $ef, $f0);
10343
10434
  break;
10344
10435
  }
10345
10436
  }
@@ -10404,12 +10495,12 @@ function PullRequest_listx27($0, $1, $2, $3) {
10404
10495
  }
10405
10496
  };
10406
10497
  const $4d = {a1: $4e, a2: a => $56 => ({h: 1 /* Right */, a1: $56}), a3: $58};
10407
- const $4b = Prelude_Types_traverse_Traversable_List($4d, csegen_413(), prJsons);
10498
+ const $4b = Prelude_Types_traverse_Traversable_List($4d, csegen_416(), prJsons);
10408
10499
  return Data_Promise_either(csegen_51(), $4b, $47);
10409
10500
  };
10410
10501
  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);
10411
10502
  };
10412
- return Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Basics_flip(csegen_393(), $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);
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);
10413
10504
  }
10414
10505
 
10415
10506
  /* PullRequest.identifyOrCreatePR : Config => Git => Octokit => {default False _ : Bool} ->
@@ -10448,7 +10539,7 @@ function PullRequest_identifyOrCreatePR($0, $1, $2, $3, $4, $5, $6) {
10448
10539
  }
10449
10540
  };
10450
10541
  }
10451
- case 0: /* nil */ return $36 => Data_Promise_map_Functor_Promise($39 => ({a1: 1, a2: $39}), $3d => $3e => PullRequest_n__10180_2626_createPR($1, $2, $4, $3, $0, $3d, $3e), $12, $36);
10542
+ case 0: /* nil */ return $36 => Data_Promise_map_Functor_Promise($39 => ({a1: 1, a2: $39}), $3d => $3e => PullRequest_n__10285_2626_createPR($1, $2, $4, $3, $0, $3d, $3e), $12, $36);
10452
10543
  default: return $49 => Data_Promise_reject('Multiple PRs for the current brach. Harmony only handles 1 PR per branch currently.', $12, $49);
10453
10544
  }
10454
10545
  };
@@ -10457,7 +10548,7 @@ function PullRequest_identifyOrCreatePR($0, $1, $2, $3, $4, $5, $6) {
10457
10548
 
10458
10549
  /* PullRequest.forkedPRs : Maybe GitHubPRState -> Nat -> Nat -> Nat -> () -> Promise Future */
10459
10550
  function PullRequest_forkedPRs($0, $1, $2, $3, $4) {
10460
- return FFI_Concurrency_fork(csegen_72(), Prelude_Types_foldMap_Foldable_List(csegen_49(), $d => $d, {a1: 'pulls --json ', a2: {a1: PullRequest_n__8696_1169_filterString($3, $4, $2, $1, $0), a2: {a1: ' ', a2: {a1: Prelude_Show_show_Show_Nat($1), a2: {a1: ' ', a2: {a1: Prelude_Show_show_Show_Nat($2), a2: {h: 0}}}}}}}));
10551
+ return FFI_Concurrency_fork(csegen_72(), Prelude_Types_foldMap_Foldable_List(csegen_49(), $d => $d, {a1: 'pulls --json ', a2: {a1: PullRequest_n__8801_1169_filterString($3, $4, $2, $1, $0), a2: {a1: ' ', a2: {a1: Prelude_Show_show_Show_Nat($1), a2: {a1: ' ', a2: {a1: Prelude_Show_show_Show_Nat($2), a2: {h: 0}}}}}}}));
10461
10552
  }
10462
10553
 
10463
10554
  /* PullRequest.empty : PRHistory */
@@ -10668,7 +10759,7 @@ function Data_SortedMap_insert($0, $1, $2) {
10668
10759
 
10669
10760
  /* Data.SortedMap.fromList : Ord k => List (k, v) -> SortedMap k v */
10670
10761
  function Data_SortedMap_fromList($0, $1) {
10671
- return Prelude_Basics_flip($4 => $5 => Data_SortedMap_insertFrom(csegen_144(), $4, $5), Data_SortedMap_empty($0), $1);
10762
+ return Prelude_Basics_flip($4 => $5 => Data_SortedMap_insertFrom(csegen_145(), $4, $5), Data_SortedMap_empty($0), $1);
10672
10763
  }
10673
10764
 
10674
10765
  /* Data.SortedMap.empty : Ord k => SortedMap k v */
@@ -10846,7 +10937,7 @@ function Data_Pagination_with__lemma_7043($0, $1, $2, $3, $4) {
10846
10937
 
10847
10938
  /* Data.Pagination.toList */
10848
10939
  function Data_Pagination_toList_Foldable_x28x28x28Paginationx20x24itemsx29x20x24perPagex29x20x24pagex29($0) {
10849
- return Data_Pagination_foldr_Foldable_x28x28x28Paginationx20x24itemsx29x20x24perPagex29x20x24pagex29(csegen_91(), {h: 0}, $0);
10940
+ return Data_Pagination_foldr_Foldable_x28x28x28Paginationx20x24itemsx29x20x24perPagex29x20x24pagex29(csegen_92(), {h: 0}, $0);
10850
10941
  }
10851
10942
 
10852
10943
  /* Data.Pagination.null */
@@ -10864,7 +10955,7 @@ function Data_Pagination_foldr_Foldable_x28x28x28Paginationx20x24itemsx29x20x24p
10864
10955
 
10865
10956
  /* Data.Pagination.foldl */
10866
10957
  function Data_Pagination_foldl_Foldable_x28x28x28Paginationx20x24itemsx29x20x24perPagex29x20x24pagex29($0, $1, $2) {
10867
- return Data_Pagination_foldr_Foldable_x28x28x28Paginationx20x24itemsx29x20x24perPagex29x20x24pagex29($6 => $7 => Prelude_Basics_flip(csegen_92(), $c => Prelude_Basics_flip($0, $6, $c), $7), $13 => $13, $2)($1);
10958
+ return Data_Pagination_foldr_Foldable_x28x28x28Paginationx20x24itemsx29x20x24perPagex29x20x24pagex29($6 => $7 => Prelude_Basics_flip(csegen_93(), $c => Prelude_Basics_flip($0, $6, $c), $7), $13 => $13, $2)($1);
10868
10959
  }
10869
10960
 
10870
10961
  /* Data.Pagination.foldlM */
@@ -11002,7 +11093,7 @@ function Graph_n__6343_6621_header($0, $1, $2, $3, $4, $5) {
11002
11093
  break;
11003
11094
  }
11004
11095
  }
11005
- 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_597()}};
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()}};
11006
11097
  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};
11007
11098
  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};
11008
11099
  const $d = {a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('Weighted review workload.')}, a2: $12};
@@ -11013,7 +11104,7 @@ function Graph_n__6343_6621_header($0, $1, $2, $3, $4, $5) {
11013
11104
 
11014
11105
  /* Graph.5952:6229:header */
11015
11106
  function Graph_n__5952_6229_header($0, $1, $2) {
11016
- 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_597()}}}));
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()}}}));
11017
11108
  }
11018
11109
 
11019
11110
  /* Graph.6343:6620:greenBox */
@@ -11163,9 +11254,9 @@ function Graph_reviewsGraph($0, $1, $2, $3, $4, $5) {
11163
11254
 
11164
11255
  /* Graph.healthGraph : List PullRequest -> String -> String -> Doc AnsiStyle */
11165
11256
  function Graph_healthGraph($0, $1, $2) {
11166
- 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_497(), $6, $7), Data_List_sortBy(csegen_498(), $0));
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));
11167
11258
  const $20 = Prelude_Types_foldr_Foldable_List(xs => m => Prelude_Types_max_Ord_Nat(Data_List1_length(xs), m), 1n, $3);
11168
- 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_616(), $36), a2: $3c => Graph_label_Graphable_x28PRsOnDatex20x24dateTyx29(csegen_616(), $3c), a3: $42 => Graph_score_Graphable_x28PRsOnDatex20x24dateTyx29(csegen_616(), $42), a4: $48 => Graph_detractor_Graphable_x28PRsOnDatex20x24dateTyx29(csegen_616(), $48), a5: $4e => Graph_bonus_Graphable_x28PRsOnDatex20x24dateTyx29(csegen_616(), $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}}}}}});
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}}}}}});
11169
11260
  }
11170
11261
 
11171
11262
  /* Graph.graphOne : Graphable g => Nat -> g -> Doc AnsiStyle */
@@ -11192,7 +11283,7 @@ function AppVersion_printVersion($0) {
11192
11283
 
11193
11284
  /* AppVersion.appVersion : String */
11194
11285
  const AppVersion_appVersion = __lazy(function () {
11195
- return '3.3.0';
11286
+ return '4.0.0';
11196
11287
  });
11197
11288
 
11198
11289