@mattpolzin/harmony 2.5.0 → 2.6.0

This diff represents the content of publicly available package versions that have been released to one of the supported registries. The information contained in this diff is provided for informational purposes only and reflects changes between package versions as they appear in their respective public registries.
Files changed (2) hide show
  1. package/harmony +522 -369
  2. package/package.json +1 -1
package/harmony CHANGED
@@ -261,12 +261,15 @@ const git_git = () =>
261
261
  const idris__git_unpromisify = (promise, onSuccess, onFailure) =>
262
262
  promise.then(r => onSuccess(r)(), e => onFailure(e)())
263
263
 
264
+ // trim a result (second argument) and pass it to the given callback (first argument).
265
+ const idris__git_trim = callback => value => callback(value.trim())
266
+
264
267
  // current branch
265
268
  // @Returns String
266
269
  const git_current_branch = (git, onSuccess, onFailure) =>
267
270
  idris__git_unpromisify(
268
271
  git.raw('branch', '--show-current'),
269
- r => onSuccess(r.trim()),
272
+ idris__git_trim(onSuccess),
270
273
  onFailure
271
274
  )
272
275
 
@@ -286,18 +289,25 @@ const git_push_new_branch = (git, remoteName, branch, onSuccess, onFailure) =>
286
289
  onFailure
287
290
  )
288
291
 
292
+ const git_push = (git, onSuccess, onFailure) =>
293
+ idris__git_unpromisify(
294
+ git.raw('push'),
295
+ r => onSuccess(''),
296
+ onFailure
297
+ )
298
+
289
299
  // remote URI
290
300
  const git_remote_uri = (git, remoteName, onSuccess, onFailure) =>
291
301
  idris__git_unpromisify(
292
302
  git.raw('remote', 'get-url', remoteName),
293
- r => onSuccess(r.trim()),
303
+ idris__git_trim(onSuccess),
294
304
  onFailure
295
305
  )
296
306
 
297
307
  const git_list_remotes = (git, onSuccess, onFailure) =>
298
308
  idris__git_unpromisify(
299
309
  git.raw('remote'),
300
- r => onSuccess(r.trim()),
310
+ idris__git_trim(onSuccess),
301
311
  onFailure
302
312
  )
303
313
 
@@ -310,21 +320,42 @@ const git_remote_tracking_branch = (git, onSuccess, onFailure) =>
310
320
  .then(headRef =>
311
321
  git.raw('for-each-ref', '--format', '%(upstream:short)', `${headRef.trim()}`),
312
322
  onFailure),
313
- r => onSuccess(r.trim()),
323
+ idris__git_trim(onSuccess),
324
+ onFailure
325
+ )
326
+
327
+ const git_uncommitted_changes = (git, onSuccess, onFailure) =>
328
+ idris__git_unpromisify(
329
+ git.raw('diff', '--name-only'),
330
+ idris__git_trim(onSuccess),
331
+ onFailure
332
+ )
333
+
334
+ const git_staged_changes = (git, onSuccess, onFailure) =>
335
+ idris__git_unpromisify(
336
+ git.raw('diff', '--staged', '--name-only'),
337
+ idris__git_trim(onSuccess),
338
+ onFailure
339
+ )
340
+
341
+ const git_unpushed_commits = (git, onSuccess, onFailure) =>
342
+ idris__git_unpromisify(
343
+ git.raw('log', '@{push}..'),
344
+ idris__git_trim(onSuccess),
314
345
  onFailure
315
346
  )
316
347
 
317
348
  const git_user_email = (git, onSuccess, onFailure) =>
318
349
  idris__git_unpromisify(
319
350
  git.raw('config', '--get', 'user.email'),
320
- r => onSuccess(r.trim()),
351
+ idris__git_trim(onSuccess),
321
352
  onFailure
322
353
  )
323
354
 
324
355
  const git_root_dir = (git, onSuccess, onFailure) =>
325
356
  idris__git_unpromisify(
326
357
  git.raw('rev-parse', '--show-toplevel'),
327
- r => onSuccess(r.trim()),
358
+ idris__git_trim(onSuccess),
328
359
  onFailure
329
360
  )
330
361
 
@@ -787,10 +818,14 @@ const FFI_GitHub_prim__createComment = okit_create_comment;
787
818
  const FFI_GitHub_prim__addPullReviewers = okit_add_reviewers;
788
819
  const FFI_GitHub_prim__addLabels = okit_add_labels;
789
820
  const FFI_Git_prim__userEmail = git_user_email;
821
+ const FFI_Git_prim__unpushedCommits = git_unpushed_commits;
822
+ const FFI_Git_prim__uncommittedChanges = git_uncommitted_changes;
823
+ const FFI_Git_prim__stagedChanges = git_staged_changes;
790
824
  const FFI_Git_prim__rootDir = git_root_dir;
791
825
  const FFI_Git_prim__remoteURI = git_remote_uri;
792
826
  const FFI_Git_prim__remoteTrackingBranch = git_remote_tracking_branch;
793
827
  const FFI_Git_prim__pushNewBranch = git_push_new_branch;
828
+ const FFI_Git_prim__push = git_push;
794
829
  const FFI_Git_prim__listRemotes = git_list_remotes;
795
830
  const FFI_Git_prim__git = git_git;
796
831
  const FFI_Git_prim__currentBranch = git_current_branch;
@@ -820,7 +855,7 @@ function x24tcOpt_1($0) {
820
855
  case 0: return {h: 0 /* {TcDone:1} */, a1: $0.a5};
821
856
  default: {
822
857
  const $18 = {a1: $0.a5.a1.a1, a2: $0.a5.a1.a2, a3: $0.a5.a1.a3};
823
- const $1c = Data_List_DeleteBy_deleteByx27($1f => $20 => Prelude_Basics_on($23 => $24 => $0.a1.a1.a1($23)($24), csegen_747(), $1f, $20), $18, $0.a6);
858
+ const $1c = Data_List_DeleteBy_deleteByx27($1f => $20 => Prelude_Basics_on($23 => $24 => $0.a1.a1.a1($23)($24), csegen_773(), $1f, $20), $18, $0.a6);
824
859
  switch($1c.a1.h) {
825
860
  case 0: /* nothing */ {
826
861
  switch($0.a8) {
@@ -835,7 +870,7 @@ function x24tcOpt_1($0) {
835
870
  }
836
871
  default: {
837
872
  const $6b = {a1: $0.a5.a1.a1, a2: $0.a5.a1.a2, a3: $0.a5.a1.a3};
838
- const $6f = Data_List_DeleteBy_deleteByx27($72 => $73 => Prelude_Basics_on($76 => $77 => $0.a1.a1.a1($76)($77), csegen_747(), $72, $73), $6b, $0.a6);
873
+ const $6f = Data_List_DeleteBy_deleteByx27($72 => $73 => Prelude_Basics_on($76 => $77 => $0.a1.a1.a1($76)($77), csegen_773(), $72, $73), $6b, $0.a6);
839
874
  switch($6f.a1.h) {
840
875
  case 0: /* nothing */ {
841
876
  switch($0.a8) {
@@ -860,7 +895,7 @@ function x24tcOpt_1($0) {
860
895
  case 0: return {h: 0 /* {TcDone:1} */, a1: $0.a5};
861
896
  default: {
862
897
  const $c2 = {a1: $0.a5.a1.a1, a2: $0.a5.a1.a2, a3: $0.a5.a1.a3};
863
- const $c6 = Data_List_DeleteBy_deleteByx27($c9 => $ca => Prelude_Basics_on($cd => $ce => $0.a1.a1.a1($cd)($ce), csegen_747(), $c9, $ca), $c2, $0.a6);
898
+ const $c6 = Data_List_DeleteBy_deleteByx27($c9 => $ca => Prelude_Basics_on($cd => $ce => $0.a1.a1.a1($cd)($ce), csegen_773(), $c9, $ca), $c2, $0.a6);
864
899
  switch($c6.a1.h) {
865
900
  case 0: /* nothing */ {
866
901
  switch($0.a8) {
@@ -875,7 +910,7 @@ function x24tcOpt_1($0) {
875
910
  }
876
911
  default: {
877
912
  const $115 = {a1: $0.a5.a1.a1, a2: $0.a5.a1.a2, a3: $0.a5.a1.a3};
878
- const $119 = Data_List_DeleteBy_deleteByx27($11c => $11d => Prelude_Basics_on($120 => $121 => $0.a1.a1.a1($120)($121), csegen_747(), $11c, $11d), $115, $0.a6);
913
+ const $119 = Data_List_DeleteBy_deleteByx27($11c => $11d => Prelude_Basics_on($120 => $121 => $0.a1.a1.a1($120)($121), csegen_773(), $11c, $11d), $115, $0.a6);
879
914
  switch($119.a1.h) {
880
915
  case 0: /* nothing */ {
881
916
  switch($0.a8) {
@@ -2396,124 +2431,139 @@ const csegen_550 = __lazy(function () {
2396
2431
  return {a1: csegen_62()('?'), a2: {h: 0}};
2397
2432
  });
2398
2433
 
2399
- /* {csegen:595} */
2400
- const csegen_595 = __lazy(function () {
2434
+ /* {csegen:591} */
2435
+ const csegen_591 = __lazy(function () {
2401
2436
  return Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(csegen_62()(', '));
2402
2437
  });
2403
2438
 
2404
- /* {csegen:605} */
2405
- const csegen_605 = __lazy(function () {
2439
+ /* {csegen:601} */
2440
+ const csegen_601 = __lazy(function () {
2406
2441
  return {a1: csegen_9(), a2: a => ({h: 0}), a3: a => $4 => $5 => Prelude_Types_x3cx7cx3e_Alternative_Maybe($4, $5)};
2407
2442
  });
2408
2443
 
2409
- /* {csegen:608} */
2410
- const csegen_608 = __lazy(function () {
2444
+ /* {csegen:604} */
2445
+ const csegen_604 = __lazy(function () {
2411
2446
  return csegen_55()($3 => Data_List_sort(csegen_446(), $3));
2412
2447
  });
2413
2448
 
2414
- /* {csegen:609} */
2415
- const csegen_609 = __lazy(function () {
2449
+ /* {csegen:605} */
2450
+ const csegen_605 = __lazy(function () {
2416
2451
  return $0 => FFI_Concurrency_promiseAll(csegen_193(), $0);
2417
2452
  });
2418
2453
 
2419
- /* {csegen:611} */
2420
- const csegen_611 = __lazy(function () {
2454
+ /* {csegen:607} */
2455
+ const csegen_607 = __lazy(function () {
2421
2456
  const $0 = $1 => Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String($1);
2422
2457
  return $4 => $0($4);
2423
2458
  });
2424
2459
 
2425
- /* {csegen:622} */
2426
- const csegen_622 = __lazy(function () {
2460
+ /* {csegen:618} */
2461
+ const csegen_618 = __lazy(function () {
2427
2462
  return csegen_55()($3 => $3.a1);
2428
2463
  });
2429
2464
 
2430
- /* {csegen:624} */
2431
- const csegen_624 = __lazy(function () {
2465
+ /* {csegen:620} */
2466
+ const csegen_620 = __lazy(function () {
2432
2467
  return $0 => $1 => Data_Date_compare_Ord_Date($0, $1);
2433
2468
  });
2434
2469
 
2435
- /* {csegen:625} */
2436
- const csegen_625 = __lazy(function () {
2470
+ /* {csegen:621} */
2471
+ const csegen_621 = __lazy(function () {
2437
2472
  return $0 => $0.a2;
2438
2473
  });
2439
2474
 
2440
- /* {csegen:626} */
2441
- const csegen_626 = __lazy(function () {
2442
- return $0 => $1 => Prelude_Basics_on(csegen_624(), csegen_625(), $0, $1);
2475
+ /* {csegen:622} */
2476
+ const csegen_622 = __lazy(function () {
2477
+ return $0 => $1 => Prelude_Basics_on(csegen_620(), csegen_621(), $0, $1);
2443
2478
  });
2444
2479
 
2445
- /* {csegen:639} */
2446
- const csegen_639 = __lazy(function () {
2480
+ /* {csegen:635} */
2481
+ const csegen_635 = __lazy(function () {
2447
2482
  return $0 => $0.a2;
2448
2483
  });
2449
2484
 
2450
- /* {csegen:646} */
2451
- const csegen_646 = __lazy(function () {
2485
+ /* {csegen:642} */
2486
+ const csegen_642 = __lazy(function () {
2452
2487
  return $0 => $0.a1;
2453
2488
  });
2454
2489
 
2455
- /* {csegen:661} */
2456
- const csegen_661 = __lazy(function () {
2490
+ /* {csegen:657} */
2491
+ const csegen_657 = __lazy(function () {
2457
2492
  return Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(csegen_62()('open:'));
2458
2493
  });
2459
2494
 
2460
- /* {csegen:665} */
2461
- const csegen_665 = __lazy(function () {
2495
+ /* {csegen:661} */
2496
+ const csegen_661 = __lazy(function () {
2462
2497
  return csegen_60()(date => Text_PrettyPrint_Prettyprinter_Doc_indent(2, Text_PrettyPrint_Prettyprinter_Doc_hsep({a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(csegen_62()('earliest:')), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(Data_Date_show_Show_Date(date)), a2: {h: 0}}})));
2463
2498
  });
2464
2499
 
2465
- /* {csegen:667} */
2466
- const csegen_667 = __lazy(function () {
2500
+ /* {csegen:663} */
2501
+ const csegen_663 = __lazy(function () {
2467
2502
  return Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(csegen_62()('closed:'));
2468
2503
  });
2469
2504
 
2470
- /* {csegen:690} */
2471
- const csegen_690 = __lazy(function () {
2505
+ /* {csegen:686} */
2506
+ const csegen_686 = __lazy(function () {
2472
2507
  return csegen_62()('pr_description.tmp.md');
2473
2508
  });
2474
2509
 
2475
- /* {csegen:740} */
2476
- const csegen_740 = __lazy(function () {
2477
- return $0 => $1 => Data_Promise_reject('Multiple PRs for the current brach. Harmony only handles 1 PR per branch currently.', $0, $1);
2510
+ /* {csegen:716} */
2511
+ const csegen_716 = __lazy(function () {
2512
+ return $0 => $1 => Data_Promise_reject(csegen_62()('Not creating a PR (for now)...'), $0, $1);
2478
2513
  });
2479
2514
 
2480
- /* {csegen:747} */
2481
- const csegen_747 = __lazy(function () {
2482
- return $0 => $0.a1;
2515
+ /* {csegen:722} */
2516
+ const csegen_722 = __lazy(function () {
2517
+ return $0 => Util_yesNoPrompt(csegen_94(), csegen_62()('Would you like to continue creating a Pull Request anyway?'));
2518
+ });
2519
+
2520
+ /* {csegen:723} */
2521
+ const csegen_723 = __lazy(function () {
2522
+ return $0 => $1 => Data_Promise_pure_Applicative_Promise(1, $0, $1);
2523
+ });
2524
+
2525
+ /* {csegen:766} */
2526
+ const csegen_766 = __lazy(function () {
2527
+ return $0 => $1 => Data_Promise_reject('Multiple PRs for the current brach. Harmony only handles 1 PR per branch currently.', $0, $1);
2483
2528
  });
2484
2529
 
2485
2530
  /* {csegen:773} */
2486
2531
  const csegen_773 = __lazy(function () {
2532
+ return $0 => $0.a1;
2533
+ });
2534
+
2535
+ /* {csegen:799} */
2536
+ const csegen_799 = __lazy(function () {
2487
2537
  return {a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc()}, a2: {a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc()}, a2: {h: 0}}};
2488
2538
  });
2489
2539
 
2490
- /* {csegen:794} */
2491
- const csegen_794 = __lazy(function () {
2540
+ /* {csegen:820} */
2541
+ const csegen_820 = __lazy(function () {
2492
2542
  return {a1: ann => $1 => Graph_pretty_Pretty_Date($1), a2: ann => $5 => $6 => Graph_prettyPrec_Pretty_Date($5, $6)};
2493
2543
  });
2494
2544
 
2495
- /* {csegen:809} */
2496
- const csegen_809 = __lazy(function () {
2545
+ /* {csegen:835} */
2546
+ const csegen_835 = __lazy(function () {
2497
2547
  return csegen_116()($3 => BashCompletion_hashify(BashCompletion_slugify($3)));
2498
2548
  });
2499
2549
 
2500
- /* {csegen:811} */
2501
- const csegen_811 = __lazy(function () {
2550
+ /* {csegen:837} */
2551
+ const csegen_837 = __lazy(function () {
2502
2552
  return csegen_116()($3 => BashCompletion_slugify($3));
2503
2553
  });
2504
2554
 
2505
- /* {csegen:812} */
2506
- const csegen_812 = __lazy(function () {
2555
+ /* {csegen:838} */
2556
+ const csegen_838 = __lazy(function () {
2507
2557
  return {a1: '--completed', a2: {a1: 'graph', a2: {h: 0}}};
2508
2558
  });
2509
2559
 
2510
- /* {csegen:816} */
2511
- const csegen_816 = __lazy(function () {
2560
+ /* {csegen:842} */
2561
+ const csegen_842 = __lazy(function () {
2512
2562
  return {a1: {a1: '--checkout', a2: {a1: '-c', a2: {a1: '--ignore', a2: {a1: '-i', a2: {h: 0}}}}}};
2513
2563
  });
2514
2564
 
2515
- /* {csegen:818} */
2516
- const csegen_818 = __lazy(function () {
2565
+ /* {csegen:844} */
2566
+ const csegen_844 = __lazy(function () {
2517
2567
  return {a1: {a1: '--completed', a2: {a1: '-c', a2: {h: 0}}}};
2518
2568
  });
2519
2569
 
@@ -2522,18 +2572,18 @@ function prim__sub_Integer($0, $1) {
2522
2572
  return ($0-$1);
2523
2573
  }
2524
2574
 
2525
- /* Main.6976:1348:parsePg */
2526
- function Main_n__6976_1348_parsePg($0, $1, $2, $3, $4, $5, $6) {
2575
+ /* Main.6993:1348:parsePg */
2576
+ function Main_n__6993_1348_parsePg($0, $1, $2, $3, $4, $5, $6) {
2527
2577
  return Data_String_parsePositive(csegen_2(), $6);
2528
2578
  }
2529
2579
 
2530
- /* Main.6976:1347:parseLim */
2531
- function Main_n__6976_1347_parseLim($0, $1, $2, $3, $4, $5) {
2580
+ /* Main.6993:1347:parseLim */
2581
+ function Main_n__6993_1347_parseLim($0, $1, $2, $3, $4, $5) {
2532
2582
  return Prelude_Interfaces_x3cx3dx3c(csegen_14(), x => Data_Fin_natToFin(x, 101n), $e => Data_String_parsePositive(csegen_2(), $e));
2533
2583
  }
2534
2584
 
2535
- /* Main.6837:1149:configuredOpts */
2536
- function Main_n__6837_1149_configuredOpts($0, $1, $2, $3) {
2585
+ /* Main.6854:1149:configuredOpts */
2586
+ function Main_n__6854_1149_configuredOpts($0, $1, $2, $3) {
2537
2587
  const $11 = $12 => {
2538
2588
  switch($12.h) {
2539
2589
  case 1: /* Right */ return $0.a1.a1.a2(undefined)(BashCompletion_opts($12.a1, $3, $2, $1));
@@ -2755,7 +2805,7 @@ function Main_handleAuthenticatedArgs($0, $1, $2, $3) {
2755
2805
  }
2756
2806
  return Prelude_Types_x3ex3ex3d_Monad_Maybe($a7, filter => ({a1: {a1: filter, a2: {a1: $a4.a1, a2: $a4.a2}}}));
2757
2807
  };
2758
- const $84 = Prelude_Types_x3ex3ex3d_Monad_Maybe(Prelude_Types_x3cx2ax3e_Applicative_Maybe(Prelude_Types_x3cx2ax3e_Applicative_Maybe({a1: $8c => $8d => ({a1: $8c, a2: $8d})}, Main_n__6976_1347_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__6976_1348_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)), $a3);
2808
+ const $84 = Prelude_Types_x3ex3ex3d_Monad_Maybe(Prelude_Types_x3cx2ax3e_Applicative_Maybe(Prelude_Types_x3cx2ax3e_Applicative_Maybe({a1: $8c => $8d => ({a1: $8c, a2: $8d})}, Main_n__6993_1347_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__6993_1348_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)), $a3);
2759
2809
  switch($84.h) {
2760
2810
  case undefined: /* just */ return Data_Promise_x3ex3ex3d_Monad_Promise(FFI_GitHub_listPullRequestsJsonStr($2, $0.a2, $0.a3, $84.a1.a1, $84.a1.a2.a1, $84.a1.a2.a2), pullsJsonStr => $c3 => $c4 => $c5 => Data_Promise_liftIO_HasIO_Promise($c8 => Prelude_IO_prim__putStr(pullsJsonStr, $c8), $c3, $c4, $c5));
2761
2811
  case 0: /* nothing */ return csegen_68();
@@ -2961,7 +3011,7 @@ function Main_exitError($0, $1) {
2961
3011
 
2962
3012
  /* Main.bashCompletion : HasIO io => String -> String -> String -> io () */
2963
3013
  function Main_bashCompletion($0, $1, $2, $3) {
2964
- const $4 = Prelude_Types_maybe(() => Main_n__6837_1149_configuredOpts($0, $3, $2, $1), () => $d => $0.a1.a1.a2(undefined)($d), BashCompletion_cmdOpts($1, $2, $3));
3014
+ const $4 = Prelude_Types_maybe(() => Main_n__6854_1149_configuredOpts($0, $3, $2, $1), () => $d => $0.a1.a1.a2(undefined)($d), BashCompletion_cmdOpts($1, $2, $3));
2965
3015
  return $0.a1.a2(undefined)(undefined)($4)($24 => $0.a2(undefined)($2a => Prelude_IO_prim__putStr(Data_String_fastUnlines($24), $2a)));
2966
3016
  }
2967
3017
 
@@ -3996,24 +4046,6 @@ function Prelude_Types_x3ex3d_Ord_Nat($0, $1) {
3996
4046
  return Prelude_EqOrd_x2fx3d_Eq_Ordering(Prelude_EqOrd_compare_Ord_Integer($0, $1), 0);
3997
4047
  }
3998
4048
 
3999
- /* Prelude.Types.== */
4000
- function Prelude_Types_x3dx3d_Eq_x28Maybex20x24ax29($0, $1, $2) {
4001
- switch($1.h) {
4002
- case 0: /* nothing */ {
4003
- switch($2.h) {
4004
- case 0: /* nothing */ return 1;
4005
- case undefined: /* just */ return 0;
4006
- }
4007
- }
4008
- case undefined: /* just */ {
4009
- switch($2.h) {
4010
- case 0: /* nothing */ return 0;
4011
- case undefined: /* just */ return $0.a1($1.a1)($2.a1);
4012
- }
4013
- }
4014
- }
4015
- }
4016
-
4017
4049
  /* Prelude.Types.<|> */
4018
4050
  function Prelude_Types_x3cx7cx3e_Alternative_Maybe($0, $1) {
4019
4051
  switch($0.h) {
@@ -8995,8 +9027,47 @@ function Data_PullRequest_isAuthor($0, $1) {
8995
9027
  return Prelude_EqOrd_x3dx3d_Eq_String($1.a4, $0);
8996
9028
  }
8997
9029
 
9030
+ /* FFI.Git.case block in unpushedCommits */
9031
+ function FFI_Git_case__unpushedCommits_2011($0, $1, $2) {
9032
+ switch($1) {
9033
+ case '': {
9034
+ switch($2.h) {
9035
+ case 0: /* nil */ return {h: 0};
9036
+ default: return {a1: $1};
9037
+ }
9038
+ }
9039
+ default: return {a1: $1};
9040
+ }
9041
+ }
9042
+
9043
+ /* FFI.Git.case block in stagedChanges */
9044
+ function FFI_Git_case__stagedChanges_1948($0, $1, $2) {
9045
+ switch($1) {
9046
+ case '': {
9047
+ switch($2.h) {
9048
+ case 0: /* nil */ return {h: 0};
9049
+ default: return {a1: $1};
9050
+ }
9051
+ }
9052
+ default: return {a1: $1};
9053
+ }
9054
+ }
9055
+
9056
+ /* FFI.Git.case block in uncommittedChanges */
9057
+ function FFI_Git_case__uncommittedChanges_1885($0, $1, $2) {
9058
+ switch($1) {
9059
+ case '': {
9060
+ switch($2.h) {
9061
+ case 0: /* nil */ return {h: 0};
9062
+ default: return {a1: $1};
9063
+ }
9064
+ }
9065
+ default: return {a1: $1};
9066
+ }
9067
+ }
9068
+
8998
9069
  /* FFI.Git.case block in remoteTrackingBranch */
8999
- function FFI_Git_case__remoteTrackingBranch_1782($0, $1, $2) {
9070
+ function FFI_Git_case__remoteTrackingBranch_1822($0, $1, $2) {
9000
9071
  switch($1) {
9001
9072
  case '': {
9002
9073
  switch($2.h) {
@@ -9014,6 +9085,24 @@ function FFI_Git_userEmail($0) {
9014
9085
  return $2 => $3 => FFI_promiseIO($6 => $7 => $8 => FFI_Git_prim__userEmail($1, $6, $7, $8), $2, $3);
9015
9086
  }
9016
9087
 
9088
+ /* FFI.Git.unpushedCommits : Git => Promise (Maybe String) */
9089
+ function FFI_Git_unpushedCommits($0) {
9090
+ const $1 = $0;
9091
+ return Data_Promise_x3ex3ex3d_Monad_Promise($4 => $5 => FFI_promiseIO($8 => $9 => $a => FFI_Git_prim__unpushedCommits($1, $8, $9, $a), $4, $5), str => $13 => $14 => Data_Promise_pure_Applicative_Promise(FFI_Git_case__unpushedCommits_2011($1, str, Data_String_strM(str)), $13, $14));
9092
+ }
9093
+
9094
+ /* FFI.Git.uncommittedChanges : Git => Promise (Maybe String) */
9095
+ function FFI_Git_uncommittedChanges($0) {
9096
+ const $1 = $0;
9097
+ return Data_Promise_x3ex3ex3d_Monad_Promise($4 => $5 => FFI_promiseIO($8 => $9 => $a => FFI_Git_prim__uncommittedChanges($1, $8, $9, $a), $4, $5), str => $13 => $14 => Data_Promise_pure_Applicative_Promise(FFI_Git_case__uncommittedChanges_1885($1, str, Data_String_strM(str)), $13, $14));
9098
+ }
9099
+
9100
+ /* FFI.Git.stagedChanges : Git => Promise (Maybe String) */
9101
+ function FFI_Git_stagedChanges($0) {
9102
+ const $1 = $0;
9103
+ return Data_Promise_x3ex3ex3d_Monad_Promise($4 => $5 => FFI_promiseIO($8 => $9 => $a => FFI_Git_prim__stagedChanges($1, $8, $9, $a), $4, $5), str => $13 => $14 => Data_Promise_pure_Applicative_Promise(FFI_Git_case__stagedChanges_1948($1, str, Data_String_strM(str)), $13, $14));
9104
+ }
9105
+
9017
9106
  /* FFI.Git.rootDir : Git => Promise String */
9018
9107
  function FFI_Git_rootDir($0) {
9019
9108
  const $1 = $0;
@@ -9029,7 +9118,7 @@ function FFI_Git_remoteURI($0, $1) {
9029
9118
  /* FFI.Git.remoteTrackingBranch : Git => Promise (Maybe String) */
9030
9119
  function FFI_Git_remoteTrackingBranch($0) {
9031
9120
  const $1 = $0;
9032
- return Data_Promise_x3ex3ex3d_Monad_Promise($4 => $5 => FFI_promiseIO($8 => $9 => $a => FFI_Git_prim__remoteTrackingBranch($1, $8, $9, $a), $4, $5), str => $13 => $14 => Data_Promise_pure_Applicative_Promise(FFI_Git_case__remoteTrackingBranch_1782($1, str, Data_String_strM(str)), $13, $14));
9121
+ return Data_Promise_x3ex3ex3d_Monad_Promise($4 => $5 => FFI_promiseIO($8 => $9 => $a => FFI_Git_prim__remoteTrackingBranch($1, $8, $9, $a), $4, $5), str => $13 => $14 => Data_Promise_pure_Applicative_Promise(FFI_Git_case__remoteTrackingBranch_1822($1, str, Data_String_strM(str)), $13, $14));
9033
9122
  }
9034
9123
 
9035
9124
  /* FFI.Git.pushNewBranch : Git => String -> String -> Promise () */
@@ -9038,6 +9127,12 @@ function FFI_Git_pushNewBranch($0, $1, $2) {
9038
9127
  return csegen_56()($7 => $8 => FFI_promiseIO($b => $c => $d => FFI_Git_prim__pushNewBranch($3, $1, $2, $b, $c, $d), $7, $8));
9039
9128
  }
9040
9129
 
9130
+ /* FFI.Git.push : Git => Promise () */
9131
+ function FFI_Git_push($0) {
9132
+ const $1 = $0;
9133
+ return csegen_56()($5 => $6 => FFI_promiseIO($9 => $a => $b => FFI_Git_prim__push($1, $9, $a, $b), $5, $6));
9134
+ }
9135
+
9041
9136
  /* FFI.Git.listRemotes : Git => Promise (List String) */
9042
9137
  function FFI_Git_listRemotes($0) {
9043
9138
  const $1 = $0;
@@ -9064,15 +9159,6 @@ function FFI_Git_checkoutBranch($0, $1) {
9064
9159
  return csegen_56()($6 => $7 => FFI_promiseIO($a => $b => $c => FFI_Git_prim__checkoutBranch($2, $1, $a, $b, $c), $6, $7));
9065
9160
  }
9066
9161
 
9067
- /* Config.with block in createConfig,yesUnlessNo */
9068
- function Config_with__createConfigx2cyesUnlessNo_2293($0, $1, $2, $3, $4, $5) {
9069
- switch($5) {
9070
- case 'n': return 0;
9071
- case 'no': return 0;
9072
- default: return 1;
9073
- }
9074
- }
9075
-
9076
9162
  /* Config.with block in getConfig */
9077
9163
  function Config_with__getConfig_2112($0, $1, $2) {
9078
9164
  switch($1.h) {
@@ -9143,38 +9229,33 @@ function Config_case__parseGitHubURIx2cparseSuffix_1508($0, $1, $2) {
9143
9229
  return Prelude_Types_x3ex3ex3d_Monad_Maybe({a1: Data_String_split(csegen_498(), $2.a1)}, $b);
9144
9230
  }
9145
9231
 
9146
- /* Config.7800:2259:yesUnlessNo */
9147
- function Config_n__7800_2259_yesUnlessNo($0, $1, $2, $3, $4) {
9148
- return Config_with__createConfigx2cyesUnlessNo_2293($0, $1, $2, $3, $4, Data_String_toLower($4));
9149
- }
9150
-
9151
- /* Config.7800:2261:repo */
9152
- function Config_n__7800_2261_repo($0, $1, $2, $3) {
9232
+ /* Config.7820:2260:repo */
9233
+ function Config_n__7820_2260_repo($0, $1, $2, $3) {
9153
9234
  return csegen_60()(csegen_499());
9154
9235
  }
9155
9236
 
9156
- /* Config.7052:1487:parseSuffix */
9157
- function Config_n__7052_1487_parseSuffix($0, $1) {
9237
+ /* Config.7072:1487:parseSuffix */
9238
+ function Config_n__7072_1487_parseSuffix($0, $1) {
9158
9239
  return Config_case__parseGitHubURIx2cparseSuffix_1508($0, $1, Data_String_break$($8 => Prelude_EqOrd_x3dx3d_Eq_Char($8, '.'), $1));
9159
9240
  }
9160
9241
 
9161
- /* Config.7052:1489:parseSSH */
9162
- function Config_n__7052_1489_parseSSH($0, $1) {
9163
- return Prelude_Interfaces_x3ex3dx3e(csegen_14(), $6 => Config_dropPrefixx27('git@github.com:', $6), $b => Config_n__7052_1487_parseSuffix($0, $b), $1);
9242
+ /* Config.7072:1489:parseSSH */
9243
+ function Config_n__7072_1489_parseSSH($0, $1) {
9244
+ return Prelude_Interfaces_x3ex3dx3e(csegen_14(), $6 => Config_dropPrefixx27('git@github.com:', $6), $b => Config_n__7072_1487_parseSuffix($0, $b), $1);
9164
9245
  }
9165
9246
 
9166
- /* Config.7052:1488:parseHTTPS */
9167
- function Config_n__7052_1488_parseHTTPS($0, $1) {
9168
- return Prelude_Interfaces_x3ex3dx3e(csegen_14(), $6 => Config_dropPrefixx27('https://github/com/', $6), $b => Config_n__7052_1487_parseSuffix($0, $b), $1);
9247
+ /* Config.7072:1488:parseHTTPS */
9248
+ function Config_n__7072_1488_parseHTTPS($0, $1) {
9249
+ return Prelude_Interfaces_x3ex3dx3e(csegen_14(), $6 => Config_dropPrefixx27('https://github/com/', $6), $b => Config_n__7072_1487_parseSuffix($0, $b), $1);
9169
9250
  }
9170
9251
 
9171
- /* Config.7800:2260:org */
9172
- function Config_n__7800_2260_org($0, $1, $2, $3) {
9252
+ /* Config.7820:2259:org */
9253
+ function Config_n__7820_2259_org($0, $1, $2, $3) {
9173
9254
  return csegen_60()(csegen_504());
9174
9255
  }
9175
9256
 
9176
- /* Config.7800:2258:orIfEmpty */
9177
- function Config_n__7800_2258_orIfEmpty($0, $1, $2, $3, $4, $5) {
9257
+ /* Config.7820:2258:orIfEmpty */
9258
+ function Config_n__7820_2258_orIfEmpty($0, $1, $2, $3, $4, $5) {
9178
9259
  switch($4.h) {
9179
9260
  case 0: /* nothing */ return $5;
9180
9261
  case undefined: /* just */ {
@@ -9186,33 +9267,33 @@ function Config_n__7800_2258_orIfEmpty($0, $1, $2, $3, $4, $5) {
9186
9267
  }
9187
9268
  }
9188
9269
 
9189
- /* Config.6768:1213:oneDayAgo */
9190
- function Config_n__6768_1213_oneDayAgo($0, $1, $2) {
9270
+ /* Config.6788:1213:oneDayAgo */
9271
+ function Config_n__6788_1213_oneDayAgo($0, $1, $2) {
9191
9272
  return $2.a1.a2(undefined)(undefined)(System_time($2))(now => $2.a1.a1.a2(undefined)(csegen_410()((now-86400n))));
9192
9273
  }
9193
9274
 
9194
- /* Config.7704:2152:help */
9195
- function Config_n__7704_2152_help($0, $1) {
9275
+ /* Config.7724:2152:help */
9276
+ function Config_n__7724_2152_help($0, $1) {
9196
9277
  return csegen_506()(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_70(), $15 => $15, {a1: ': ', a2: {a1: (Data_String_replicate(Prelude_Types_prim__integerToNat((Data_Config_longestSettablePropName()-Prelude_Types_String_length($1.a1))), ' ')+$1.a2), a2: {h: 0}}})));
9197
9278
  }
9198
9279
 
9199
- /* Config.7800:2262:enterForDefaultStr */
9200
- function Config_n__7800_2262_enterForDefaultStr($0, $1, $2, $3, $4) {
9280
+ /* Config.7820:2261:enterForDefaultStr */
9281
+ function Config_n__7820_2261_enterForDefaultStr($0, $1, $2, $3, $4) {
9201
9282
  return Prelude_Types_foldMap_Foldable_List(csegen_70(), $9 => $9, {a1: ' (ENTER for default: ', a2: {a1: $4, a2: {a1: ')', a2: {h: 0}}}});
9202
9283
  }
9203
9284
 
9204
- /* Config.7005:1440:drop' */
9205
- function Config_n__7005_1440_dropx27($0, $1) {
9285
+ /* Config.7025:1440:drop' */
9286
+ function Config_n__7025_1440_dropx27($0, $1) {
9206
9287
  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));
9207
9288
  }
9208
9289
 
9209
- /* Config.7800:2263:defaultStr */
9210
- function Config_n__7800_2263_defaultStr($0, $1, $2, $3, $4, $5) {
9211
- return Data_Maybe_fromMaybe(() => '', csegen_60()($d => Config_n__7800_2262_enterForDefaultStr($0, $1, $2, $3, $4($d)))($5));
9290
+ /* Config.7820:2262:defaultStr */
9291
+ function Config_n__7820_2262_defaultStr($0, $1, $2, $3, $4, $5) {
9292
+ return Data_Maybe_fromMaybe(() => '', csegen_60()($d => Config_n__7820_2261_enterForDefaultStr($0, $1, $2, $3, $4($d)))($5));
9212
9293
  }
9213
9294
 
9214
- /* Config.6894:1333:checkAssignSettings */
9215
- function Config_n__6894_1333_checkAssignSettings($0, $1) {
9295
+ /* Config.6914:1333:checkAssignSettings */
9296
+ function Config_n__6914_1333_checkAssignSettings($0, $1) {
9216
9297
  let $2;
9217
9298
  switch($1.a6) {
9218
9299
  case 1: {
@@ -9265,7 +9346,7 @@ function Config_syncIfOld($0, $1) {
9265
9346
  case 0: return $14 => $15 => Data_Promise_pure_Applicative_Promise($1, $14, $15);
9266
9347
  }
9267
9348
  };
9268
- return Data_Promise_x3ex3ex3d_Monad_Promise(Config_n__6768_1213_oneDayAgo($0, $1, csegen_94()), $9);
9349
+ return Data_Promise_x3ex3ex3d_Monad_Promise(Config_n__6788_1213_oneDayAgo($0, $1, csegen_94()), $9);
9269
9350
  }
9270
9351
 
9271
9352
  /* Config.syncConfig : Config => Octokit => Bool -> Promise Config */
@@ -9288,7 +9369,7 @@ function Config_syncConfig($0, $1, $2) {
9288
9369
 
9289
9370
  /* Config.settablePropsWithHelp : Config => String */
9290
9371
  function Config_settablePropsWithHelp($0) {
9291
- return Util_renderString($0, Text_PrettyPrint_Prettyprinter_Doc_vsep(csegen_116()($a => Config_n__7704_2152_help($0, $a))(Data_Config_settablePropNamesAndHelp())));
9372
+ return Util_renderString($0, Text_PrettyPrint_Prettyprinter_Doc_vsep(csegen_116()($a => Config_n__7724_2152_help($0, $a))(Data_Config_settablePropNamesAndHelp())));
9292
9373
  }
9293
9374
 
9294
9375
  /* Config.setConfig : Config => String -> String -> Promise Config */
@@ -9331,7 +9412,7 @@ function Config_preferOriginRemote($0) {
9331
9412
 
9332
9413
  /* Config.parseGitHubURI : String -> Maybe GitRemote */
9333
9414
  function Config_parseGitHubURI($0) {
9334
- return Prelude_Types_x3cx7cx3e_Alternative_Maybe(Config_n__7052_1488_parseHTTPS($0, $0), () => Config_n__7052_1489_parseSSH($0, $0));
9415
+ return Prelude_Types_x3cx7cx3e_Alternative_Maybe(Config_n__7072_1488_parseHTTPS($0, $0), () => Config_n__7072_1489_parseSSH($0, $0));
9335
9416
  }
9336
9417
 
9337
9418
  /* Config.parseBool : String -> Maybe Bool */
@@ -9459,14 +9540,14 @@ function Config_findConfig($0, $1, $2) {
9459
9540
 
9460
9541
  /* Config.dropPrefix' : String -> String -> Maybe String */
9461
9542
  function Config_dropPrefixx27($0, $1) {
9462
- return csegen_60()($6 => Prelude_Types_fastPack($6))(Config_n__7005_1440_dropx27($0, Prelude_Types_fastUnpack($1)));
9543
+ return csegen_60()($6 => Prelude_Types_fastPack($6))(Config_n__7025_1440_dropx27($0, Prelude_Types_fastUnpack($1)));
9463
9544
  }
9464
9545
 
9465
9546
  /* Config.createConfig : Git => Maybe String -> Bool -> Maybe String -> Promise Config */
9466
9547
  function Config_createConfig($0, $1, $2, $3) {
9467
9548
  const $21 = $22 => {
9468
9549
  const $31 = $32 => {
9469
- const $34 = Config_n__7800_2262_enterForDefaultStr($0, $3, $2, $1, 'unset');
9550
+ const $34 = Config_n__7820_2261_enterForDefaultStr($0, $3, $2, $1, 'unset');
9470
9551
  const $33 = () => {
9471
9552
  const $63 = $64 => {
9472
9553
  const $6a = $6b => {
@@ -9483,67 +9564,58 @@ function Config_createConfig($0, $1, $2, $3) {
9483
9564
  case undefined: /* just */ {
9484
9565
  const $8f = remoteGuess => {
9485
9566
  const $a5 = defaultOrgAndRepo => {
9486
- const $a6 = Config_n__7800_2263_defaultStr($0, $3, $2, $1, csegen_504(), defaultOrgAndRepo);
9567
+ const $a6 = Config_n__7820_2262_defaultStr($0, $3, $2, $1, csegen_504(), defaultOrgAndRepo);
9487
9568
  const $d0 = $d1 => {
9488
9569
  const $eb = org => {
9489
- const $ec = Config_n__7800_2263_defaultStr($0, $3, $2, $1, csegen_499(), defaultOrgAndRepo);
9570
+ const $ec = Config_n__7820_2262_defaultStr($0, $3, $2, $1, csegen_499(), defaultOrgAndRepo);
9490
9571
  const $116 = $117 => {
9491
9572
  const $131 = repo => {
9492
- const $132 = Config_n__7800_2262_enterForDefaultStr($0, $3, $2, $1, remoteGuess);
9573
+ const $132 = Config_n__7820_2261_enterForDefaultStr($0, $3, $2, $1, remoteGuess);
9493
9574
  const $15a = $15b => {
9494
9575
  const $170 = defaultRemote => {
9495
- const $182 = $183 => {
9496
- const $195 = commentOnAssign => {
9497
- const $1a7 = $1a8 => {
9498
- const $1ba = assignTeams => {
9499
- const $1cc = $1cd => {
9500
- const $1df = assignUsers => {
9501
- const $1ec = _ => {
9502
- const $200 = $201 => {
9503
- const $208 = mainBranch => {
9504
- const $20c = updatedAt => {
9505
- const $20d = {a1: Prelude_Types_foldMap_Foldable_List(csegen_70(), $213 => $213, {a1: csegen_62()('./'), a2: {a1: csegen_527(), a2: {h: 0}}}), a2: $2, a3: $3};
9506
- const $224 = teamSlugs => {
9507
- const $22b = repoLabels => {
9508
- const $231 = orgMembers => {
9509
- const $232 = {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: csegen_414()(configPAT), a14: $20d};
9510
- return Data_Promise_x3ex3ex3d_Monad_Promise(csegen_56()(Config_writeConfig($232)), $24c => Data_Promise_x3ex3ex3d_Monad_Promise($24f => $250 => $251 => Data_Promise_liftIO_HasIO_Promise($254 => Prelude_IO_prim__putStr((csegen_62()('Your new configuration is:')+'\n'), $254), $24f, $250, $251), $261 => Data_Promise_x3ex3ex3d_Monad_Promise($264 => $265 => $266 => Data_Promise_liftIO_HasIO_Promise($269 => Prelude_IO_prim__putStr((Data_Config_show_Show_Config($232)+'\n'), $269), $264, $265, $266), $275 => Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Types_either(() => $27a => Util_renderIO($232, csegen_94(), $27a), () => csegen_497(), Config_checkConfigConsistency($232)), $286 => $287 => $288 => Data_Promise_pure_Applicative_Promise($232, $287, $288)))));
9511
- };
9512
- return Data_Promise_x3ex3ex3d_Monad_Promise(FFI_GitHub_listOrgMembers(_, org), $231);
9513
- };
9514
- return Data_Promise_x3ex3ex3d_Monad_Promise(FFI_GitHub_listRepoLabels(_, org, repo), $22b);
9515
- };
9516
- return Data_Promise_x3ex3ex3d_Monad_Promise(FFI_GitHub_listTeams(_, org), $224);
9576
+ const $17a = commentOnAssign => {
9577
+ const $184 = assignTeams => {
9578
+ const $18e = assignUsers => {
9579
+ const $19b = _ => {
9580
+ const $1af = $1b0 => {
9581
+ const $1b7 = mainBranch => {
9582
+ const $1bb = updatedAt => {
9583
+ const $1bc = {a1: Prelude_Types_foldMap_Foldable_List(csegen_70(), $1c2 => $1c2, {a1: csegen_62()('./'), a2: {a1: csegen_527(), a2: {h: 0}}}), a2: $2, a3: $3};
9584
+ const $1d3 = teamSlugs => {
9585
+ const $1da = repoLabels => {
9586
+ const $1e0 = orgMembers => {
9587
+ const $1e1 = {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: csegen_414()(configPAT), a14: $1bc};
9588
+ return Data_Promise_x3ex3ex3d_Monad_Promise(csegen_56()(Config_writeConfig($1e1)), $1fb => Data_Promise_x3ex3ex3d_Monad_Promise($1fe => $1ff => $200 => Data_Promise_liftIO_HasIO_Promise($203 => Prelude_IO_prim__putStr((csegen_62()('Your new configuration is:')+'\n'), $203), $1fe, $1ff, $200), $210 => Data_Promise_x3ex3ex3d_Monad_Promise($213 => $214 => $215 => Data_Promise_liftIO_HasIO_Promise($218 => Prelude_IO_prim__putStr((Data_Config_show_Show_Config($1e1)+'\n'), $218), $213, $214, $215), $224 => Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Types_either(() => $229 => Util_renderIO($1e1, csegen_94(), $229), () => csegen_497(), Config_checkConfigConsistency($1e1)), $235 => $236 => $237 => Data_Promise_pure_Applicative_Promise($1e1, $236, $237)))));
9517
9589
  };
9518
- return Data_Promise_x3ex3ex3d_Monad_Promise(csegen_520(), $20c);
9590
+ return Data_Promise_x3ex3ex3d_Monad_Promise(FFI_GitHub_listOrgMembers(_, org), $1e0);
9519
9591
  };
9520
- return Data_Promise_x3ex3ex3d_Monad_Promise(FFI_GitHub_getRepoDefaultBranch(_, org, repo), $208);
9592
+ return Data_Promise_x3ex3ex3d_Monad_Promise(FFI_GitHub_listRepoLabels(_, org, repo), $1da);
9521
9593
  };
9522
- return Data_Promise_x3ex3ex3d_Monad_Promise($1ef => $1f0 => $1f1 => Data_Promise_liftIO_HasIO_Promise($1f4 => Prelude_IO_prim__putStr((csegen_62()('Creating config...')+'\n'), $1f4), $1ef, $1f0, $1f1), $200);
9594
+ return Data_Promise_x3ex3ex3d_Monad_Promise(FFI_GitHub_listTeams(_, org), $1d3);
9523
9595
  };
9524
- return Data_Promise_x3ex3ex3d_Monad_Promise($1e2 => $1e3 => $1e4 => Data_Promise_liftIO_HasIO_Promise(FFI_GitHub_octokit($81.a1), $1e2, $1e3, $1e4), $1ec);
9596
+ return Data_Promise_x3ex3ex3d_Monad_Promise(csegen_520(), $1bb);
9525
9597
  };
9526
- return Data_Promise_x3ex3ex3d_Monad_Promise(csegen_55()($1d4 => Config_n__7800_2259_yesUnlessNo($0, $3, $2, $1, Data_String_trim($1d4)))(csegen_543()), $1df);
9598
+ return Data_Promise_x3ex3ex3d_Monad_Promise(FFI_GitHub_getRepoDefaultBranch(_, org, repo), $1b7);
9527
9599
  };
9528
- return Data_Promise_x3ex3ex3d_Monad_Promise($1bd => $1be => $1bf => Data_Promise_liftIO_HasIO_Promise($1c2 => Prelude_IO_prim__putStr(csegen_62()('Would you like harmony to assign individual users when it assigns reviewers? [Y/n] '), $1c2), $1bd, $1be, $1bf), $1cc);
9600
+ return Data_Promise_x3ex3ex3d_Monad_Promise($19e => $19f => $1a0 => Data_Promise_liftIO_HasIO_Promise($1a3 => Prelude_IO_prim__putStr((csegen_62()('Creating config...')+'\n'), $1a3), $19e, $19f, $1a0), $1af);
9529
9601
  };
9530
- return Data_Promise_x3ex3ex3d_Monad_Promise(csegen_55()($1af => Config_n__7800_2259_yesUnlessNo($0, $3, $2, $1, Data_String_trim($1af)))(csegen_543()), $1ba);
9602
+ return Data_Promise_x3ex3ex3d_Monad_Promise($191 => $192 => $193 => Data_Promise_liftIO_HasIO_Promise(FFI_GitHub_octokit($81.a1), $191, $192, $193), $19b);
9531
9603
  };
9532
- return Data_Promise_x3ex3ex3d_Monad_Promise($198 => $199 => $19a => Data_Promise_liftIO_HasIO_Promise($19d => Prelude_IO_prim__putStr(csegen_62()('Would you like harmony to assign teams when it assigns reviewers? [Y/n] '), $19d), $198, $199, $19a), $1a7);
9604
+ return Data_Promise_x3ex3ex3d_Monad_Promise(Util_yesNoPrompt(csegen_94(), csegen_62()('Would you like harmony to assign individual users when it assigns reviewers?')), $18e);
9533
9605
  };
9534
- return Data_Promise_x3ex3ex3d_Monad_Promise(csegen_55()($18a => Config_n__7800_2259_yesUnlessNo($0, $3, $2, $1, Data_String_trim($18a)))(csegen_543()), $195);
9606
+ return Data_Promise_x3ex3ex3d_Monad_Promise(Util_yesNoPrompt(csegen_94(), csegen_62()('Would you like harmony to assign teams when it assigns reviewers?')), $184);
9535
9607
  };
9536
- return Data_Promise_x3ex3ex3d_Monad_Promise($173 => $174 => $175 => Data_Promise_liftIO_HasIO_Promise($178 => Prelude_IO_prim__putStr(csegen_62()('Would you like harmony to comment when it assigns reviewers? [Y/n] '), $178), $173, $174, $175), $182);
9608
+ return Data_Promise_x3ex3ex3d_Monad_Promise(Util_yesNoPrompt(csegen_94(), csegen_62()('Would you like harmony to comment when it assigns reviewers?')), $17a);
9537
9609
  };
9538
- return Data_Promise_x3ex3ex3d_Monad_Promise(csegen_55()($162 => ({a1: Config_n__7800_2258_orIfEmpty($0, $3, $2, $1, {a1: remoteGuess}, Data_String_trim($162))}))(csegen_543()), $170);
9610
+ return Data_Promise_x3ex3ex3d_Monad_Promise(csegen_55()($162 => ({a1: Config_n__7820_2258_orIfEmpty($0, $3, $2, $1, {a1: remoteGuess}, Data_String_trim($162))}))(csegen_543()), $170);
9539
9611
  };
9540
9612
  return Data_Promise_x3ex3ex3d_Monad_Promise($13b => $13c => $13d => Data_Promise_liftIO_HasIO_Promise($140 => Prelude_IO_prim__putStr((Prelude_Types_foldMap_Foldable_List(csegen_70(), $148 => $148, {a1: csegen_62()('What GitHub remote repo would you like to use harmony for'), a2: {a1: csegen_62()($132), a2: csegen_550()}})+'\n'), $140), $13b, $13c, $13d), $15a);
9541
9613
  };
9542
- return Data_Promise_x3ex3ex3d_Monad_Promise(csegen_55()($11e => Config_n__7800_2258_orIfEmpty($0, $3, $2, $1, Config_n__7800_2261_repo($0, $3, $2, $1)(defaultOrgAndRepo), Data_String_trim($11e)))(csegen_543()), $131);
9614
+ return Data_Promise_x3ex3ex3d_Monad_Promise(csegen_55()($11e => Config_n__7820_2258_orIfEmpty($0, $3, $2, $1, Config_n__7820_2260_repo($0, $3, $2, $1)(defaultOrgAndRepo), Data_String_trim($11e)))(csegen_543()), $131);
9543
9615
  };
9544
9616
  return Data_Promise_x3ex3ex3d_Monad_Promise($f7 => $f8 => $f9 => Data_Promise_liftIO_HasIO_Promise($fc => Prelude_IO_prim__putStr((Prelude_Types_foldMap_Foldable_List(csegen_70(), $104 => $104, {a1: csegen_62()('What repository would you like to use harmony for'), a2: {a1: csegen_62()($ec), a2: csegen_550()}})+'\n'), $fc), $f7, $f8, $f9), $116);
9545
9617
  };
9546
- return Data_Promise_x3ex3ex3d_Monad_Promise(csegen_55()($d8 => Config_n__7800_2258_orIfEmpty($0, $3, $2, $1, Config_n__7800_2260_org($0, $3, $2, $1)(defaultOrgAndRepo), Data_String_trim($d8)))(csegen_543()), $eb);
9618
+ return Data_Promise_x3ex3ex3d_Monad_Promise(csegen_55()($d8 => Config_n__7820_2258_orIfEmpty($0, $3, $2, $1, Config_n__7820_2259_org($0, $3, $2, $1)(defaultOrgAndRepo), Data_String_trim($d8)))(csegen_543()), $eb);
9547
9619
  };
9548
9620
  return Data_Promise_x3ex3ex3d_Monad_Promise($b1 => $b2 => $b3 => Data_Promise_liftIO_HasIO_Promise($b6 => Prelude_IO_prim__putStr((Prelude_Types_foldMap_Foldable_List(csegen_70(), $be => $be, {a1: csegen_62()('What GitHub org would you like to use harmony for'), a2: {a1: csegen_62()($a6), a2: csegen_550()}})+'\n'), $b6), $b1, $b2, $b3), $d0);
9549
9621
  };
@@ -9551,7 +9623,7 @@ function Config_createConfig($0, $1, $2, $3) {
9551
9623
  };
9552
9624
  return Data_Promise_x3ex3ex3d_Monad_Promise(csegen_55()($89 => Config_preferOriginRemote($89))(FFI_Git_listRemotes($0)), $8f);
9553
9625
  }
9554
- default: return $28d => $28e => Data_Promise_reject('Either the GITHUB_PAT environment variable or githubPAT config property must be set to a personal access token.', $28d, $28e);
9626
+ default: return $23c => $23d => Data_Promise_reject('Either the GITHUB_PAT environment variable or githubPAT config property must be set to a personal access token.', $23c, $23d);
9555
9627
  }
9556
9628
  };
9557
9629
  return Data_Promise_x3ex3ex3d_Monad_Promise($77 => $78 => Data_Promise_pure_Applicative_Promise(Prelude_Types_x3cx7cx3e_Alternative_Maybe($1, () => configPAT), $77, $78), $80);
@@ -9569,7 +9641,7 @@ function Config_createConfig($0, $1, $2, $3) {
9569
9641
 
9570
9642
  /* Config.checkConfigConsistency : Config -> Either (Doc AnsiStyle) () */
9571
9643
  function Config_checkConfigConsistency($0) {
9572
- return Config_n__6894_1333_checkAssignSettings($0, $0);
9644
+ return Config_n__6914_1333_checkAssignSettings($0, $0);
9573
9645
  }
9574
9646
 
9575
9647
  /* Config.addIgnoredPRs : Config -> List Integer -> Promise Config */
@@ -9577,13 +9649,27 @@ function Config_addIgnoredPRs($0, $1) {
9577
9649
  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_450(), Prelude_Types_List_tailRecAppend($0.a12, $1)), a13: $0.a13, a14: $0.a14});
9578
9650
  }
9579
9651
 
9580
- /* Util.4987:1271:startOver */
9581
- const Util_n__4987_1271_startOver = __lazy(function () {
9652
+ /* Util.with block in yesNoPrompt,yesUnlessNo */
9653
+ function Util_with__yesNoPromptx2cyesUnlessNo_1292($0, $1, $2, $3, $4) {
9654
+ switch($4) {
9655
+ case 'n': return 0;
9656
+ case 'no': return 0;
9657
+ default: return 1;
9658
+ }
9659
+ }
9660
+
9661
+ /* Util.5012:1284:yesUnlessNo */
9662
+ function Util_n__5012_1284_yesUnlessNo($0, $1, $2) {
9663
+ return Util_with__yesNoPromptx2cyesUnlessNo_1292(undefined, $0, $1, $2, Data_String_toLower($2));
9664
+ }
9665
+
9666
+ /* Util.5115:1389:startOver */
9667
+ const Util_n__5115_1389_startOver = __lazy(function () {
9582
9668
  return {a1: 0, a2: {h: 0}};
9583
9669
  });
9584
9670
 
9585
- /* Util.4987:1272:guardSuccess */
9586
- function Util_n__4987_1272_guardSuccess($0) {
9671
+ /* Util.5115:1390:guardSuccess */
9672
+ function Util_n__5115_1390_guardSuccess($0) {
9587
9673
  switch($0.h) {
9588
9674
  case undefined: /* cons */ {
9589
9675
  switch($0.a1) {
@@ -9596,13 +9682,13 @@ function Util_n__4987_1272_guardSuccess($0) {
9596
9682
  }
9597
9683
  }
9598
9684
 
9599
- /* Util.4987:1273:go */
9600
- function Util_n__4987_1273_go($0, $1) {
9685
+ /* Util.5115:1391:go */
9686
+ function Util_n__5115_1391_go($0, $1) {
9601
9687
  switch($0.a1) {
9602
9688
  case 0: {
9603
9689
  switch(Prelude_Types_isAlpha($1)) {
9604
9690
  case 1: return {a1: 1, a2: {a1: $1, a2: $0.a2}};
9605
- case 0: return Util_n__4987_1271_startOver();
9691
+ case 0: return Util_n__5115_1389_startOver();
9606
9692
  }
9607
9693
  }
9608
9694
  case 1: {
@@ -9611,7 +9697,7 @@ function Util_n__4987_1273_go($0, $1) {
9611
9697
  default: {
9612
9698
  switch(Prelude_Types_isAlpha($1)) {
9613
9699
  case 1: return {a1: 1, a2: {a1: $1, a2: $0.a2}};
9614
- case 0: return Util_n__4987_1271_startOver();
9700
+ case 0: return Util_n__5115_1389_startOver();
9615
9701
  }
9616
9702
  }
9617
9703
  }
@@ -9619,7 +9705,7 @@ function Util_n__4987_1273_go($0, $1) {
9619
9705
  case 2: {
9620
9706
  switch(Prelude_Types_isDigit($1)) {
9621
9707
  case 1: return {a1: 3, a2: {a1: $1, a2: $0.a2}};
9622
- case 0: return Util_n__4987_1271_startOver();
9708
+ case 0: return Util_n__5115_1389_startOver();
9623
9709
  }
9624
9710
  }
9625
9711
  case 3: {
@@ -9632,8 +9718,8 @@ function Util_n__4987_1273_go($0, $1) {
9632
9718
  }
9633
9719
  }
9634
9720
 
9635
- /* Util.4841:1128:getMoreLines */
9636
- function Util_n__4841_1128_getMoreLines($0, $1, $2) {
9721
+ /* Util.4899:1172:getMoreLines */
9722
+ function Util_n__4899_1172_getMoreLines($0, $1, $2) {
9637
9723
  switch($2.h) {
9638
9724
  case 0: /* nothing */ return $0.a1.a1.a2(undefined)(Prelude_Types_List_reverse($1));
9639
9725
  case undefined: /* just */ {
@@ -9649,13 +9735,13 @@ function Util_n__4841_1128_getMoreLines($0, $1, $2) {
9649
9735
  case '': {
9650
9736
  switch(line) {
9651
9737
  case '': return $0.a1.a1.a2(undefined)(Prelude_Types_List_reverse($1.a2));
9652
- default: return Util_n__4841_1128_getMoreLines($0, {a1: line, a2: $1}, $2.a1());
9738
+ default: return Util_n__4899_1172_getMoreLines($0, {a1: line, a2: $1}, $2.a1());
9653
9739
  }
9654
9740
  }
9655
- default: return Util_n__4841_1128_getMoreLines($0, {a1: line, a2: $1}, $2.a1());
9741
+ default: return Util_n__4899_1172_getMoreLines($0, {a1: line, a2: $1}, $2.a1());
9656
9742
  }
9657
9743
  }
9658
- default: return Util_n__4841_1128_getMoreLines($0, {a1: line, a2: $1}, $2.a1());
9744
+ default: return Util_n__4899_1172_getMoreLines($0, {a1: line, a2: $1}, $2.a1());
9659
9745
  }
9660
9746
  };
9661
9747
  return $f($33);
@@ -9663,6 +9749,25 @@ function Util_n__4841_1128_getMoreLines($0, $1, $2) {
9663
9749
  }
9664
9750
  }
9665
9751
 
9752
+ /* Util.yesNoPrompt : HasIO io => String -> io Bool */
9753
+ function Util_yesNoPrompt($0, $1) {
9754
+ const $1e = $1f => {
9755
+ const $22 = $0.a1.a1.a1;
9756
+ const $21 = $26 => $27 => $22(undefined)(undefined)($26)($27);
9757
+ const $20 = $21($31 => Util_n__5012_1284_yesUnlessNo($0, $1, Data_String_trim($31)));
9758
+ return $20($0.a2(undefined)($3e => Prelude_IO_prim__getStr($3e)));
9759
+ };
9760
+ return $0.a1.a2(undefined)(undefined)($0.a2(undefined)($10 => Prelude_IO_prim__putStr(Prelude_Types_foldMap_Foldable_List(csegen_70(), $17 => $17, {a1: $1, a2: {a1: ' [Y/n] ', a2: {h: 0}}}), $10)))($1e);
9761
+ }
9762
+
9763
+ /* Util.whenNothing : Applicative f => Maybe a -> f () -> f () */
9764
+ function Util_whenNothing($0, $1, $2) {
9765
+ switch($1.h) {
9766
+ case 0: /* nothing */ return $2;
9767
+ case undefined: /* just */ return $0.a2(undefined)(undefined);
9768
+ }
9769
+ }
9770
+
9666
9771
  /* Util.renderString : Config => Doc AnsiStyle -> String */
9667
9772
  function Util_renderString($0, $1) {
9668
9773
  let $8;
@@ -9706,12 +9811,12 @@ function Util_relativeToRoot($0, $1) {
9706
9811
 
9707
9812
  /* Util.parseJiraPrefix : String -> Maybe String */
9708
9813
  function Util_parseJiraPrefix($0) {
9709
- return csegen_60()($5 => Prelude_Types_fastPack(Prelude_Types_List_reverse($5)))(Util_n__4987_1272_guardSuccess(Prelude_Types_foldl_Foldable_List($f => $10 => Util_n__4987_1273_go($f, $10), Util_n__4987_1271_startOver(), Prelude_Types_fastUnpack($0))));
9814
+ return csegen_60()($5 => Prelude_Types_fastPack(Prelude_Types_List_reverse($5)))(Util_n__5115_1390_guardSuccess(Prelude_Types_foldl_Foldable_List($f => $10 => Util_n__5115_1391_go($f, $10), Util_n__5115_1389_startOver(), Prelude_Types_fastUnpack($0))));
9710
9815
  }
9711
9816
 
9712
9817
  /* Util.getManyLines : HasIO io => Fuel -> io (List String) */
9713
9818
  function Util_getManyLines($0, $1) {
9714
- return Util_n__4841_1128_getMoreLines($0, {h: 0}, $1);
9819
+ return Util_n__4899_1172_getMoreLines($0, {h: 0}, $1);
9715
9820
  }
9716
9821
 
9717
9822
  /* Data.List.PrefixSuffix.with block in with block in dropPrefix */
@@ -9795,15 +9900,15 @@ function Commands_case__casex20blockx20inx20graph_2168($0, $1, $2, $3, $4, $5, $
9795
9900
  let $a;
9796
9901
  switch(Data_Maybe_isJust($3)) {
9797
9902
  case 1: {
9798
- $a = PullRequest_countReviewsByEachUser($2, $0)(PullRequest_combined($6));
9903
+ $a = csegen_55()($12 => ({a1: $12}))(PullRequest_countReviewsByEachUser($2, $0)(PullRequest_combined($6)));
9799
9904
  break;
9800
9905
  }
9801
9906
  case 0: {
9802
- $a = $15 => $16 => Data_Promise_pure_Applicative_Promise(Data_SortedMap_empty(csegen_446()), $15, $16);
9907
+ $a = csegen_547();
9803
9908
  break;
9804
9909
  }
9805
9910
  }
9806
- return Data_Promise_x3ex3ex3d_Monad_Promise($a, completedReviews => Util_renderIO($2, csegen_94(), Graph_reviewsGraph(csegen_446(), {a1: ann => $29 => Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String($29), a2: ann => $2d => $2e => Text_PrettyPrint_Prettyprinter_Doc_prettyPrec_Pretty_String($2d, $2e)}, $7.a2, $7.a1, $5, {a1: completedReviews})));
9911
+ return Data_Promise_x3ex3ex3d_Monad_Promise($a, completedReviews => Util_renderIO($2, csegen_94(), Graph_reviewsGraph(csegen_446(), {a1: ann => $28 => Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String($28), a2: ann => $2c => $2d => Text_PrettyPrint_Prettyprinter_Doc_prettyPrec_Pretty_String($2c, $2d)}, $7.a2, $7.a1, $5, completedReviews)));
9807
9912
  }
9808
9913
 
9809
9914
  /* Commands.case block in graph */
@@ -9874,8 +9979,8 @@ function Commands_case__assignx2cpartitionedArgs_1663($0, $1, $2, $3, $4, $5) {
9874
9979
  return Commands_case__casex20blockx20inx20assignx2cpartitionedArgs_1686($0, $1, $2, $3, $4, $5.a1, $5.a2, Data_List_partition($12 => BashCompletion_isHashPrefix($12), $5.a2));
9875
9980
  }
9876
9981
 
9877
- /* Commands.8521:2510:recombineIgnoreArgs */
9878
- function Commands_n__8521_2510_recombineIgnoreArgs($0, $1) {
9982
+ /* Commands.8542:2510:recombineIgnoreArgs */
9983
+ function Commands_n__8542_2510_recombineIgnoreArgs($0, $1) {
9879
9984
  switch($1.h) {
9880
9985
  case 0: /* nil */ return {a1: {h: 0}, a2: {h: 0}};
9881
9986
  case undefined: /* cons */ {
@@ -9884,20 +9989,20 @@ function Commands_n__8521_2510_recombineIgnoreArgs($0, $1) {
9884
9989
  switch($1.a2.h) {
9885
9990
  case 0: /* nil */ return {a1: {h: 0}, a2: {a1: '-i', a2: {h: 0}}};
9886
9991
  case undefined: /* cons */ {
9887
- const $b = Commands_n__8521_2509_parseIgnoreOpt($0, $1.a2.a1);
9992
+ const $b = Commands_n__8542_2509_parseIgnoreOpt($0, $1.a2.a1);
9888
9993
  switch($b.h) {
9889
9994
  case undefined: /* just */ {
9890
- const $f = Commands_n__8521_2510_recombineIgnoreArgs($0, $1.a2.a2);
9995
+ const $f = Commands_n__8542_2510_recombineIgnoreArgs($0, $1.a2.a2);
9891
9996
  return {a1: {a1: $b.a1, a2: $f.a1}, a2: $f.a2};
9892
9997
  }
9893
9998
  case 0: /* nothing */ {
9894
- const $17 = Commands_n__8521_2510_recombineIgnoreArgs($0, $1.a2.a2);
9999
+ const $17 = Commands_n__8542_2510_recombineIgnoreArgs($0, $1.a2.a2);
9895
10000
  return {a1: $17.a1, a2: {a1: '-i', a2: {a1: $1.a2.a1, a2: $17.a2}}};
9896
10001
  }
9897
10002
  }
9898
10003
  }
9899
10004
  default: {
9900
- const $21 = Commands_n__8521_2510_recombineIgnoreArgs($0, $1.a2);
10005
+ const $21 = Commands_n__8542_2510_recombineIgnoreArgs($0, $1.a2);
9901
10006
  return {a1: $21.a1, a2: {a1: $1.a1, a2: $21.a2}};
9902
10007
  }
9903
10008
  }
@@ -9906,26 +10011,26 @@ function Commands_n__8521_2510_recombineIgnoreArgs($0, $1) {
9906
10011
  switch($1.a2.h) {
9907
10012
  case 0: /* nil */ return {a1: {h: 0}, a2: {a1: '--ignore', a2: {h: 0}}};
9908
10013
  case undefined: /* cons */ {
9909
- const $2e = Commands_n__8521_2509_parseIgnoreOpt($0, $1.a2.a1);
10014
+ const $2e = Commands_n__8542_2509_parseIgnoreOpt($0, $1.a2.a1);
9910
10015
  switch($2e.h) {
9911
10016
  case undefined: /* just */ {
9912
- const $32 = Commands_n__8521_2510_recombineIgnoreArgs($0, $1.a2.a2);
10017
+ const $32 = Commands_n__8542_2510_recombineIgnoreArgs($0, $1.a2.a2);
9913
10018
  return {a1: {a1: $2e.a1, a2: $32.a1}, a2: $32.a2};
9914
10019
  }
9915
10020
  case 0: /* nothing */ {
9916
- const $3a = Commands_n__8521_2510_recombineIgnoreArgs($0, $1.a2.a2);
10021
+ const $3a = Commands_n__8542_2510_recombineIgnoreArgs($0, $1.a2.a2);
9917
10022
  return {a1: $3a.a1, a2: {a1: '--ignore', a2: {a1: $1.a2.a1, a2: $3a.a2}}};
9918
10023
  }
9919
10024
  }
9920
10025
  }
9921
10026
  default: {
9922
- const $44 = Commands_n__8521_2510_recombineIgnoreArgs($0, $1.a2);
10027
+ const $44 = Commands_n__8542_2510_recombineIgnoreArgs($0, $1.a2);
9923
10028
  return {a1: $44.a1, a2: {a1: $1.a1, a2: $44.a2}};
9924
10029
  }
9925
10030
  }
9926
10031
  }
9927
10032
  default: {
9928
- const $4c = Commands_n__8521_2510_recombineIgnoreArgs($0, $1.a2);
10033
+ const $4c = Commands_n__8542_2510_recombineIgnoreArgs($0, $1.a2);
9929
10034
  return {a1: $4c.a1, a2: {a1: $1.a1, a2: $4c.a2}};
9930
10035
  }
9931
10036
  }
@@ -9933,33 +10038,33 @@ function Commands_n__8521_2510_recombineIgnoreArgs($0, $1) {
9933
10038
  }
9934
10039
  }
9935
10040
 
9936
- /* Commands.7913:1922:putNameLn */
9937
- function Commands_n__7913_1922_putNameLn($0, $1, $2, $3) {
10041
+ /* Commands.7935:1922:putNameLn */
10042
+ function Commands_n__7935_1922_putNameLn($0, $1, $2, $3) {
9938
10043
  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}}}});
9939
10044
  }
9940
10045
 
9941
- /* Commands.7234:1299:putLabels */
9942
- function Commands_n__7234_1299_putLabels($0, $1, $2, $3, $4) {
9943
- return Text_PrettyPrint_Prettyprinter_Doc_hcat(Data_List_intersperse(csegen_595(), csegen_116()($f => Commands_n__7234_1298_putLabel($0, $1, $2, $3, $f))($4)));
10046
+ /* Commands.7256:1299:putLabels */
10047
+ function Commands_n__7256_1299_putLabels($0, $1, $2, $3, $4) {
10048
+ return Text_PrettyPrint_Prettyprinter_Doc_hcat(Data_List_intersperse(csegen_591(), csegen_116()($f => Commands_n__7256_1298_putLabel($0, $1, $2, $3, $f))($4)));
9944
10049
  }
9945
10050
 
9946
- /* Commands.7234:1298:putLabel */
9947
- function Commands_n__7234_1298_putLabel($0, $1, $2, $3, $4) {
10051
+ /* Commands.7256:1298:putLabel */
10052
+ function Commands_n__7256_1298_putLabel($0, $1, $2, $3, $4) {
9948
10053
  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)));
9949
10054
  }
9950
10055
 
9951
- /* Commands.7589:1651:partitionedArgs */
9952
- function Commands_n__7589_1651_partitionedArgs($0, $1, $2, $3, $4) {
10056
+ /* Commands.7611:1651:partitionedArgs */
10057
+ function Commands_n__7611_1651_partitionedArgs($0, $1, $2, $3, $4) {
9953
10058
  return Commands_case__assignx2cpartitionedArgs_1663($0, $1, $2, $3, $4, Data_List_partition($e => Data_String_isPrefixOf('+', $e), $4));
9954
10059
  }
9955
10060
 
9956
- /* Commands.8363:2373:parseTeamArg */
9957
- function Commands_n__8363_2373_parseTeamArg($0, $1) {
10061
+ /* Commands.8384:2373:parseTeamArg */
10062
+ function Commands_n__8384_2373_parseTeamArg($0, $1) {
9958
10063
  return {a1: {a1: $1}};
9959
10064
  }
9960
10065
 
9961
- /* Commands.8521:2508:parseSkipArg */
9962
- function Commands_n__8521_2508_parseSkipArg($0, $1) {
10066
+ /* Commands.8542:2508:parseSkipArg */
10067
+ function Commands_n__8542_2508_parseSkipArg($0, $1) {
9963
10068
  const $2 = Prelude_Types_fastUnpack($1);
9964
10069
  switch($2.h) {
9965
10070
  case undefined: /* cons */ {
@@ -9981,15 +10086,15 @@ function Commands_n__8521_2508_parseSkipArg($0, $1) {
9981
10086
  }
9982
10087
  }
9983
10088
 
9984
- /* Commands.8521:2509:parseIgnoreOpt */
9985
- function Commands_n__8521_2509_parseIgnoreOpt($0, $1) {
10089
+ /* Commands.8542:2509:parseIgnoreOpt */
10090
+ function Commands_n__8542_2509_parseIgnoreOpt($0, $1) {
9986
10091
  const $2 = Data_String_split(csegen_498(), $1);
9987
10092
  const $7 = Data_List1_last($2);
9988
10093
  return csegen_414()(Data_String_parsePositive(csegen_2(), $7));
9989
10094
  }
9990
10095
 
9991
- /* Commands.8363:2372:parseCompletedFlag */
9992
- function Commands_n__8363_2372_parseCompletedFlag($0, $1) {
10096
+ /* Commands.8384:2372:parseCompletedFlag */
10097
+ function Commands_n__8384_2372_parseCompletedFlag($0, $1) {
9993
10098
  switch($1) {
9994
10099
  case '-c': return {a1: {h: 0}};
9995
10100
  case '--completed': return {a1: {h: 0}};
@@ -9997,8 +10102,8 @@ function Commands_n__8363_2372_parseCompletedFlag($0, $1) {
9997
10102
  }
9998
10103
  }
9999
10104
 
10000
- /* Commands.8521:2507:parseCheckoutFlag */
10001
- function Commands_n__8521_2507_parseCheckoutFlag($0, $1) {
10105
+ /* Commands.8542:2507:parseCheckoutFlag */
10106
+ function Commands_n__8542_2507_parseCheckoutFlag($0, $1) {
10002
10107
  switch($1) {
10003
10108
  case '-c': return {a1: {h: 0 /* Checkout */}};
10004
10109
  case '--checkout': return {a1: {h: 0 /* Checkout */}};
@@ -10006,13 +10111,13 @@ function Commands_n__8521_2507_parseCheckoutFlag($0, $1) {
10006
10111
  }
10007
10112
  }
10008
10113
 
10009
- /* Commands.8850:2845:isNotIgnored */
10010
- function Commands_n__8850_2845_isNotIgnored($0, $1, $2, $3, $4, $5) {
10114
+ /* Commands.8871:2845:isNotIgnored */
10115
+ function Commands_n__8871_2845_isNotIgnored($0, $1, $2, $3, $4, $5) {
10011
10116
  return Data_Maybe_isNothing(Data_List_find($a => Prelude_EqOrd_x3dx3d_Eq_Integer($a, $5.a1), $4.a12));
10012
10117
  }
10013
10118
 
10014
- /* Commands.7913:1921:forkedUser */
10015
- function Commands_n__7913_1921_forkedUser($0, $1, $2, $3) {
10119
+ /* Commands.7935:1921:forkedUser */
10120
+ function Commands_n__7935_1921_forkedUser($0, $1, $2, $3) {
10016
10121
  return FFI_Concurrency_fork(csegen_94(), ('user --json '+$3));
10017
10122
  }
10018
10123
 
@@ -10100,7 +10205,7 @@ function Commands_parseGraphArgs($0) {
10100
10205
  switch($0.a2.a2.h) {
10101
10206
  case undefined: /* cons */ return {h: 0 /* Left */, a1: 'graph accepts at most one team name and the --completed flag.'};
10102
10207
  default: {
10103
- const $6 = Prelude_Types_traverse_Traversable_List(csegen_9(), $b => Commands_x3cx7cx7cx3e(csegen_605(), $10 => Commands_n__8363_2372_parseCompletedFlag($0, $10), $15 => Commands_n__8363_2373_parseTeamArg($0, $15), $b), $0);
10208
+ const $6 = Prelude_Types_traverse_Traversable_List(csegen_9(), $b => Commands_x3cx7cx7cx3e(csegen_601(), $10 => Commands_n__8384_2372_parseCompletedFlag($0, $10), $15 => Commands_n__8384_2373_parseTeamArg($0, $15), $b), $0);
10104
10209
  switch($6.h) {
10105
10210
  case undefined: /* just */ return {h: 1 /* Right */, a1: $6.a1};
10106
10211
  case 0: /* nothing */ return {h: 0 /* Left */, a1: 'The graph command expects the name of a GitHub Team and optionally --completed as arguments.'};
@@ -10109,7 +10214,7 @@ function Commands_parseGraphArgs($0) {
10109
10214
  }
10110
10215
  }
10111
10216
  default: {
10112
- const $1d = Prelude_Types_traverse_Traversable_List(csegen_9(), $22 => Commands_x3cx7cx7cx3e(csegen_605(), $27 => Commands_n__8363_2372_parseCompletedFlag($0, $27), $2c => Commands_n__8363_2373_parseTeamArg($0, $2c), $22), $0);
10217
+ const $1d = Prelude_Types_traverse_Traversable_List(csegen_9(), $22 => Commands_x3cx7cx7cx3e(csegen_601(), $27 => Commands_n__8384_2372_parseCompletedFlag($0, $27), $2c => Commands_n__8384_2373_parseTeamArg($0, $2c), $22), $0);
10113
10218
  switch($1d.h) {
10114
10219
  case undefined: /* just */ return {h: 1 /* Right */, a1: $1d.a1};
10115
10220
  case 0: /* nothing */ return {h: 0 /* Left */, a1: 'The graph command expects the name of a GitHub Team and optionally --completed as arguments.'};
@@ -10118,7 +10223,7 @@ function Commands_parseGraphArgs($0) {
10118
10223
  }
10119
10224
  }
10120
10225
  default: {
10121
- const $34 = Prelude_Types_traverse_Traversable_List(csegen_9(), $39 => Commands_x3cx7cx7cx3e(csegen_605(), $3e => Commands_n__8363_2372_parseCompletedFlag($0, $3e), $43 => Commands_n__8363_2373_parseTeamArg($0, $43), $39), $0);
10226
+ const $34 = Prelude_Types_traverse_Traversable_List(csegen_9(), $39 => Commands_x3cx7cx7cx3e(csegen_601(), $3e => Commands_n__8384_2372_parseCompletedFlag($0, $3e), $43 => Commands_n__8384_2373_parseTeamArg($0, $43), $39), $0);
10122
10227
  switch($34.h) {
10123
10228
  case undefined: /* just */ return {h: 1 /* Right */, a1: $34.a1};
10124
10229
  case 0: /* nothing */ return {h: 0 /* Left */, a1: 'The graph command expects the name of a GitHub Team and optionally --completed as arguments.'};
@@ -10132,9 +10237,9 @@ function Commands_parseContributeArgs($0) {
10132
10237
  switch($0.h) {
10133
10238
  case 0: /* nil */ return {h: 1 /* Right */, a1: {h: 0}};
10134
10239
  default: {
10135
- const $3 = Commands_n__8521_2510_recombineIgnoreArgs($0, $0);
10240
+ const $3 = Commands_n__8542_2510_recombineIgnoreArgs($0, $0);
10136
10241
  const $7 = csegen_116()($c => ({h: 1 /* Ignore */, a1: $c}))($3.a1);
10137
- const $f = Prelude_Types_traverse_Traversable_List(csegen_9(), $14 => Commands_x3cx7cx7cx3e(csegen_605(), $19 => Commands_n__8521_2508_parseSkipArg($0, $19), $1e => Commands_n__8521_2507_parseCheckoutFlag($0, $1e), $14), $3.a2);
10242
+ const $f = Prelude_Types_traverse_Traversable_List(csegen_9(), $14 => Commands_x3cx7cx7cx3e(csegen_601(), $19 => Commands_n__8542_2508_parseSkipArg($0, $19), $1e => Commands_n__8542_2507_parseCheckoutFlag($0, $1e), $14), $3.a2);
10138
10243
  return Data_Either_maybeToEither(() => Commands_contributeUsageError(), csegen_60()($2c => Prelude_Types_List_tailRecAppend($7, $2c))($f));
10139
10244
  }
10140
10245
  }
@@ -10142,14 +10247,14 @@ function Commands_parseContributeArgs($0) {
10142
10247
 
10143
10248
  /* Commands.list : Config => Octokit => String -> Promise () */
10144
10249
  function Commands_list($0, $1, $2) {
10145
- return Data_Promise_x3ex3ex3d_Monad_Promise(csegen_608()(FFI_GitHub_listTeamMembers($1, $0.a2, $2)), teamMemberLogins => Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Basics_flip(csegen_465(), csegen_609(), Prelude_Types_traverse_Traversable_List(csegen_86(), $1a => Commands_n__7913_1921_forkedUser($1, $2, $0, $1a), teamMemberLogins)), teamMembersJson => Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Types_traverse_Traversable_List(csegen_86(), $28 => $29 => Data_Promise_either(csegen_72(), Data_User_parseUser($28), $29), teamMembersJson), teamMembers => Util_renderIO($0, csegen_94(), Text_PrettyPrint_Prettyprinter_Doc_vsep(csegen_116()($3e => Commands_n__7913_1922_putNameLn($1, $2, $0, $3e))(teamMembers))))));
10250
+ return Data_Promise_x3ex3ex3d_Monad_Promise(csegen_604()(FFI_GitHub_listTeamMembers($1, $0.a2, $2)), teamMemberLogins => Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Basics_flip(csegen_465(), csegen_605(), Prelude_Types_traverse_Traversable_List(csegen_86(), $1a => Commands_n__7935_1921_forkedUser($1, $2, $0, $1a), teamMemberLogins)), teamMembersJson => Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Types_traverse_Traversable_List(csegen_86(), $28 => $29 => Data_Promise_either(csegen_72(), Data_User_parseUser($28), $29), teamMembersJson), teamMembers => Util_renderIO($0, csegen_94(), Text_PrettyPrint_Prettyprinter_Doc_vsep(csegen_116()($3e => Commands_n__7935_1922_putNameLn($1, $2, $0, $3e))(teamMembers))))));
10146
10251
  }
10147
10252
 
10148
10253
  /* Commands.label : Config => Git => Octokit => List String -> Promise () */
10149
10254
  function Commands_label($0, $1, $2, $3) {
10150
10255
  const $12 = $13 => {
10151
10256
  const $15 = csegen_116()($1a => Commands_unslugifyLabel($0.a10, $1a))($3);
10152
- return Data_Promise_x3ex3ex3d_Monad_Promise(Label_addLabels($0, $2, $13.a2, $15), allLabels => Util_renderIO($0, csegen_94(), Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(csegen_611()('Added'), csegen_506()(Commands_n__7234_1299_putLabels($1, $2, $3, $0, $15))(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_70(), $51 => $51, {a1: csegen_62()('All labels for PR of '), a2: {a1: csegen_62()($13.a2.a7), a2: {a1: csegen_62()(':'), a2: {h: 0}}}})), csegen_506()(Commands_n__7234_1299_putLabels($1, $2, $3, $0, allLabels))(Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Text_PrettyPrint_Prettyprinter_Doc_unsafeTextWithoutNewLines('.'), a2: {h: 0}}))), a2: {h: 0}}})));
10257
+ return Data_Promise_x3ex3ex3d_Monad_Promise(Label_addLabels($0, $2, $13.a2, $15), allLabels => Util_renderIO($0, csegen_94(), Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(csegen_607()('Added'), csegen_506()(Commands_n__7256_1299_putLabels($1, $2, $3, $0, $15))(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_70(), $51 => $51, {a1: csegen_62()('All labels for PR of '), a2: {a1: csegen_62()($13.a2.a7), a2: {a1: csegen_62()(':'), a2: {h: 0}}}})), csegen_506()(Commands_n__7256_1299_putLabels($1, $2, $3, $0, allLabels))(Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Text_PrettyPrint_Prettyprinter_Doc_unsafeTextWithoutNewLines('.'), a2: {h: 0}}))), a2: {h: 0}}})));
10153
10258
  };
10154
10259
  return Data_Promise_x3ex3ex3d_Monad_Promise(Data_Promise_x3ex3ex3d_Monad_Promise(FFI_Git_currentBranch($1), $b => PullRequest_identifyOrCreatePR($0, $1, $2, 0, $b)), $12);
10155
10260
  }
@@ -10208,13 +10313,13 @@ function Commands_contribute($0, $1, $2, $3) {
10208
10313
  }
10209
10314
  };
10210
10315
  const $3e = Prelude_Types_List_filterAppend({h: 0}, $41, openPrs);
10211
- const $48 = Prelude_Types_List_filterAppend({h: 0}, $4c => Commands_n__8850_2845_isNotIgnored($1, $2, $3, $0, configx27, $4c), $3e);
10316
+ const $48 = Prelude_Types_List_filterAppend({h: 0}, $4c => Commands_n__8871_2845_isNotIgnored($1, $2, $3, $0, configx27, $4c), $3e);
10212
10317
  const $55 = Data_List_partition($58 => Data_PullRequest_isRequestedReviewer(myLogin, $58), $48);
10213
- return Commands_case__contribute_3002($1, $2, $3, $0, openPrs, myLogin, $19, configx27, $2b, $38, $3e, $48, $55, Prelude_Interfaces_mapHom({a1: d => b => c => a => $6f => $70 => $71 => ({a1: $6f($71.a1), a2: $70($71.a2)}), a2: b => c => a => $7a => $7b => ({a1: $7a($7b.a1), a2: $7b.a2}), a3: a => d => b => $82 => $83 => ({a1: $83.a1, a2: $82($83.a2)})}, $8a => Data_List_sortBy(csegen_626(), $8a), $55));
10318
+ return Commands_case__contribute_3002($1, $2, $3, $0, openPrs, myLogin, $19, configx27, $2b, $38, $3e, $48, $55, Prelude_Interfaces_mapHom({a1: d => b => c => a => $6f => $70 => $71 => ({a1: $6f($71.a1), a2: $70($71.a2)}), a2: b => c => a => $7a => $7b => ({a1: $7a($7b.a1), a2: $7b.a2}), a3: a => d => b => $82 => $83 => ({a1: $83.a1, a2: $82($83.a2)})}, $8a => Data_List_sortBy(csegen_622(), $8a), $55));
10214
10319
  };
10215
10320
  return Data_Promise_x3ex3ex3d_Monad_Promise($1d, $2a);
10216
10321
  };
10217
- return Data_Promise_x3ex3ex3d_Monad_Promise(csegen_622()(FFI_GitHub_getSelf($2)), $18);
10322
+ return Data_Promise_x3ex3ex3d_Monad_Promise(csegen_618()(FFI_GitHub_getSelf($2)), $18);
10218
10323
  };
10219
10324
  return Data_Promise_x3ex3ex3d_Monad_Promise(FFI_GitHub_listPullRequests($2, $0.a2, $0.a3, {a1: 0}, 100n, 0n), $10);
10220
10325
  }
@@ -10233,7 +10338,7 @@ function Commands_branch($0, $1) {
10233
10338
  /* Commands.assign : Config => Git => Octokit => List String -> {default False _ : Bool} ->
10234
10339
  Promise () */
10235
10340
  function Commands_assign($0, $1, $2, $3, $4) {
10236
- return Commands_case__assign_1766($0, $1, $2, $4, $3, Commands_n__7589_1651_partitionedArgs($0, $1, $2, $4, $3));
10341
+ return Commands_case__assign_1766($0, $1, $2, $4, $3, Commands_n__7611_1651_partitionedArgs($0, $1, $2, $4, $3));
10237
10342
  }
10238
10343
 
10239
10344
  /* Commands.<||> : Alternative t => (a -> t b) -> (a -> t b) -> a -> t b */
@@ -10243,67 +10348,67 @@ function Commands_x3cx7cx7cx3e($0, $1, $2, $3) {
10243
10348
 
10244
10349
  /* User.Reflect.case block in case block in reflectOnSelf */
10245
10350
  function User_Reflect_case__casex20blockx20inx20reflectOnSelf_1862($0, $1, $2, $3, $4, $5, $6, $7, $8, $9) {
10246
- 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)}, csegen_116()(csegen_639())($2a))), {a1: $7, a2: $9.a1});
10351
+ 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)}, csegen_116()(csegen_635())($2a))), {a1: $7, a2: $9.a1});
10247
10352
  return Util_renderIO($0, csegen_94(), 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));
10248
10353
  }
10249
10354
 
10250
- /* User.Me.7189:1979:ul */
10251
- function User_Me_n__7189_1979_ul($0, $1, $2, $3) {
10355
+ /* User.Me.7213:1979:ul */
10356
+ function User_Me_n__7213_1979_ul($0, $1, $2, $3) {
10252
10357
  return Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_underline(), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String($3));
10253
10358
  }
10254
10359
 
10255
- /* User.Me.7189:1985:teams */
10256
- function User_Me_n__7189_1985_teams($0, $1, $2) {
10257
- return Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: User_Me_n__7189_1979_ul($0, $1, $2, 'GitHub Teams:'), a2: csegen_116()($10 => User_Me_n__7189_1980_it($0, $1, $2, $10))($0)});
10360
+ /* User.Me.7213:1985:teams */
10361
+ function User_Me_n__7213_1985_teams($0, $1, $2) {
10362
+ return Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: User_Me_n__7213_1979_ul($0, $1, $2, 'GitHub Teams:'), a2: csegen_116()($10 => User_Me_n__7213_1980_it($0, $1, $2, $10))($0)});
10258
10363
  }
10259
10364
 
10260
- /* User.Me.7189:1984:login */
10261
- function User_Me_n__7189_1984_login($0, $1, $2) {
10262
- return Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(csegen_611()('GitHub Login:'), User_Me_n__7189_1981_green($0, $1, $2, $1.a1));
10365
+ /* User.Me.7213:1984:login */
10366
+ function User_Me_n__7213_1984_login($0, $1, $2) {
10367
+ return Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(csegen_607()('GitHub Login:'), User_Me_n__7213_1981_green($0, $1, $2, $1.a1));
10263
10368
  }
10264
10369
 
10265
- /* User.Reflect.6282:1056:ital */
10266
- function User_Reflect_n__6282_1056_ital($0, $1) {
10370
+ /* User.Reflect.6306:1056:ital */
10371
+ function User_Reflect_n__6306_1056_ital($0, $1) {
10267
10372
  return Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_italic(), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String($1));
10268
10373
  }
10269
10374
 
10270
- /* User.Me.7189:1980:it */
10271
- function User_Me_n__7189_1980_it($0, $1, $2, $3) {
10375
+ /* User.Me.7213:1980:it */
10376
+ function User_Me_n__7213_1980_it($0, $1, $2, $3) {
10272
10377
  return Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_italic(), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String($3));
10273
10378
  }
10274
10379
 
10275
- /* User.Me.7329:2135:handleUnsetEmail */
10276
- function User_Me_n__7329_2135_handleUnsetEmail($0, $1, $2, $3) {
10380
+ /* User.Me.7353:2135:handleUnsetEmail */
10381
+ function User_Me_n__7353_2135_handleUnsetEmail($0, $1, $2, $3) {
10277
10382
  switch($3) {
10278
10383
  case '': return {h: 0};
10279
10384
  default: return {a1: $3};
10280
10385
  }
10281
10386
  }
10282
10387
 
10283
- /* User.Me.7189:1981:green */
10284
- function User_Me_n__7189_1981_green($0, $1, $2, $3) {
10388
+ /* User.Me.7213:1981:green */
10389
+ function User_Me_n__7213_1981_green($0, $1, $2, $3) {
10285
10390
  return Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_color(2), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String($3));
10286
10391
  }
10287
10392
 
10288
- /* User.Me.7189:1983:fullName */
10289
- function User_Me_n__7189_1983_fullName($0, $1, $2) {
10290
- return Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(csegen_611()('GitHub Name:'), User_Me_n__7189_1981_green($0, $1, $2, $1.a2));
10393
+ /* User.Me.7213:1983:fullName */
10394
+ function User_Me_n__7213_1983_fullName($0, $1, $2) {
10395
+ return Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(csegen_607()('GitHub Name:'), User_Me_n__7213_1981_green($0, $1, $2, $1.a2));
10291
10396
  }
10292
10397
 
10293
- /* User.Me.7189:1982:email */
10294
- function User_Me_n__7189_1982_email($0, $1, $2) {
10398
+ /* User.Me.7213:1982:email */
10399
+ function User_Me_n__7213_1982_email($0, $1, $2) {
10295
10400
  let $8;
10296
10401
  switch($2.h) {
10297
10402
  case undefined: /* just */ {
10298
- $8 = User_Me_n__7189_1981_green($0, $1, $2, $2.a1);
10403
+ $8 = User_Me_n__7213_1981_green($0, $1, $2, $2.a1);
10299
10404
  break;
10300
10405
  }
10301
10406
  case 0: /* nothing */ {
10302
- $8 = User_Me_n__7189_1980_it($0, $1, $2, 'Not set');
10407
+ $8 = User_Me_n__7213_1980_it($0, $1, $2, 'Not set');
10303
10408
  break;
10304
10409
  }
10305
10410
  }
10306
- return Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(csegen_611()('Git Email:'), $8);
10411
+ return Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(csegen_607()('Git Email:'), $8);
10307
10412
  }
10308
10413
 
10309
10414
  /* User.Reflect.rightTitle : String */
@@ -10326,21 +10431,21 @@ function User_Reflect_reflectOnSelf($0, $1) {
10326
10431
  const $a = prs => {
10327
10432
  const $12 = myLogin => {
10328
10433
  const $2e = reviews => {
10329
- const $2f = csegen_60()(csegen_646())(Data_List_headx27(Data_List_sortBy($3a => $3b => Prelude_Basics_on(csegen_624(), csegen_646(), $3a, $3b), reviews)));
10434
+ const $2f = csegen_60()(csegen_642())(Data_List_headx27(Data_List_sortBy($3a => $3b => Prelude_Basics_on(csegen_620(), csegen_642(), $3a, $3b), reviews)));
10330
10435
  const $44 = PullRequest_tuple(prs);
10331
10436
  const $47 = Prelude_Interfaces_mapHom({a1: d => b => c => a => $4b => $4c => $4d => ({a1: $4b($4d.a1), a2: $4c($4d.a2)}), a2: b => c => a => $56 => $57 => ({a1: $56($57.a1), a2: $57.a2}), a3: a => d => b => $5e => $5f => ({a1: $5f.a1, a2: $5e($5f.a2)})}, $66 => Prelude_Types_List_filterAppend({h: 0}, $6a => Prelude_EqOrd_x3dx3d_Eq_String($6a.a4, myLogin), $66), $44);
10332
10437
  return User_Reflect_case__casex20blockx20inx20reflectOnSelf_1862($0, $1, prs, myLogin, reviews, $2f, $44, $47.a1, $47.a2, Prelude_Interfaces_mapHom({a1: d => b => c => a => $7f => $80 => $81 => ({a1: $7f($81.a1), a2: $80($81.a2)}), a2: b => c => a => $8a => $8b => ({a1: $8a($8b.a1), a2: $8b.a2}), a3: a => d => b => $92 => $93 => ({a1: $93.a1, a2: $92($93.a2)})}, $9a => Prelude_Types_List_filterAppend({h: 0}, $9e => Prelude_Types_foldMap_Foldable_List(csegen_136(), $a3 => Prelude_EqOrd_x3dx3d_Eq_String($a3, myLogin), $9e.a6), $9a), $44));
10333
10438
  };
10334
- return Data_Promise_x3ex3ex3d_Monad_Promise(PullRequest_reviewsByUser($0, $1, myLogin, Data_List_take(User_Reflect_reviewDetailsCount(), Prelude_Types_List_reverse(Data_List_sortBy($22 => $23 => Prelude_Basics_on(csegen_624(), csegen_639(), $22, $23), PullRequest_combined(prs))))), $2e);
10439
+ return Data_Promise_x3ex3ex3d_Monad_Promise(PullRequest_reviewsByUser($0, $1, myLogin, Data_List_take(User_Reflect_reviewDetailsCount(), Prelude_Types_List_reverse(Data_List_sortBy($22 => $23 => Prelude_Basics_on(csegen_620(), csegen_635(), $22, $23), PullRequest_combined(prs))))), $2e);
10335
10440
  };
10336
- return Data_Promise_x3ex3ex3d_Monad_Promise(csegen_622()(FFI_GitHub_getSelf($1)), $12);
10441
+ return Data_Promise_x3ex3ex3d_Monad_Promise(csegen_618()(FFI_GitHub_getSelf($1)), $12);
10337
10442
  };
10338
10443
  return Data_Promise_x3ex3ex3d_Monad_Promise(PullRequest_listPartitionedPRs($0, $1, 4n, User_Reflect_prCount()), $a);
10339
10444
  }
10340
10445
 
10341
10446
  /* User.Me.printInfoOnSelf : Config => Octokit => Git => Promise () */
10342
10447
  function User_Me_printInfoOnSelf($0, $1, $2) {
10343
- return Data_Promise_x3ex3ex3d_Monad_Promise(csegen_55()($9 => User_Me_n__7329_2135_handleUnsetEmail($0, $1, $2, $9))(FFI_Git_userEmail($2)), gitEmail => Data_Promise_x3ex3ex3d_Monad_Promise(FFI_GitHub_getSelf($1), githubUser => Data_Promise_x3ex3ex3d_Monad_Promise(csegen_608()(FFI_GitHub_listMyTeams($1)), githubTeams => Util_renderIO($0, csegen_94(), User_Me_print(gitEmail, githubUser, githubTeams)))));
10448
+ return Data_Promise_x3ex3ex3d_Monad_Promise(csegen_55()($9 => User_Me_n__7353_2135_handleUnsetEmail($0, $1, $2, $9))(FFI_Git_userEmail($2)), gitEmail => Data_Promise_x3ex3ex3d_Monad_Promise(FFI_GitHub_getSelf($1), githubUser => Data_Promise_x3ex3ex3d_Monad_Promise(csegen_604()(FFI_GitHub_listMyTeams($1)), githubTeams => Util_renderIO($0, csegen_94(), User_Me_print(gitEmail, githubUser, githubTeams)))));
10344
10449
  }
10345
10450
 
10346
10451
  /* User.Reflect.print : Nat -> Nat -> Nat -> Nat -> Nat -> Nat -> Maybe Date -> Maybe Date -> Maybe Date -> Doc AnsiStyle */
@@ -10350,7 +10455,7 @@ function User_Reflect_print($0, $1, $2, $3, $4, $5, $6, $7, $8) {
10350
10455
 
10351
10456
  /* User.Me.print : Maybe String -> User -> List String -> Doc AnsiStyle */
10352
10457
  function User_Me_print($0, $1, $2) {
10353
- return Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {a1: User_Me_n__7189_1982_email($2, $1, $0), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {a1: User_Me_n__7189_1983_fullName($2, $1, $0), a2: {a1: User_Me_n__7189_1984_login($2, $1, $0), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {a1: User_Me_n__7189_1985_teams($2, $1, $0), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {h: 0}}}}}}}}});
10458
+ return Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {a1: User_Me_n__7213_1982_email($2, $1, $0), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {a1: User_Me_n__7213_1983_fullName($2, $1, $0), a2: {a1: User_Me_n__7213_1984_login($2, $1, $0), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {a1: User_Me_n__7213_1985_teams($2, $1, $0), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {h: 0}}}}}}}}});
10354
10459
  }
10355
10460
 
10356
10461
  /* User.Reflect.prCount : Fin 101 */
@@ -10370,7 +10475,7 @@ const User_Reflect_intro = __lazy(function () {
10370
10475
 
10371
10476
  /* User.Reflect.header : Nat -> Doc AnsiStyle */
10372
10477
  function User_Reflect_header($0) {
10373
- return Text_PrettyPrint_Prettyprinter_Doc_indent(Number(_truncBigInt32($0)), Text_PrettyPrint_Prettyprinter_Doc_hsep({a1: User_Reflect_n__6282_1056_ital($0, User_Reflect_leftTitle()), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(csegen_62()(' ')), a2: {a1: User_Reflect_n__6282_1056_ital($0, User_Reflect_rightTitle()), a2: {h: 0}}}}));
10478
+ return Text_PrettyPrint_Prettyprinter_Doc_indent(Number(_truncBigInt32($0)), Text_PrettyPrint_Prettyprinter_Doc_hsep({a1: User_Reflect_n__6306_1056_ital($0, User_Reflect_leftTitle()), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(csegen_62()(' ')), a2: {a1: User_Reflect_n__6306_1056_ital($0, User_Reflect_rightTitle()), a2: {h: 0}}}}));
10374
10479
  }
10375
10480
 
10376
10481
  /* User.Reflect.graph : Nat -> Nat -> Nat -> Nat -> Nat -> Nat -> Doc AnsiStyle */
@@ -10388,7 +10493,7 @@ function User_Reflect_graph($0, $1, $2, $3, $4, $5) {
10388
10493
 
10389
10494
  /* User.Reflect.details : Nat -> Nat -> Nat -> Nat -> Nat -> Nat -> Maybe Date -> Maybe Date -> Maybe Date -> Doc AnsiStyle */
10390
10495
  function User_Reflect_details($0, $1, $2, $3, $4, $5, $6, $7, $8) {
10391
- 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(csegen_62()('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(csegen_62()('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: csegen_661(), 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: csegen_665()($8), a2: {a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_hsep({a1: csegen_667(), 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(csegen_62()('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: csegen_60()(date => Text_PrettyPrint_Prettyprinter_Doc_indent(2, Text_PrettyPrint_Prettyprinter_Doc_hsep({a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(csegen_62()('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(csegen_62()('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: csegen_661(), 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: csegen_665()($7), a2: {a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_hsep({a1: csegen_667(), 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_70(), $da => $da, {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}}}}}}}}}});
10496
+ 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(csegen_62()('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(csegen_62()('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: csegen_657(), 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: csegen_661()($8), a2: {a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_hsep({a1: csegen_663(), 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(csegen_62()('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: csegen_60()(date => Text_PrettyPrint_Prettyprinter_Doc_indent(2, Text_PrettyPrint_Prettyprinter_Doc_hsep({a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(csegen_62()('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(csegen_62()('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: csegen_657(), 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: csegen_661()($7), a2: {a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_hsep({a1: csegen_663(), 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_70(), $da => $da, {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}}}}}}}}}});
10392
10497
  }
10393
10498
 
10394
10499
  /* User.Reflect.chart : Nat -> Nat -> Nat -> Nat -> Nat -> Nat -> Nat -> Doc AnsiStyle */
@@ -10438,43 +10543,43 @@ function PullRequest_with__listOpenPRs_1375($0, $1, $2, $3, $4) {
10438
10543
  }
10439
10544
  }
10440
10545
 
10441
- /* PullRequest.case block in identifyOrCreatePR,createPR */
10442
- function PullRequest_case__identifyOrCreatePRx2ccreatePR_2973($0, $1, $2, $3, $4, $5, $6) {
10443
- switch($6.h) {
10444
- case undefined: /* cons */ return ($6.a1+$6.a2);
10546
+ /* PullRequest.case block in case block in case block in identifyOrCreatePR,createPR */
10547
+ function PullRequest_case__casex20blockx20inx20casex20blockx20inx20identifyOrCreatePRx2ccreatePR_3188($0, $1, $2, $3, $4, $5, $6, $7, $8) {
10548
+ switch($8.h) {
10549
+ case undefined: /* cons */ return ($8.a1+$8.a2);
10445
10550
  default: return $4.a5;
10446
10551
  }
10447
10552
  }
10448
10553
 
10449
- /* PullRequest.8328:1961:userNotice */
10450
- function PullRequest_n__8328_1961_userNotice($0, $1, $2, $3, $4, $5, $6) {
10554
+ /* PullRequest.8348:1961:userNotice */
10555
+ function PullRequest_n__8348_1961_userNotice($0, $1, $2, $3, $4, $5, $6) {
10451
10556
  switch($6.h) {
10452
10557
  case 0: /* nothing */ {
10453
10558
  switch($2.h) {
10454
10559
  case 0: /* nil */ return 'no users';
10455
- default: return Prelude_Types_foldMap_Foldable_List(csegen_70(), $d => $d, {a1: csegen_62()(PullRequest_n__8328_1960_csv($0, $1, $2, $3, $4, $5, $2)), a2: {h: 0}});
10560
+ default: return Prelude_Types_foldMap_Foldable_List(csegen_70(), $d => $d, {a1: csegen_62()(PullRequest_n__8348_1960_csv($0, $1, $2, $3, $4, $5, $2)), a2: {h: 0}});
10456
10561
  }
10457
10562
  }
10458
- case undefined: /* just */ return Prelude_Types_foldMap_Foldable_List(csegen_70(), $20 => $20, {a1: PullRequest_n__8328_1960_csv($0, $1, $2, $3, $4, $5, {a1: $6.a1, a2: $2}), a2: {h: 0}});
10563
+ case undefined: /* just */ return Prelude_Types_foldMap_Foldable_List(csegen_70(), $20 => $20, {a1: PullRequest_n__8348_1960_csv($0, $1, $2, $3, $4, $5, {a1: $6.a1, a2: $2}), a2: {h: 0}});
10459
10564
  }
10460
10565
  }
10461
10566
 
10462
- /* PullRequest.8328:1962:teamNotice */
10463
- function PullRequest_n__8328_1962_teamNotice($0, $1, $2, $3, $4, $5, $6) {
10567
+ /* PullRequest.8348:1962:teamNotice */
10568
+ function PullRequest_n__8348_1962_teamNotice($0, $1, $2, $3, $4, $5, $6) {
10464
10569
  switch($6.h) {
10465
10570
  case 0: /* nil */ return '';
10466
10571
  case undefined: /* cons */ {
10467
10572
  switch($6.a2.h) {
10468
- case 0: /* nil */ return Prelude_Types_foldMap_Foldable_List(csegen_70(), $d => $d, {a1: ' and team ', a2: {a1: PullRequest_n__8328_1960_csv($0, $1, $2, $3, $4, $5, {a1: $6.a1, a2: {h: 0}}), a2: {h: 0}}});
10469
- default: return Prelude_Types_foldMap_Foldable_List(csegen_70(), $21 => $21, {a1: ' and teams ', a2: {a1: PullRequest_n__8328_1960_csv($0, $1, $2, $3, $4, $5, $6), a2: {h: 0}}});
10573
+ case 0: /* nil */ return Prelude_Types_foldMap_Foldable_List(csegen_70(), $d => $d, {a1: ' and team ', a2: {a1: PullRequest_n__8348_1960_csv($0, $1, $2, $3, $4, $5, {a1: $6.a1, a2: {h: 0}}), a2: {h: 0}}});
10574
+ default: return Prelude_Types_foldMap_Foldable_List(csegen_70(), $21 => $21, {a1: ' and teams ', a2: {a1: PullRequest_n__8348_1960_csv($0, $1, $2, $3, $4, $5, $6), a2: {h: 0}}});
10470
10575
  }
10471
10576
  }
10472
- default: return Prelude_Types_foldMap_Foldable_List(csegen_70(), $33 => $33, {a1: ' and teams ', a2: {a1: PullRequest_n__8328_1960_csv($0, $1, $2, $3, $4, $5, $6), a2: {h: 0}}});
10577
+ default: return Prelude_Types_foldMap_Foldable_List(csegen_70(), $33 => $33, {a1: ' and teams ', a2: {a1: PullRequest_n__8348_1960_csv($0, $1, $2, $3, $4, $5, $6), a2: {h: 0}}});
10473
10578
  }
10474
10579
  }
10475
10580
 
10476
- /* PullRequest.9018:2623:prepareDescriptionFile */
10477
- function PullRequest_n__9018_2623_prepareDescriptionFile($0, $1, $2, $3, $4, $5, $6) {
10581
+ /* PullRequest.9038:2623:prepareDescriptionFile */
10582
+ function PullRequest_n__9038_2623_prepareDescriptionFile($0, $1, $2, $3, $4, $5, $6) {
10478
10583
  const $13 = $14 => {
10479
10584
  const $1a = () => {
10480
10585
  const $1d = $5.a1.a1.a1;
@@ -10487,13 +10592,13 @@ function PullRequest_n__9018_2623_prepareDescriptionFile($0, $1, $2, $3, $4, $5,
10487
10592
  return $5.a1.a2(undefined)(undefined)(System_File_Meta_exists($5, $6))($13);
10488
10593
  }
10489
10594
 
10490
- /* PullRequest.8328:1963:prComment */
10491
- function PullRequest_n__8328_1963_prComment($0, $1, $2, $3, $4, $5, $6) {
10595
+ /* PullRequest.8348:1963:prComment */
10596
+ function PullRequest_n__8348_1963_prComment($0, $1, $2, $3, $4, $5, $6) {
10492
10597
  return Prelude_Types_foldMap_Foldable_List(csegen_70(), $b => $b, {a1: ':musical_note: Harmoniously assigned @', a2: {a1: $6, a2: {a1: ' to review this PR.', a2: {h: 0}}}});
10493
10598
  }
10494
10599
 
10495
- /* PullRequest.9018:2622:inlineDescription */
10496
- function PullRequest_n__9018_2622_inlineDescription($0, $1, $2, $3, $4, $5) {
10600
+ /* PullRequest.9038:2622:inlineDescription */
10601
+ function PullRequest_n__9038_2622_inlineDescription($0, $1, $2, $3, $4, $5) {
10497
10602
  const $18 = $19 => {
10498
10603
  const $1c = $5.a1.a1.a1;
10499
10604
  const $1b = $20 => $21 => $1c(undefined)(undefined)($20)($21);
@@ -10503,13 +10608,13 @@ function PullRequest_n__9018_2622_inlineDescription($0, $1, $2, $3, $4, $5) {
10503
10608
  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)))($18);
10504
10609
  }
10505
10610
 
10506
- /* PullRequest.8103:1704:forkedReviews */
10507
- function PullRequest_n__8103_1704_forkedReviews($0, $1, $2, $3) {
10611
+ /* PullRequest.8123:1704:forkedReviews */
10612
+ function PullRequest_n__8123_1704_forkedReviews($0, $1, $2, $3) {
10508
10613
  return FFI_Concurrency_fork(csegen_94(), ('reviews --json '+Prelude_Show_show_Show_Integer($3.a1)));
10509
10614
  }
10510
10615
 
10511
- /* PullRequest.7536:1169:filterString */
10512
- function PullRequest_n__7536_1169_filterString($0, $1, $2, $3, $4) {
10616
+ /* PullRequest.7556:1169:filterString */
10617
+ function PullRequest_n__7556_1169_filterString($0, $1, $2, $3, $4) {
10513
10618
  switch($4.h) {
10514
10619
  case 0: /* nothing */ return 'none';
10515
10620
  case undefined: /* just */ {
@@ -10521,8 +10626,8 @@ function PullRequest_n__7536_1169_filterString($0, $1, $2, $3, $4) {
10521
10626
  }
10522
10627
  }
10523
10628
 
10524
- /* PullRequest.9018:2624:editorDescription */
10525
- function PullRequest_n__9018_2624_editorDescription($0, $1, $2, $3, $4, $5, $6, $7) {
10629
+ /* PullRequest.9038:2624:editorDescription */
10630
+ function PullRequest_n__9038_2624_editorDescription($0, $1, $2, $3, $4, $5, $6, $7) {
10526
10631
  const $19 = $1a => {
10527
10632
  const $31 = $32 => {
10528
10633
  switch($32) {
@@ -10533,73 +10638,121 @@ function PullRequest_n__9018_2624_editorDescription($0, $1, $2, $3, $4, $5, $6,
10533
10638
  const $62 = $5.a1.a1.a1;
10534
10639
  const $61 = $66 => $67 => $62(undefined)(undefined)($66)($67);
10535
10640
  const $60 = $61($71 => (undefined));
10536
- return $60(System_File_ReadWrite_removeFile($5, csegen_690()));
10641
+ return $60(System_File_ReadWrite_removeFile($5, csegen_686()));
10537
10642
  };
10538
10643
  return Prelude_Interfaces_when($5.a1.a1, $59, $5f);
10539
10644
  };
10540
- const $4a = $5.a1.a2(undefined)(undefined)(System_File_Meta_exists($5, csegen_690()))($58);
10645
+ const $4a = $5.a1.a2(undefined)(undefined)(System_File_Meta_exists($5, csegen_686()))($58);
10541
10646
  const $44 = $5.a1.a2(undefined)(undefined)($4a);
10542
10647
  return $44($78 => $5.a1.a1.a2(undefined)(description));
10543
10648
  };
10544
- return $5.a1.a2(undefined)(undefined)(System_File_ReadWrite_readFile($5, csegen_690()))($41);
10649
+ return $5.a1.a2(undefined)(undefined)(System_File_ReadWrite_readFile($5, csegen_686()))($41);
10545
10650
  }
10546
10651
  default: return $5.a1.a1.a2(undefined)({h: 0 /* Left */, a1: {h: 0 /* GenericFileError */, a1: $32}});
10547
10652
  }
10548
10653
  };
10549
10654
  return $5.a1.a2(undefined)(undefined)(System_system($5, Prelude_Types_foldMap_Foldable_List(csegen_70(), $2b => $2b, {a1: $6, a2: {a1: ' pr_description.tmp.md', a2: {h: 0}}})))($31);
10550
10655
  };
10551
- return $5.a1.a2(undefined)(undefined)(PullRequest_n__9018_2623_prepareDescriptionFile($0, $1, $2, $3, $4, $5, $7))($19);
10552
- }
10553
-
10554
- /* PullRequest.8328:1960:csv */
10555
- function PullRequest_n__8328_1960_csv($0, $1, $2, $3, $4, $5, $6) {
10556
- return Util_renderString($5, Text_PrettyPrint_Prettyprinter_Doc_encloseSep(Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), csegen_595(), csegen_116()(csegen_398())($6)));
10557
- }
10558
-
10559
- /* PullRequest.9018:2625:createPR */
10560
- function PullRequest_n__9018_2625_createPR($0, $1, $2, $3, $4) {
10561
- const $2f = $30 => {
10562
- const $4d = $4e => {
10563
- const $6c = $6d => {
10564
- const $79 = baseBranchInput => {
10565
- const $7a = PullRequest_case__identifyOrCreatePRx2ccreatePR_2973($0, $1, $2, $3, $4, baseBranchInput, Data_String_strM(baseBranchInput));
10566
- const $93 = $94 => {
10567
- const $96 = Data_Maybe_fromMaybe(() => '', csegen_60()($9e => ($9e+' - '))(Util_parseJiraPrefix($2)));
10568
- const $95 = () => {
10569
- const $b2 = $b3 => {
10570
- const $c1 = title => {
10571
- const $c7 = templateFilePath => {
10572
- const $ca = Data_Config_rf__editor($4);
10573
- let $c9;
10574
- switch($ca.h) {
10575
- case 0: /* nothing */ {
10576
- $c9 = PullRequest_n__9018_2622_inlineDescription($0, $1, $2, $3, $4, csegen_94());
10577
- break;
10578
- }
10579
- case undefined: /* just */ {
10580
- $c9 = csegen_55()($d9 => Prelude_Types_either(() => $dc => '', () => $de => $de, $d9))(PullRequest_n__9018_2624_editorDescription($0, $1, $2, $3, $4, csegen_94(), $ca.a1, templateFilePath));
10581
- break;
10582
- }
10583
- }
10584
- return Data_Promise_x3ex3ex3d_Monad_Promise($c9, description => Data_Promise_x3ex3ex3d_Monad_Promise($ee => $ef => $f0 => Data_Promise_liftIO_HasIO_Promise($f3 => Prelude_IO_prim__putStr('Creating PR...\n', $f3), $ee, $ef, $f0), $fb => Data_Promise_x3ex3ex3d_Monad_Promise($fe => $ff => $100 => Data_Promise_liftIO_HasIO_Promise($103 => Prelude_IO_prim__putStr(($2+'\n'), $103), $fe, $ff, $100), $10d => FFI_GitHub_createPR($1, $3, $4.a2, $4.a3, $2, $7a, title, description))));
10656
+ return $5.a1.a2(undefined)(undefined)(PullRequest_n__9038_2623_prepareDescriptionFile($0, $1, $2, $3, $4, $5, $7))($19);
10657
+ }
10658
+
10659
+ /* PullRequest.8348:1960:csv */
10660
+ function PullRequest_n__8348_1960_csv($0, $1, $2, $3, $4, $5, $6) {
10661
+ return Util_renderString($5, Text_PrettyPrint_Prettyprinter_Doc_encloseSep(Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), csegen_591(), csegen_116()(csegen_398())($6)));
10662
+ }
10663
+
10664
+ /* PullRequest.9038:2627:createPR */
10665
+ function PullRequest_n__9038_2627_createPR($0, $1, $2, $3, $4) {
10666
+ const $2a = $2b => {
10667
+ const $34 = $35 => {
10668
+ switch($35) {
10669
+ case 1: {
10670
+ const $3f = $40 => {
10671
+ switch($40) {
10672
+ case 1: {
10673
+ const $48 = $49 => {
10674
+ switch($49.h) {
10675
+ case undefined: /* just */ return Data_Promise_x3ex3ex3d_Monad_Promise($4d => $4e => $4f => Data_Promise_liftIO_HasIO_Promise($52 => Prelude_IO_prim__putStr((csegen_62()('The following commits have not been pushed:\n')+'\n'), $52), $4d, $4e, $4f), $5f => Data_Promise_x3ex3ex3d_Monad_Promise($62 => $63 => $64 => Data_Promise_liftIO_HasIO_Promise($67 => Prelude_IO_prim__putStr(($49.a1+'\n'), $67), $62, $63, $64), $71 => Data_Promise_x3ex3ex3d_Monad_Promise($74 => $75 => $76 => Data_Promise_liftIO_HasIO_Promise($79 => Prelude_IO_prim__putStr('\n\n', $79), $74, $75, $76), $81 => Data_Promise_x3ex3ex3d_Monad_Promise(Util_yesNoPrompt(csegen_94(), csegen_62()('Would you like to push these changes before creating a PR?')), pushUnpushedChanges => Prelude_Interfaces_when(csegen_86(), pushUnpushedChanges, () => FFI_Git_push($0))))));
10676
+ case 0: /* nothing */ return csegen_68();
10677
+ }
10678
+ };
10679
+ const $43 = Data_Promise_x3ex3ex3d_Monad_Promise(FFI_Git_unpushedCommits($0), $48);
10680
+ const $94 = $95 => {
10681
+ const $bb = $bc => {
10682
+ const $e3 = $e4 => {
10683
+ const $f0 = baseBranchInput => {
10684
+ const $f1 = PullRequest_case__casex20blockx20inx20casex20blockx20inx20identifyOrCreatePRx2ccreatePR_3188($0, $1, $2, $3, $4, 1, 1, baseBranchInput, Data_String_strM(baseBranchInput));
10685
+ const $111 = $112 => {
10686
+ const $114 = Data_Maybe_fromMaybe(() => csegen_112(), csegen_60()($11d => ($11d+' - '))(Util_parseJiraPrefix($2)));
10687
+ const $113 = () => {
10688
+ const $131 = $132 => {
10689
+ const $140 = title => {
10690
+ const $149 = templateFilePath => {
10691
+ const $14c = Data_Config_rf__editor($4);
10692
+ let $14b;
10693
+ switch($14c.h) {
10694
+ case 0: /* nothing */ {
10695
+ $14b = PullRequest_n__9038_2622_inlineDescription($0, $1, $2, $3, $4, csegen_94());
10696
+ break;
10697
+ }
10698
+ case undefined: /* just */ {
10699
+ $14b = csegen_55()($15b => Prelude_Types_either(() => $15e => '', () => $160 => $160, $15b))(PullRequest_n__9038_2624_editorDescription($0, $1, $2, $3, $4, csegen_94(), $14c.a1, templateFilePath));
10700
+ break;
10701
+ }
10702
+ }
10703
+ return Data_Promise_x3ex3ex3d_Monad_Promise($14b, description => Data_Promise_x3ex3ex3d_Monad_Promise($170 => $171 => $172 => Data_Promise_liftIO_HasIO_Promise($175 => Prelude_IO_prim__putStr((csegen_62()('Creating PR...')+'\n'), $175), $170, $171, $172), $182 => Data_Promise_x3ex3ex3d_Monad_Promise($185 => $186 => $187 => Data_Promise_liftIO_HasIO_Promise($18a => Prelude_IO_prim__putStr(($2+'\n'), $18a), $185, $186, $187), $194 => FFI_GitHub_createPR($1, $3, $4.a2, $4.a3, $2, $f1, title, description))));
10704
+ };
10705
+ return Data_Promise_x3ex3ex3d_Monad_Promise(Util_relativeToRoot($0, csegen_62()('.github/PULL_REQUEST_TEMPLATE.md')), $149);
10706
+ };
10707
+ return Data_Promise_x3ex3ex3d_Monad_Promise(csegen_55()($139 => ($114+Data_String_trim($139)))(csegen_543()), $140);
10708
+ };
10709
+ return Data_Promise_x3ex3ex3d_Monad_Promise($125 => $126 => $127 => Data_Promise_liftIO_HasIO_Promise($12a => Prelude_IO_prim__putStr($114, $12a), $125, $126, $127), $131);
10710
+ };
10711
+ return $113();
10712
+ };
10713
+ return Data_Promise_x3ex3ex3d_Monad_Promise($100 => $101 => $102 => Data_Promise_liftIO_HasIO_Promise($105 => Prelude_IO_prim__putStr((csegen_62()('What would you like the title to be?')+'\n'), $105), $100, $101, $102), $111);
10714
+ };
10715
+ return Data_Promise_x3ex3ex3d_Monad_Promise(csegen_55()($eb => Data_String_trim($eb))(csegen_543()), $f0);
10716
+ };
10717
+ return Data_Promise_x3ex3ex3d_Monad_Promise($bf => $c0 => $c1 => Data_Promise_liftIO_HasIO_Promise($c4 => Prelude_IO_prim__putStr((Prelude_Types_foldMap_Foldable_List(csegen_70(), $cc => $cc, {a1: csegen_62()('What branch are you merging into (ENTER for default: '), a2: {a1: csegen_62()($4.a5), a2: {a1: csegen_62()(')?'), a2: {h: 0}}}})+'\n'), $c4), $bf, $c0, $c1), $e3);
10585
10718
  };
10586
- return Data_Promise_x3ex3ex3d_Monad_Promise(Util_relativeToRoot($0, '.github/PULL_REQUEST_TEMPLATE.md'), $c7);
10719
+ return Data_Promise_x3ex3ex3d_Monad_Promise($98 => $99 => $9a => Data_Promise_liftIO_HasIO_Promise($9d => Prelude_IO_prim__putStr((Prelude_Types_foldMap_Foldable_List(csegen_70(), $a5 => $a5, {a1: csegen_62()('Creating a new PR for the current branch ('), a2: {a1: csegen_62()($2), a2: {a1: csegen_62()(').'), a2: {h: 0}}}})+'\n'), $9d), $98, $99, $9a), $bb);
10587
10720
  };
10588
- return Data_Promise_x3ex3ex3d_Monad_Promise(csegen_55()($ba => ($96+Data_String_trim($ba)))(csegen_543()), $c1);
10589
- };
10590
- return Data_Promise_x3ex3ex3d_Monad_Promise($a6 => $a7 => $a8 => Data_Promise_liftIO_HasIO_Promise($ab => Prelude_IO_prim__putStr($96, $ab), $a6, $a7, $a8), $b2);
10591
- };
10592
- return $95();
10721
+ return Data_Promise_x3ex3ex3d_Monad_Promise($43, $94);
10722
+ }
10723
+ case 0: return csegen_716();
10724
+ }
10593
10725
  };
10594
- return Data_Promise_x3ex3ex3d_Monad_Promise($87 => $88 => $89 => Data_Promise_liftIO_HasIO_Promise($8c => Prelude_IO_prim__putStr('What would you like the title to be?\n', $8c), $87, $88, $89), $93);
10595
- };
10596
- return Data_Promise_x3ex3ex3d_Monad_Promise(csegen_55()($74 => Data_String_trim($74))(csegen_543()), $79);
10597
- };
10598
- return Data_Promise_x3ex3ex3d_Monad_Promise($51 => $52 => $53 => Data_Promise_liftIO_HasIO_Promise($56 => Prelude_IO_prim__putStr((Prelude_Types_foldMap_Foldable_List(csegen_70(), $5e => $5e, {a1: 'What branch are you merging into (ENTER for default: ', a2: {a1: $4.a5, a2: {a1: ')?', a2: {h: 0}}}})+'\n'), $56), $51, $52, $53), $6c);
10726
+ return Data_Promise_x3ex3ex3d_Monad_Promise(PullRequest_n__9038_2626_continueGivenStagedChanges($0, $1, $2, $3, $4), $3f);
10727
+ }
10728
+ case 0: return csegen_716();
10729
+ }
10599
10730
  };
10600
- return Data_Promise_x3ex3ex3d_Monad_Promise($33 => $34 => $35 => Data_Promise_liftIO_HasIO_Promise($38 => Prelude_IO_prim__putStr((Prelude_Types_foldMap_Foldable_List(csegen_70(), $40 => $40, {a1: 'Creating a new PR for the current branch (', a2: {a1: $2, a2: {a1: ').', a2: {h: 0}}}})+'\n'), $38), $33, $34, $35), $4d);
10731
+ return Data_Promise_x3ex3ex3d_Monad_Promise(PullRequest_n__9038_2625_continueGivenUncommittedChanges($0, $1, $2, $3, $4), $34);
10732
+ };
10733
+ return Data_Promise_x3ex3ex3d_Monad_Promise(Data_Promise_x3ex3ex3d_Monad_Promise(FFI_Git_remoteTrackingBranch($0), $c => Util_whenNothing(csegen_86(), $c, Data_Promise_x3ex3ex3d_Monad_Promise($14 => $15 => $16 => Data_Promise_liftIO_HasIO_Promise($19 => Prelude_IO_prim__putStr('Creating a new remote branch...\n', $19), $14, $15, $16), $21 => FFI_Git_pushNewBranch($0, Data_Maybe_fromMaybe(() => 'origin', $4.a4), $2)))), $2a);
10734
+ }
10735
+
10736
+ /* PullRequest.9038:2625:continueGivenUncommittedChanges */
10737
+ function PullRequest_n__9038_2625_continueGivenUncommittedChanges($0, $1, $2, $3, $4) {
10738
+ const $9 = $a => {
10739
+ switch($a.h) {
10740
+ case undefined: /* just */ return Data_Promise_x3ex3ex3d_Monad_Promise($e => $f => $10 => Data_Promise_liftIO_HasIO_Promise($13 => Prelude_IO_prim__putStr((csegen_62()('The following files have uncommitted changes:')+'\n'), $13), $e, $f, $10), $20 => Data_Promise_x3ex3ex3d_Monad_Promise($23 => $24 => $25 => Data_Promise_liftIO_HasIO_Promise($28 => Prelude_IO_prim__putStr(($a.a1+'\n'), $28), $23, $24, $25), csegen_722()));
10741
+ case 0: /* nothing */ return csegen_723();
10742
+ }
10743
+ };
10744
+ return Data_Promise_x3ex3ex3d_Monad_Promise(FFI_Git_uncommittedChanges($0), $9);
10745
+ }
10746
+
10747
+ /* PullRequest.9038:2626:continueGivenStagedChanges */
10748
+ function PullRequest_n__9038_2626_continueGivenStagedChanges($0, $1, $2, $3, $4) {
10749
+ const $9 = $a => {
10750
+ switch($a.h) {
10751
+ case undefined: /* just */ return Data_Promise_x3ex3ex3d_Monad_Promise($e => $f => $10 => Data_Promise_liftIO_HasIO_Promise($13 => Prelude_IO_prim__putStr((csegen_62()('The following files have staged but uncommitted changes:')+'\n'), $13), $e, $f, $10), $20 => Data_Promise_x3ex3ex3d_Monad_Promise($23 => $24 => $25 => Data_Promise_liftIO_HasIO_Promise($28 => Prelude_IO_prim__putStr(($a.a1+'\n'), $28), $23, $24, $25), csegen_722()));
10752
+ case 0: /* nothing */ return csegen_723();
10753
+ }
10601
10754
  };
10602
- return Data_Promise_x3ex3ex3d_Monad_Promise(Data_Promise_x3ex3ex3d_Monad_Promise(FFI_Git_remoteTrackingBranch($0), $c => Prelude_Interfaces_when(csegen_86(), Prelude_Types_x3dx3d_Eq_x28Maybex20x24ax29(csegen_45(), $c, {h: 0}), () => Data_Promise_x3ex3ex3d_Monad_Promise($19 => $1a => $1b => Data_Promise_liftIO_HasIO_Promise($1e => Prelude_IO_prim__putStr('Creating a new remote branch...\n', $1e), $19, $1a, $1b), $26 => FFI_Git_pushNewBranch($0, Data_Maybe_fromMaybe(() => 'origin', $4.a4), $2)))), $2f);
10755
+ return Data_Promise_x3ex3ex3d_Monad_Promise(FFI_Git_stagedChanges($0), $9);
10603
10756
  }
10604
10757
 
10605
10758
  /* PullRequest.(.allReviewers) : PRHistory -> (List String, List String) */
@@ -10639,7 +10792,7 @@ function PullRequest_reviewsForPrs($0, $1, $2) {
10639
10792
  };
10640
10793
  return Data_Promise_x3ex3ex3d_Monad_Promise($18, reviews => $3f => $40 => Data_Promise_pure_Applicative_Promise(Prelude_Types_join_Monad_List(reviews), $3f, $40));
10641
10794
  };
10642
- return Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Basics_flip(csegen_465(), csegen_609(), Prelude_Types_traverse_Traversable_List(csegen_86(), $f => PullRequest_n__8103_1704_forkedReviews($0, $1, $2, $f), $2)), $16);
10795
+ return Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Basics_flip(csegen_465(), csegen_605(), Prelude_Types_traverse_Traversable_List(csegen_86(), $f => PullRequest_n__8123_1704_forkedReviews($0, $1, $2, $f), $2)), $16);
10643
10796
  }
10644
10797
 
10645
10798
  /* PullRequest.reviewsByUser : Config => Octokit => String -> List PullRequest -> Promise (List Review) */
@@ -10722,7 +10875,7 @@ function PullRequest_requestReviewers($0, $1, $2, $3, $4, $5) {
10722
10875
  const $5a = $5b => {
10723
10876
  const $61 = () => {
10724
10877
  switch(chosenUser.h) {
10725
- case undefined: /* just */ return FFI_GitHub_createComment($1, $0.a2, $0.a3, $2.a1, PullRequest_n__8328_1963_prComment($1, $5, $4, $3, $2, $0, chosenUser.a1));
10878
+ case undefined: /* just */ return FFI_GitHub_createComment($1, $0.a2, $0.a3, $2.a1, PullRequest_n__8348_1963_prComment($1, $5, $4, $3, $2, $0, chosenUser.a1));
10726
10879
  case 0: /* nothing */ return csegen_68();
10727
10880
  }
10728
10881
  };
@@ -10746,11 +10899,11 @@ function PullRequest_requestReviewers($0, $1, $2, $3, $4, $5) {
10746
10899
  let $77;
10747
10900
  switch($78) {
10748
10901
  case 1: {
10749
- $77 = () => $7d => $7e => $7f => Data_Promise_liftIO_HasIO_Promise($82 => 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(csegen_62()('Could not pick a user from the given Team '))), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(csegen_62()('(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_70(), $a5 => $a5, {a1: 'Assigned ', a2: {a1: PullRequest_n__8328_1962_teamNotice($1, $5, $4, $3, $2, $0, $40), a2: {a1: ' to the open PR ', a2: {h: 0}}}})), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(Prelude_Types_foldMap_Foldable_List(csegen_70(), $bd => $bd, {a1: 'for the current branch (', a2: {a1: Data_PullRequest_rf__webURI($0, $2), a2: {a1: ').', a2: {h: 0}}}})), a2: {h: 0}}}}}))+'\n'), $82), $7d, $7e, $7f);
10902
+ $77 = () => $7d => $7e => $7f => Data_Promise_liftIO_HasIO_Promise($82 => 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(csegen_62()('Could not pick a user from the given Team '))), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(csegen_62()('(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_70(), $a5 => $a5, {a1: 'Assigned ', a2: {a1: PullRequest_n__8348_1962_teamNotice($1, $5, $4, $3, $2, $0, $40), a2: {a1: ' to the open PR ', a2: {h: 0}}}})), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(Prelude_Types_foldMap_Foldable_List(csegen_70(), $bd => $bd, {a1: 'for the current branch (', a2: {a1: Data_PullRequest_rf__webURI($0, $2), a2: {a1: ').', a2: {h: 0}}}})), a2: {h: 0}}}}}))+'\n'), $82), $7d, $7e, $7f);
10750
10903
  break;
10751
10904
  }
10752
10905
  case 0: {
10753
- $77 = () => $ce => $cf => $d0 => Data_Promise_liftIO_HasIO_Promise($d3 => 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_70(), $e3 => $e3, {a1: 'Assigned ', a2: {a1: PullRequest_n__8328_1961_userNotice($1, $5, $4, $3, $2, $0, chosenUser), a2: {a1: PullRequest_n__8328_1962_teamNotice($1, $5, $4, $3, $2, $0, $40), a2: {a1: ' to the open PR ', a2: {h: 0}}}}})), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(Prelude_Types_foldMap_Foldable_List(csegen_70(), $105 => $105, {a1: 'for the current branch (', a2: {a1: Data_PullRequest_rf__webURI($0, $2), a2: {a1: ').', a2: {h: 0}}}})), a2: {h: 0}}}))+'\n'), $d3), $ce, $cf, $d0);
10906
+ $77 = () => $ce => $cf => $d0 => Data_Promise_liftIO_HasIO_Promise($d3 => 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_70(), $e3 => $e3, {a1: 'Assigned ', a2: {a1: PullRequest_n__8348_1961_userNotice($1, $5, $4, $3, $2, $0, chosenUser), a2: {a1: PullRequest_n__8348_1962_teamNotice($1, $5, $4, $3, $2, $0, $40), a2: {a1: ' to the open PR ', a2: {h: 0}}}}})), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(Prelude_Types_foldMap_Foldable_List(csegen_70(), $105 => $105, {a1: 'for the current branch (', a2: {a1: Data_PullRequest_rf__webURI($0, $2), a2: {a1: ').', a2: {h: 0}}}})), a2: {h: 0}}}))+'\n'), $d3), $ce, $cf, $d0);
10754
10907
  break;
10755
10908
  }
10756
10909
  }
@@ -10853,11 +11006,11 @@ function PullRequest_identifyOrCreatePR($0, $1, $2, $3, $4) {
10853
11006
  const $13 = Prelude_Interfaces_when(csegen_86(), $17, () => $1c => $1d => Data_Promise_reject(csegen_62()('There is already a PR for the current branch and Harmony does not currently support converting existing PRs to drafts.'), $1c, $1d));
10854
11007
  return Data_Promise_x3ex3ex3d_Monad_Promise($13, $26 => $27 => $28 => Data_Promise_pure_Applicative_Promise({a1: 0, a2: $f.a1}, $27, $28));
10855
11008
  }
10856
- default: return csegen_740();
11009
+ default: return csegen_766();
10857
11010
  }
10858
11011
  }
10859
- case 0: /* nil */ return csegen_55()($34 => ({a1: 1, a2: $34}))(PullRequest_n__9018_2625_createPR($1, $2, $4, $3, $0));
10860
- default: return csegen_740();
11012
+ case 0: /* nil */ return csegen_55()($34 => ({a1: 1, a2: $34}))(PullRequest_n__9038_2627_createPR($1, $2, $4, $3, $0));
11013
+ default: return csegen_766();
10861
11014
  }
10862
11015
  };
10863
11016
  return Data_Promise_x3ex3ex3d_Monad_Promise(FFI_GitHub_listPRsForBranch($2, $0.a2, $0.a3, $4), $e);
@@ -10865,7 +11018,7 @@ function PullRequest_identifyOrCreatePR($0, $1, $2, $3, $4) {
10865
11018
 
10866
11019
  /* PullRequest.forkedPRs : Maybe GitHubPRState -> Nat -> Nat -> Nat -> () -> Promise Future */
10867
11020
  function PullRequest_forkedPRs($0, $1, $2, $3, $4) {
10868
- return FFI_Concurrency_fork(csegen_94(), Prelude_Types_foldMap_Foldable_List(csegen_70(), $d => $d, {a1: 'pulls --json ', a2: {a1: PullRequest_n__7536_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}}}}}}}));
11021
+ return FFI_Concurrency_fork(csegen_94(), Prelude_Types_foldMap_Foldable_List(csegen_70(), $d => $d, {a1: 'pulls --json ', a2: {a1: PullRequest_n__7556_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}}}}}}}));
10869
11022
  }
10870
11023
 
10871
11024
  /* PullRequest.empty : PRHistory */
@@ -11432,7 +11585,7 @@ function Graph_n__6229_2263_header($0, $1, $2, $3, $4, $5) {
11432
11585
  break;
11433
11586
  }
11434
11587
  }
11435
- const $3d = {a1: $3e, a2: {a1: {a1: Text_PrettyPrint_Prettyprinter_Symbols_parens(Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Graph_n__6229_2261_redDot($0, $1, $2, $3, $4, $5), Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(csegen_62()('overlayed on')), Graph_n__6229_2260_yellowDot($0, $1, $2, $3, $4, $5))))}, a2: csegen_773()}};
11588
+ const $3d = {a1: $3e, a2: {a1: {a1: Text_PrettyPrint_Prettyprinter_Symbols_parens(Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Graph_n__6229_2261_redDot($0, $1, $2, $3, $4, $5), Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(csegen_62()('overlayed on')), Graph_n__6229_2260_yellowDot($0, $1, $2, $3, $4, $5))))}, a2: csegen_799()}};
11436
11589
  const $29 = {a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(csegen_62()('1x the number of closed PRs with unanswered review requests')), Text_PrettyPrint_Prettyprinter_Symbols_parens(Graph_n__6229_2261_redDot($0, $1, $2, $3, $4, $5)))}, a2: $3d};
11437
11590
  const $15 = {a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(csegen_62()('4x the number of open review requests')), Text_PrettyPrint_Prettyprinter_Symbols_parens(Graph_n__6229_2260_yellowDot($0, $1, $2, $3, $4, $5)))}, a2: $29};
11438
11591
  const $d = {a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(csegen_62()('Weighted review workload.'))}, a2: $15};
@@ -11443,7 +11596,7 @@ function Graph_n__6229_2263_header($0, $1, $2, $3, $4, $5) {
11443
11596
 
11444
11597
  /* Graph.5908:1932:header */
11445
11598
  function Graph_n__5908_1932_header($0) {
11446
- 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(csegen_62()('Open Pull Requests grouped by month craetaed.'))}, a2: csegen_773()}}));
11599
+ 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(csegen_62()('Open Pull Requests grouped by month craetaed.'))}, a2: csegen_799()}}));
11447
11600
  }
11448
11601
 
11449
11602
  /* Graph.6229:2262:greenBox */
@@ -11588,9 +11741,9 @@ function Graph_reviewsGraph($0, $1, $2, $3, $4, $5) {
11588
11741
 
11589
11742
  /* Graph.healthGraph : List PullRequest -> Doc AnsiStyle */
11590
11743
  function Graph_healthGraph($0) {
11591
- const $1 = Data_List_groupBy($4 => $5 => Prelude_Basics_on($8 => $9 => Prelude_Basics_on($c => $d => (($c===$d)?1:0), $11 => $11.a2, $8, $9), csegen_625(), $4, $5), Data_List_sortBy(csegen_626(), $0));
11744
+ const $1 = Data_List_groupBy($4 => $5 => Prelude_Basics_on($8 => $9 => Prelude_Basics_on($c => $d => (($c===$d)?1:0), $11 => $11.a2, $8, $9), csegen_621(), $4, $5), Data_List_sortBy(csegen_622(), $0));
11592
11745
  const $1e = Prelude_Types_foldr_Foldable_List(xs => m => Prelude_Types_max_Ord_Nat(Data_List1_length(xs), m), 1n, $1);
11593
- return Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Graph_n__5908_1932_header($0), a2: {a1: Graph_graph({a1: $32 => Graph_totalWidth_Graphable_x28PRsOnDatex20x24dateTyx29(csegen_794(), $32), a2: $38 => Graph_label_Graphable_x28PRsOnDatex20x24dateTyx29(csegen_794(), $38), a3: $3e => Graph_score_Graphable_x28PRsOnDatex20x24dateTyx29(csegen_794(), $3e), a4: $44 => Graph_detractor_Graphable_x28PRsOnDatex20x24dateTyx29(csegen_794(), $44), a5: $4a => Graph_bonus_Graphable_x28PRsOnDatex20x24dateTyx29(csegen_794(), $4a)}, $1e, Graph_n__5908_1930_unfoldGraph($0, Data_Fuel_limit(48n), $1, {h: 0})), a2: {h: 0}}});
11746
+ return Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Graph_n__5908_1932_header($0), a2: {a1: Graph_graph({a1: $32 => Graph_totalWidth_Graphable_x28PRsOnDatex20x24dateTyx29(csegen_820(), $32), a2: $38 => Graph_label_Graphable_x28PRsOnDatex20x24dateTyx29(csegen_820(), $38), a3: $3e => Graph_score_Graphable_x28PRsOnDatex20x24dateTyx29(csegen_820(), $3e), a4: $44 => Graph_detractor_Graphable_x28PRsOnDatex20x24dateTyx29(csegen_820(), $44), a5: $4a => Graph_bonus_Graphable_x28PRsOnDatex20x24dateTyx29(csegen_820(), $4a)}, $1e, Graph_n__5908_1930_unfoldGraph($0, Data_Fuel_limit(48n), $1, {h: 0})), a2: {h: 0}}});
11594
11747
  }
11595
11748
 
11596
11749
  /* Graph.graphOne : Graphable g => Nat -> g -> Doc AnsiStyle */
@@ -11670,7 +11823,7 @@ function BashCompletion_n__4557_8472_slugsOrLoginsOrLabels($0, $1, $2) {
11670
11823
  case 1: return csegen_116()($b => ('+'+$b))($2.a11);
11671
11824
  case 0: {
11672
11825
  switch(BashCompletion_isHashPrefix($1)) {
11673
- case 1: return csegen_809()($2.a10);
11826
+ case 1: return csegen_835()($2.a10);
11674
11827
  case 0: return $2.a9;
11675
11828
  }
11676
11829
  }
@@ -11723,8 +11876,8 @@ function BashCompletion_opts($0, $1, $2, $3) {
11723
11876
  }
11724
11877
  case 'label': {
11725
11878
  switch($2) {
11726
- case '--': return csegen_811()($0.a10);
11727
- default: return Prelude_Types_List_filterAppend({h: 0}, $24 => Data_String_isPrefixOf($2, $24), csegen_811()($0.a10));
11879
+ case '--': return csegen_837()($0.a10);
11880
+ default: return Prelude_Types_List_filterAppend({h: 0}, $24 => Data_String_isPrefixOf($2, $24), csegen_837()($0.a10));
11728
11881
  }
11729
11882
  }
11730
11883
  case 'list': {
@@ -11765,7 +11918,7 @@ function BashCompletion_opts($0, $1, $2, $3) {
11765
11918
  case 'graph': return {a1: '--completed', a2: $0.a9};
11766
11919
  case '--completed': return $0.a9;
11767
11920
  default: {
11768
- switch(Data_Maybe_isJust(Data_List_find($51 => Prelude_EqOrd_x3dx3d_Eq_String($51, $3), csegen_812()))) {
11921
+ switch(Data_Maybe_isJust(Data_List_find($51 => Prelude_EqOrd_x3dx3d_Eq_String($51, $3), csegen_838()))) {
11769
11922
  case 1: return Prelude_Types_List_filterAppend({h: 0}, $5a => Data_String_isPrefixOf($2, $5a), $0.a9);
11770
11923
  case 0: return {h: 0};
11771
11924
  }
@@ -11773,7 +11926,7 @@ function BashCompletion_opts($0, $1, $2, $3) {
11773
11926
  }
11774
11927
  }
11775
11928
  default: {
11776
- switch(Data_Maybe_isJust(Data_List_find($65 => Prelude_EqOrd_x3dx3d_Eq_String($65, $3), csegen_812()))) {
11929
+ switch(Data_Maybe_isJust(Data_List_find($65 => Prelude_EqOrd_x3dx3d_Eq_String($65, $3), csegen_838()))) {
11777
11930
  case 1: return Prelude_Types_List_filterAppend({h: 0}, $6e => Data_String_isPrefixOf($2, $6e), $0.a9);
11778
11931
  case 0: return {h: 0};
11779
11932
  }
@@ -11782,7 +11935,7 @@ function BashCompletion_opts($0, $1, $2, $3) {
11782
11935
  }
11783
11936
  case 'pr': {
11784
11937
  switch(BashCompletion_isHashPrefix($2)) {
11785
- case 1: return csegen_809()($0.a10);
11938
+ case 1: return csegen_835()($0.a10);
11786
11939
  case 0: return {h: 0};
11787
11940
  }
11788
11941
  }
@@ -11900,8 +12053,8 @@ function BashCompletion_cmdOpts($0, $1, $2) {
11900
12053
  }
11901
12054
  case 'contribute': {
11902
12055
  switch($1) {
11903
- case '-': return csegen_816();
11904
- case '--': return csegen_816();
12056
+ case '-': return csegen_842();
12057
+ case '--': return csegen_842();
11905
12058
  default: {
11906
12059
  switch(Data_String_isPrefixOf($1, '--checkout')) {
11907
12060
  case 1: return {a1: {a1: '--checkout', a2: {h: 0}}};
@@ -11918,7 +12071,7 @@ function BashCompletion_cmdOpts($0, $1, $2) {
11918
12071
  case 'graph': {
11919
12072
  switch($1) {
11920
12073
  case '--': return {h: 0};
11921
- case '-': return csegen_818();
12074
+ case '-': return csegen_844();
11922
12075
  default: {
11923
12076
  switch(Data_String_isPrefixOf($1, '--completed')) {
11924
12077
  case 1: return {a1: {a1: '--completed', a2: {h: 0}}};
@@ -12009,8 +12162,8 @@ function BashCompletion_cmdOpts($0, $1, $2) {
12009
12162
  }
12010
12163
  case 'contribute': {
12011
12164
  switch($1) {
12012
- case '-': return csegen_816();
12013
- case '--': return csegen_816();
12165
+ case '-': return csegen_842();
12166
+ case '--': return csegen_842();
12014
12167
  default: {
12015
12168
  switch(Data_String_isPrefixOf($1, '--checkout')) {
12016
12169
  case 1: return {a1: {a1: '--checkout', a2: {h: 0}}};
@@ -12027,7 +12180,7 @@ function BashCompletion_cmdOpts($0, $1, $2) {
12027
12180
  case 'graph': {
12028
12181
  switch($1) {
12029
12182
  case '--': return {h: 0};
12030
- case '-': return csegen_818();
12183
+ case '-': return csegen_844();
12031
12184
  default: {
12032
12185
  switch(Data_String_isPrefixOf($1, '--completed')) {
12033
12186
  case 1: return {a1: {a1: '--completed', a2: {h: 0}}};
@@ -12056,7 +12209,7 @@ function AppVersion_printVersion($0) {
12056
12209
 
12057
12210
  /* AppVersion.appVersion : String */
12058
12211
  const AppVersion_appVersion = __lazy(function () {
12059
- return '2.5.0';
12212
+ return '2.6.0';
12060
12213
  });
12061
12214
 
12062
12215