@mattpolzin/harmony 2.4.0 → 2.4.1

package/harmony

@@ -820,7 +820,7 @@ function x24tcOpt_1($0) {
           case 0: return {h: 0 /* {TcDone:1} */, a1: $0.a5};
           default: {
            const $18 = {a1: $0.a5.a1.a1, a2: $0.a5.a1.a2, a3: $0.a5.a1.a3};
-           const $1c = Data_List_DeleteBy_deleteByx27($1f => $20 => Prelude_Basics_on($23 => $24 => $0.a1.a1.a1($23)($24), csegen_731(), $1f, $20), $18, $0.a6);
+           const $1c = Data_List_DeleteBy_deleteByx27($1f => $20 => Prelude_Basics_on($23 => $24 => $0.a1.a1.a1($23)($24), csegen_729(), $1f, $20), $18, $0.a6);
            switch($1c.a1.h) {
             case 0: /* nothing */ {
              switch($0.a8) {
@@ -835,7 +835,7 @@ function x24tcOpt_1($0) {
         }
         default: {
          const $6b = {a1: $0.a5.a1.a1, a2: $0.a5.a1.a2, a3: $0.a5.a1.a3};
-         const $6f = Data_List_DeleteBy_deleteByx27($72 => $73 => Prelude_Basics_on($76 => $77 => $0.a1.a1.a1($76)($77), csegen_731(), $72, $73), $6b, $0.a6);
+         const $6f = Data_List_DeleteBy_deleteByx27($72 => $73 => Prelude_Basics_on($76 => $77 => $0.a1.a1.a1($76)($77), csegen_729(), $72, $73), $6b, $0.a6);
          switch($6f.a1.h) {
           case 0: /* nothing */ {
            switch($0.a8) {
@@ -860,7 +860,7 @@ function x24tcOpt_1($0) {
       case 0: return {h: 0 /* {TcDone:1} */, a1: $0.a5};
       default: {
        const $c2 = {a1: $0.a5.a1.a1, a2: $0.a5.a1.a2, a3: $0.a5.a1.a3};
-       const $c6 = Data_List_DeleteBy_deleteByx27($c9 => $ca => Prelude_Basics_on($cd => $ce => $0.a1.a1.a1($cd)($ce), csegen_731(), $c9, $ca), $c2, $0.a6);
+       const $c6 = Data_List_DeleteBy_deleteByx27($c9 => $ca => Prelude_Basics_on($cd => $ce => $0.a1.a1.a1($cd)($ce), csegen_729(), $c9, $ca), $c2, $0.a6);
        switch($c6.a1.h) {
         case 0: /* nothing */ {
          switch($0.a8) {
@@ -875,7 +875,7 @@ function x24tcOpt_1($0) {
     }
     default: {
      const $115 = {a1: $0.a5.a1.a1, a2: $0.a5.a1.a2, a3: $0.a5.a1.a3};
-     const $119 = Data_List_DeleteBy_deleteByx27($11c => $11d => Prelude_Basics_on($120 => $121 => $0.a1.a1.a1($120)($121), csegen_731(), $11c, $11d), $115, $0.a6);
+     const $119 = Data_List_DeleteBy_deleteByx27($11c => $11d => Prelude_Basics_on($120 => $121 => $0.a1.a1.a1($120)($121), csegen_729(), $11c, $11d), $115, $0.a6);
      switch($119.a1.h) {
       case 0: /* nothing */ {
        switch($0.a8) {
@@ -2347,124 +2347,124 @@ const csegen_535 = __lazy(function () {
  return {a1: csegen_62()('?'), a2: {h: 0}};
 });
 
-/* {csegen:579} */
-const csegen_579 = __lazy(function () {
+/* {csegen:578} */
+const csegen_578 = __lazy(function () {
  return Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(csegen_62()(', '));
 });
 
-/* {csegen:590} */
-const csegen_590 = __lazy(function () {
+/* {csegen:588} */
+const csegen_588 = __lazy(function () {
  return {a1: csegen_9(), a2: a => ({h: 0}), a3: a => $4 => $5 => Prelude_Types_x3cx7cx3e_Alternative_Maybe($4, $5)};
 });
 
-/* {csegen:592} */
-const csegen_592 = __lazy(function () {
+/* {csegen:590} */
+const csegen_590 = __lazy(function () {
  return csegen_55()($3 => Data_List_sort(csegen_442(), $3));
 });
 
-/* {csegen:593} */
-const csegen_593 = __lazy(function () {
+/* {csegen:591} */
+const csegen_591 = __lazy(function () {
  return $0 => FFI_Concurrency_promiseAll(csegen_193(), $0);
 });
 
-/* {csegen:595} */
-const csegen_595 = __lazy(function () {
+/* {csegen:593} */
+const csegen_593 = __lazy(function () {
  const $0 = $1 => Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String($1);
  return $4 => $0($4);
 });
 
-/* {csegen:606} */
-const csegen_606 = __lazy(function () {
+/* {csegen:604} */
+const csegen_604 = __lazy(function () {
  return csegen_55()($3 => $3.a1);
 });
 
-/* {csegen:608} */
-const csegen_608 = __lazy(function () {
+/* {csegen:606} */
+const csegen_606 = __lazy(function () {
  return $0 => $1 => Data_Date_compare_Ord_Date($0, $1);
 });
 
-/* {csegen:609} */
-const csegen_609 = __lazy(function () {
+/* {csegen:607} */
+const csegen_607 = __lazy(function () {
  return $0 => $0.a2;
 });
 
-/* {csegen:610} */
-const csegen_610 = __lazy(function () {
- return $0 => $1 => Prelude_Basics_on(csegen_608(), csegen_609(), $0, $1);
+/* {csegen:608} */
+const csegen_608 = __lazy(function () {
+ return $0 => $1 => Prelude_Basics_on(csegen_606(), csegen_607(), $0, $1);
 });
 
-/* {csegen:623} */
-const csegen_623 = __lazy(function () {
+/* {csegen:621} */
+const csegen_621 = __lazy(function () {
  return $0 => $0.a2;
 });
 
-/* {csegen:630} */
-const csegen_630 = __lazy(function () {
+/* {csegen:628} */
+const csegen_628 = __lazy(function () {
  return $0 => $0.a1;
 });
 
-/* {csegen:645} */
-const csegen_645 = __lazy(function () {
+/* {csegen:643} */
+const csegen_643 = __lazy(function () {
  return Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(csegen_62()('open:'));
 });
 
-/* {csegen:649} */
-const csegen_649 = __lazy(function () {
+/* {csegen:647} */
+const csegen_647 = __lazy(function () {
  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}}})));
 });
 
-/* {csegen:651} */
-const csegen_651 = __lazy(function () {
+/* {csegen:649} */
+const csegen_649 = __lazy(function () {
  return Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(csegen_62()('closed:'));
 });
 
-/* {csegen:674} */
-const csegen_674 = __lazy(function () {
+/* {csegen:672} */
+const csegen_672 = __lazy(function () {
  return csegen_62()('pr_description.tmp.md');
 });
 
-/* {csegen:724} */
-const csegen_724 = __lazy(function () {
+/* {csegen:722} */
+const csegen_722 = __lazy(function () {
  return $0 => $1 => Data_Promise_reject('Multiple PRs for the current brach. Harmony only handles 1 PR per branch currently.', $0, $1);
 });
 
-/* {csegen:731} */
-const csegen_731 = __lazy(function () {
+/* {csegen:729} */
+const csegen_729 = __lazy(function () {
  return $0 => $0.a1;
 });
 
-/* {csegen:757} */
-const csegen_757 = __lazy(function () {
+/* {csegen:755} */
+const csegen_755 = __lazy(function () {
  return {a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc()}, a2: {a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc()}, a2: {h: 0}}};
 });
 
-/* {csegen:778} */
-const csegen_778 = __lazy(function () {
+/* {csegen:776} */
+const csegen_776 = __lazy(function () {
  return {a1: ann => $1 => Graph_pretty_Pretty_Date($1), a2: ann => $5 => $6 => Graph_prettyPrec_Pretty_Date($5, $6)};
 });
 
+/* {csegen:791} */
+const csegen_791 = __lazy(function () {
+ return csegen_116()($3 => BashCompletion_hashify(BashCompletion_slugify($3)));
+});
+
 /* {csegen:793} */
 const csegen_793 = __lazy(function () {
- return csegen_116()($3 => ('#'+BashCompletion_slugify($3)));
+ return csegen_116()($3 => BashCompletion_slugify($3));
 });
 
-/* {csegen:795} */
-const csegen_795 = __lazy(function () {
- return csegen_116()($3 => BashCompletion_slugify($3));
+/* {csegen:794} */
+const csegen_794 = __lazy(function () {
+ return {a1: '--completed', a2: {a1: 'graph', a2: {h: 0}}};
 });
 
 /* {csegen:796} */
 const csegen_796 = __lazy(function () {
- return {a1: '--completed', a2: {a1: 'graph', a2: {h: 0}}};
+ return {a1: {a1: '--checkout', a2: {a1: '-c', a2: {h: 0}}}};
 });
 
 /* {csegen:798} */
 const csegen_798 = __lazy(function () {
- return {a1: {a1: '--checkout', a2: {a1: '-c', a2: {h: 0}}}};
-});
-
-/* {csegen:800} */
-const csegen_800 = __lazy(function () {
  return {a1: {a1: '--completed', a2: {a1: '-c', a2: {h: 0}}}};
 });
 
@@ -2473,18 +2473,18 @@ function prim__sub_Integer($0, $1) {
  return ($0-$1);
 }
 
-/* Main.6933:1348:parsePg */
-function Main_n__6933_1348_parsePg($0, $1, $2, $3, $4, $5, $6) {
+/* Main.6951:1348:parsePg */
+function Main_n__6951_1348_parsePg($0, $1, $2, $3, $4, $5, $6) {
  return Data_String_parsePositive(csegen_2(), $6);
 }
 
-/* Main.6933:1347:parseLim */
-function Main_n__6933_1347_parseLim($0, $1, $2, $3, $4, $5) {
+/* Main.6951:1347:parseLim */
+function Main_n__6951_1347_parseLim($0, $1, $2, $3, $4, $5) {
  return Prelude_Interfaces_x3cx3dx3c(csegen_14(), x => Data_Fin_natToFin(x, 101n), $e => Data_String_parsePositive(csegen_2(), $e));
 }
 
-/* Main.6794:1149:configuredOpts */
-function Main_n__6794_1149_configuredOpts($0, $1, $2, $3) {
+/* Main.6812:1149:configuredOpts */
+function Main_n__6812_1149_configuredOpts($0, $1, $2, $3) {
  const $11 = $12 => {
   switch($12.h) {
    case 1: /* Right */ return $0.a1.a1.a2(undefined)(BashCompletion_opts($12.a1, $3, $2, $1));
@@ -2706,7 +2706,7 @@ function Main_handleAuthenticatedArgs($0, $1, $2, $3) {
                   }
                   return Prelude_Types_x3ex3ex3d_Monad_Maybe($a7, filter => ({a1: {a1: filter, a2: {a1: $a4.a1, a2: $a4.a2}}}));
                  };
-                 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__6933_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__6933_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);
+                 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__6951_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__6951_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);
                  switch($84.h) {
                   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));
                   case 0: /* nothing */ return csegen_68();
@@ -2912,7 +2912,7 @@ function Main_exitError($0, $1) {
 
 /* Main.bashCompletion : HasIO io => String -> String -> String -> io () */
 function Main_bashCompletion($0, $1, $2, $3) {
- const $4 = Prelude_Types_maybe(() => Main_n__6794_1149_configuredOpts($0, $3, $2, $1), () => $d => $0.a1.a1.a2(undefined)($d), BashCompletion_cmdOpts($1, $2, $3));
+ const $4 = Prelude_Types_maybe(() => Main_n__6812_1149_configuredOpts($0, $3, $2, $1), () => $d => $0.a1.a1.a2(undefined)($d), BashCompletion_cmdOpts($1, $2, $3));
  return $0.a1.a2(undefined)(undefined)($4)($24 => $0.a2(undefined)($2a => Prelude_IO_prim__putStr(Data_String_fastUnlines($24), $2a)));
 }
 
@@ -9660,7 +9660,7 @@ function Data_List_PrefixSuffix_dropPrefix($0, $1, $2) {
 }
 
 /* Commands.case block in contribute */
-function Commands_case__contribute_2450($0, $1, $2, $3, $4, $5, $6, $7, $8, $9, $a) {
+function Commands_case__contribute_2594($0, $1, $2, $3, $4, $5, $6, $7, $8, $9, $a) {
  const $c = Data_List_headx27(Data_List_drop($6, Prelude_Types_List_tailRecAppend($a.a1, $a.a2)));
  switch($c.h) {
   case 0: /* nothing */ return $16 => $17 => Data_Promise_reject(csegen_62()('No open PRs to review!'), $16, $17);
@@ -9683,7 +9683,7 @@ function Commands_case__contribute_2450($0, $1, $2, $3, $4, $5, $6, $7, $8, $9,
 }
 
 /* Commands.case block in case block in graph */
-function Commands_case__casex20blockx20inx20graph_2024($0, $1, $2, $3, $4, $5, $6, $7) {
+function Commands_case__casex20blockx20inx20graph_2168($0, $1, $2, $3, $4, $5, $6, $7) {
  let $a;
  switch(Data_Maybe_isJust($3)) {
   case 1: {
@@ -9699,15 +9699,15 @@ function Commands_case__casex20blockx20inx20graph_2024($0, $1, $2, $3, $4, $5, $
 }
 
 /* Commands.case block in graph */
-function Commands_case__graph_1982($0, $1, $2, $3, $4) {
+function Commands_case__graph_2126($0, $1, $2, $3, $4) {
  switch($4.h) {
-  case undefined: /* just */ return Data_Promise_x3ex3ex3d_Monad_Promise(FFI_GitHub_listTeamMembers($0, $2.a2, $4.a1), teamMemberLogins => Data_Promise_x3ex3ex3d_Monad_Promise(PullRequest_listPartitionedPRs($2, $0, 4n, 100n), prs => Commands_case__casex20blockx20inx20graph_2024($0, $1, $2, $3, $4.a1, teamMemberLogins, prs, PullRequest_rf__allReviewers(prs))));
+  case undefined: /* just */ return Data_Promise_x3ex3ex3d_Monad_Promise(FFI_GitHub_listTeamMembers($0, $2.a2, $4.a1), teamMemberLogins => Data_Promise_x3ex3ex3d_Monad_Promise(PullRequest_listPartitionedPRs($2, $0, 4n, 100n), prs => Commands_case__casex20blockx20inx20graph_2168($0, $1, $2, $3, $4.a1, teamMemberLogins, prs, PullRequest_rf__allReviewers(prs))));
   case 0: /* nothing */ return $21 => $22 => Data_Promise_reject('The graph command expects the name of a GitHub Team as an argument.', $21, $22);
  }
 }
 
 /* Commands.case block in assign */
-function Commands_case__assign_1622($0, $1, $2, $3, $4, $5) {
+function Commands_case__assign_1766($0, $1, $2, $3, $4, $5) {
  let $8;
  switch(Prelude_Types_null_Foldable_List($5.a1)) {
   case 1: {
@@ -9756,52 +9756,43 @@ function Commands_case__assign_1622($0, $1, $2, $3, $4, $5) {
 }
 
 /* Commands.case block in case block in assign,partitionedArgs */
-function Commands_case__casex20blockx20inx20assignx2cpartitionedArgs_1542($0, $1, $2, $3, $4, $5, $6, $7) {
+function Commands_case__casex20blockx20inx20assignx2cpartitionedArgs_1686($0, $1, $2, $3, $4, $5, $6, $7) {
  const $9 = Prelude_Interfaces_mapHom({a1: d => b => c => a => $d => $e => $f => ({a1: $d($f.a1), a2: $e($f.a2)}), a2: b => c => a => $18 => $19 => ({a1: $18($19.a1), a2: $19.a2}), a3: a => d => b => $20 => $21 => ({a1: $21.a1, a2: $20($21.a2)})}, csegen_116()($2b => Data_String_Extra_drop(1n, $2b)), {a1: $5, a2: $7.a1});
  return {a1: $9.a1, a2: {a1: $7.a2, a2: $9.a2}};
 }
 
 /* Commands.case block in assign,partitionedArgs */
-function Commands_case__assignx2cpartitionedArgs_1516($0, $1, $2, $3, $4, $5) {
- return Commands_case__casex20blockx20inx20assignx2cpartitionedArgs_1542($0, $1, $2, $3, $4, $5.a1, $5.a2, Data_List_partition($12 => Data_String_isPrefixOf('#', $12), $5.a2));
+function Commands_case__assignx2cpartitionedArgs_1663($0, $1, $2, $3, $4, $5) {
+ return Commands_case__casex20blockx20inx20assignx2cpartitionedArgs_1686($0, $1, $2, $3, $4, $5.a1, $5.a2, Data_List_partition($12 => BashCompletion_isHashPrefix($12), $5.a2));
 }
 
-/* Commands.6956:1096:unslugify */
-function Commands_n__6956_1096_unslugify($0, $1, $2, $3, $4, $5) {
- const $6 = Data_List_find($9 => Prelude_EqOrd_x3dx3d_Eq_String($9, $5), $4);
- switch($6.h) {
-  case undefined: /* just */ return $6.a1;
-  case 0: /* nothing */ return BashCompletion_unslugify($5);
- }
-}
-
-/* Commands.7702:1778:putNameLn */
-function Commands_n__7702_1778_putNameLn($0, $1, $2, $3) {
+/* Commands.7860:1922:putNameLn */
+function Commands_n__7860_1922_putNameLn($0, $1, $2, $3) {
  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}}}});
 }
 
-/* Commands.6956:1098:putLabels */
-function Commands_n__6956_1098_putLabels($0, $1, $2, $3, $4) {
- return Text_PrettyPrint_Prettyprinter_Doc_hcat(Data_List_intersperse(csegen_579(), csegen_116()($f => Commands_n__6956_1097_putLabel($0, $1, $2, $3, $f))($4)));
+/* Commands.7181:1299:putLabels */
+function Commands_n__7181_1299_putLabels($0, $1, $2, $3, $4) {
+ return Text_PrettyPrint_Prettyprinter_Doc_hcat(Data_List_intersperse(csegen_578(), csegen_116()($f => Commands_n__7181_1298_putLabel($0, $1, $2, $3, $f))($4)));
 }
 
-/* Commands.6956:1097:putLabel */
-function Commands_n__6956_1097_putLabel($0, $1, $2, $3, $4) {
+/* Commands.7181:1298:putLabel */
+function Commands_n__7181_1298_putLabel($0, $1, $2, $3, $4) {
  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)));
 }
 
-/* Commands.7375:1504:partitionedArgs */
-function Commands_n__7375_1504_partitionedArgs($0, $1, $2, $3, $4) {
- return Commands_case__assignx2cpartitionedArgs_1516($0, $1, $2, $3, $4, Data_List_partition($e => Data_String_isPrefixOf('+', $e), $4));
+/* Commands.7536:1651:partitionedArgs */
+function Commands_n__7536_1651_partitionedArgs($0, $1, $2, $3, $4) {
+ return Commands_case__assignx2cpartitionedArgs_1663($0, $1, $2, $3, $4, Data_List_partition($e => Data_String_isPrefixOf('+', $e), $4));
 }
 
-/* Commands.8152:2229:parseTeamArg */
-function Commands_n__8152_2229_parseTeamArg($0, $1) {
+/* Commands.8310:2373:parseTeamArg */
+function Commands_n__8310_2373_parseTeamArg($0, $1) {
  return {a1: {a1: $1}};
 }
 
-/* Commands.8543:2605:parseSkipArg */
-function Commands_n__8543_2605_parseSkipArg($0, $1) {
+/* Commands.8701:2749:parseSkipArg */
+function Commands_n__8701_2749_parseSkipArg($0, $1) {
  const $2 = Prelude_Types_fastUnpack($1);
  switch($2.h) {
   case undefined: /* cons */ {
@@ -9823,8 +9814,8 @@ function Commands_n__8543_2605_parseSkipArg($0, $1) {
  }
 }
 
-/* Commands.8152:2228:parseCompletedFlag */
-function Commands_n__8152_2228_parseCompletedFlag($0, $1) {
+/* Commands.8310:2372:parseCompletedFlag */
+function Commands_n__8310_2372_parseCompletedFlag($0, $1) {
  switch($1) {
   case '-c': return {a1: {h: 0}};
   case '--completed': return {a1: {h: 0}};
@@ -9832,8 +9823,8 @@ function Commands_n__8152_2228_parseCompletedFlag($0, $1) {
  }
 }
 
-/* Commands.8543:2604:parseCheckoutFlag */
-function Commands_n__8543_2604_parseCheckoutFlag($0, $1) {
+/* Commands.8701:2748:parseCheckoutFlag */
+function Commands_n__8701_2748_parseCheckoutFlag($0, $1) {
  switch($1) {
   case '-c': return {a1: {h: 0}};
   case '--checkout': return {a1: {h: 0}};
@@ -9841,8 +9832,8 @@ function Commands_n__8543_2604_parseCheckoutFlag($0, $1) {
  }
 }
 
-/* Commands.7702:1777:forkedUser */
-function Commands_n__7702_1777_forkedUser($0, $1, $2, $3) {
+/* Commands.7860:1921:forkedUser */
+function Commands_n__7860_1921_forkedUser($0, $1, $2, $3) {
  return FFI_Concurrency_fork(csegen_94(), ('user --json '+$3));
 }
 
@@ -9851,6 +9842,15 @@ function Commands_whoami($0, $1, $2) {
  return User_Me_printInfoOnSelf($0, $2, $1);
 }
 
+/* Commands.unslugifyLabel : List String -> String -> String */
+function Commands_unslugifyLabel($0, $1) {
+ const $2 = Data_List_find($5 => Prelude_EqOrd_x3dx3d_Eq_String($5, $1), $0);
+ switch($2.h) {
+  case undefined: /* just */ return $2.a1;
+  case 0: /* nothing */ return BashCompletion_unslugify(BashCompletion_unhashify($1));
+ }
+}
+
 /* Commands.teamNameArg : GraphArg -> Maybe String */
 function Commands_teamNameArg($0) {
  switch($0.h) {
@@ -9880,34 +9880,34 @@ function Commands_reflect($0, $1) {
 /* Commands.pr : Config => Git => Octokit => {default False _ : Bool} ->
 List String -> Promise () */
 function Commands_pr($0, $1, $2, $3, $4) {
- switch(Prelude_Types_foldMap_Foldable_List({a1: $9 => $a => Prelude_Interfaces_Bool_Semigroup_x3cx2bx3e_Semigroup_AllBool($9, $a), a2: 1}, $10 => Data_String_isPrefixOf('#', $10), $4)) {
+ switch(Prelude_Types_foldMap_Foldable_List({a1: $9 => $a => Prelude_Interfaces_Bool_Semigroup_x3cx2bx3e_Semigroup_AllBool($9, $a), a2: 1}, $10 => BashCompletion_isHashPrefix($10), $4)) {
   case 1: {
-   const $23 = $24 => {
-    const $27 = $28 => $29 => {
-     switch($24.a1) {
-      case 0: return $2b => Data_Promise_liftIO_HasIO_Promise($2e => Prelude_IO_prim__putStr((Data_PullRequest_rf__webURI($0, $24.a2)+'\n'), $2e), $28, $29, $2b);
-      case 1: return Data_Promise_pure_Applicative_Promise(undefined, $28, $29);
+   const $22 = $23 => {
+    const $26 = $27 => $28 => {
+     switch($23.a1) {
+      case 0: return $2a => Data_Promise_liftIO_HasIO_Promise($2d => Prelude_IO_prim__putStr((Data_PullRequest_rf__webURI($0, $23.a2)+'\n'), $2d), $27, $28, $2a);
+      case 1: return Data_Promise_pure_Applicative_Promise(undefined, $27, $28);
      }
     };
-    const $3e = $3f => {
-     let $43;
+    const $3d = $3e => {
+     let $42;
      switch(Prelude_Types_null_Foldable_List($4)) {
       case 1: {
-       $43 = 0;
+       $42 = 0;
        break;
       }
       case 0: {
-       $43 = 1;
+       $42 = 1;
        break;
       }
      }
-     return Prelude_Interfaces_when(csegen_86(), $43, () => Commands_label($0, $1, $2, $4));
+     return Prelude_Interfaces_when(csegen_86(), $42, () => Commands_label($0, $1, $2, $4));
     };
-    return Data_Promise_x3ex3ex3d_Monad_Promise($27, $3e);
+    return Data_Promise_x3ex3ex3d_Monad_Promise($26, $3d);
    };
-   return Data_Promise_x3ex3ex3d_Monad_Promise(Data_Promise_x3ex3ex3d_Monad_Promise(FFI_Git_currentBranch($1), $1c => PullRequest_identifyOrCreatePR($0, $1, $2, $3, $1c)), $23);
+   return Data_Promise_x3ex3ex3d_Monad_Promise(Data_Promise_x3ex3ex3d_Monad_Promise(FFI_Git_currentBranch($1), $1b => PullRequest_identifyOrCreatePR($0, $1, $2, $3, $1b)), $22);
   }
-  case 0: return $4d => $4e => Data_Promise_reject('The pr command only accepts labels prefixed with \'#\' and the --draft flag.', $4d, $4e);
+  case 0: return $4c => $4d => Data_Promise_reject('The pr command only accepts labels prefixed with \'#\' and the --draft flag.', $4c, $4d);
  }
 }
 
@@ -9921,7 +9921,7 @@ function Commands_parseGraphArgs($0) {
      switch($0.a2.a2.h) {
       case undefined: /* cons */ return {h: 0 /* Left */, a1: 'graph accepts at most one team name and the --completed flag.'};
       default: {
-       const $6 = Prelude_Types_traverse_Traversable_List(csegen_9(), $b => Commands_x3cx7cx7cx3e(csegen_590(), $10 => Commands_n__8152_2228_parseCompletedFlag($0, $10), $15 => Commands_n__8152_2229_parseTeamArg($0, $15), $b), $0);
+       const $6 = Prelude_Types_traverse_Traversable_List(csegen_9(), $b => Commands_x3cx7cx7cx3e(csegen_588(), $10 => Commands_n__8310_2372_parseCompletedFlag($0, $10), $15 => Commands_n__8310_2373_parseTeamArg($0, $15), $b), $0);
        switch($6.h) {
         case undefined: /* just */ return {h: 1 /* Right */, a1: $6.a1};
         case 0: /* nothing */ return {h: 0 /* Left */, a1: 'The graph command expects the name of a GitHub Team and optionally --completed as arguments.'};
@@ -9930,7 +9930,7 @@ function Commands_parseGraphArgs($0) {
      }
     }
     default: {
-     const $1d = Prelude_Types_traverse_Traversable_List(csegen_9(), $22 => Commands_x3cx7cx7cx3e(csegen_590(), $27 => Commands_n__8152_2228_parseCompletedFlag($0, $27), $2c => Commands_n__8152_2229_parseTeamArg($0, $2c), $22), $0);
+     const $1d = Prelude_Types_traverse_Traversable_List(csegen_9(), $22 => Commands_x3cx7cx7cx3e(csegen_588(), $27 => Commands_n__8310_2372_parseCompletedFlag($0, $27), $2c => Commands_n__8310_2373_parseTeamArg($0, $2c), $22), $0);
      switch($1d.h) {
       case undefined: /* just */ return {h: 1 /* Right */, a1: $1d.a1};
       case 0: /* nothing */ return {h: 0 /* Left */, a1: 'The graph command expects the name of a GitHub Team and optionally --completed as arguments.'};
@@ -9939,7 +9939,7 @@ function Commands_parseGraphArgs($0) {
    }
   }
   default: {
-   const $34 = Prelude_Types_traverse_Traversable_List(csegen_9(), $39 => Commands_x3cx7cx7cx3e(csegen_590(), $3e => Commands_n__8152_2228_parseCompletedFlag($0, $3e), $43 => Commands_n__8152_2229_parseTeamArg($0, $43), $39), $0);
+   const $34 = Prelude_Types_traverse_Traversable_List(csegen_9(), $39 => Commands_x3cx7cx7cx3e(csegen_588(), $3e => Commands_n__8310_2372_parseCompletedFlag($0, $3e), $43 => Commands_n__8310_2373_parseTeamArg($0, $43), $39), $0);
    switch($34.h) {
     case undefined: /* just */ return {h: 1 /* Right */, a1: $34.a1};
     case 0: /* nothing */ return {h: 0 /* Left */, a1: 'The graph command expects the name of a GitHub Team and optionally --completed as arguments.'};
@@ -9958,7 +9958,7 @@ function Commands_parseContributeArgs($0) {
      switch($0.a2.a2.h) {
       case undefined: /* cons */ return {h: 0 /* Left */, a1: 'contribute\'s arguments must be either -<num> to skip num PRs or --checkout (-c) to checkout the branch needing review.'};
       default: {
-       const $6 = Prelude_Types_traverse_Traversable_List(csegen_9(), $b => Commands_x3cx7cx7cx3e(csegen_590(), $10 => Commands_n__8543_2605_parseSkipArg($0, $10), $15 => Commands_n__8543_2604_parseCheckoutFlag($0, $15), $b), $0);
+       const $6 = Prelude_Types_traverse_Traversable_List(csegen_9(), $b => Commands_x3cx7cx7cx3e(csegen_588(), $10 => Commands_n__8701_2749_parseSkipArg($0, $10), $15 => Commands_n__8701_2748_parseCheckoutFlag($0, $15), $b), $0);
        switch($6.h) {
         case undefined: /* just */ return {h: 1 /* Right */, a1: $6.a1};
         case 0: /* nothing */ return {h: 0 /* Left */, a1: 'contribute\'s arguments must be either -<num> to skip num PRs or --checkout (-c) to checkout the branch needing review.'};
@@ -9967,7 +9967,7 @@ function Commands_parseContributeArgs($0) {
      }
     }
     default: {
-     const $1d = Prelude_Types_traverse_Traversable_List(csegen_9(), $22 => Commands_x3cx7cx7cx3e(csegen_590(), $27 => Commands_n__8543_2605_parseSkipArg($0, $27), $2c => Commands_n__8543_2604_parseCheckoutFlag($0, $2c), $22), $0);
+     const $1d = Prelude_Types_traverse_Traversable_List(csegen_9(), $22 => Commands_x3cx7cx7cx3e(csegen_588(), $27 => Commands_n__8701_2749_parseSkipArg($0, $27), $2c => Commands_n__8701_2748_parseCheckoutFlag($0, $2c), $22), $0);
      switch($1d.h) {
       case undefined: /* just */ return {h: 1 /* Right */, a1: $1d.a1};
       case 0: /* nothing */ return {h: 0 /* Left */, a1: 'contribute\'s arguments must be either -<num> to skip num PRs or --checkout (-c) to checkout the branch needing review.'};
@@ -9976,7 +9976,7 @@ function Commands_parseContributeArgs($0) {
    }
   }
   default: {
-   const $34 = Prelude_Types_traverse_Traversable_List(csegen_9(), $39 => Commands_x3cx7cx7cx3e(csegen_590(), $3e => Commands_n__8543_2605_parseSkipArg($0, $3e), $43 => Commands_n__8543_2604_parseCheckoutFlag($0, $43), $39), $0);
+   const $34 = Prelude_Types_traverse_Traversable_List(csegen_9(), $39 => Commands_x3cx7cx7cx3e(csegen_588(), $3e => Commands_n__8701_2749_parseSkipArg($0, $3e), $43 => Commands_n__8701_2748_parseCheckoutFlag($0, $43), $39), $0);
    switch($34.h) {
     case undefined: /* just */ return {h: 1 /* Right */, a1: $34.a1};
     case 0: /* nothing */ return {h: 0 /* Left */, a1: 'contribute\'s arguments must be either -<num> to skip num PRs or --checkout (-c) to checkout the branch needing review.'};
@@ -9987,14 +9987,14 @@ function Commands_parseContributeArgs($0) {
 
 /* Commands.list : Config => Octokit => String -> Promise () */
 function Commands_list($0, $1, $2) {
- return Data_Promise_x3ex3ex3d_Monad_Promise(csegen_592()(FFI_GitHub_listTeamMembers($1, $0.a2, $2)), teamMemberLogins => Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Basics_flip(csegen_449(), csegen_593(), Prelude_Types_traverse_Traversable_List(csegen_86(), $1a => Commands_n__7702_1777_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__7702_1778_putNameLn($1, $2, $0, $3e))(teamMembers))))));
+ return Data_Promise_x3ex3ex3d_Monad_Promise(csegen_590()(FFI_GitHub_listTeamMembers($1, $0.a2, $2)), teamMemberLogins => Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Basics_flip(csegen_449(), csegen_591(), Prelude_Types_traverse_Traversable_List(csegen_86(), $1a => Commands_n__7860_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__7860_1922_putNameLn($1, $2, $0, $3e))(teamMembers))))));
 }
 
 /* Commands.label : Config => Git => Octokit => List String -> Promise () */
 function Commands_label($0, $1, $2, $3) {
  const $12 = $13 => {
-  const $15 = csegen_116()($1a => Commands_n__6956_1096_unslugify($1, $2, $3, $0, $0.a10, $1a))($3);
-  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_595()('Added'), csegen_491()(Commands_n__6956_1098_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(), $55 => $55, {a1: csegen_62()('All labels for PR of '), a2: {a1: csegen_62()($13.a2.a7), a2: {a1: csegen_62()(':'), a2: {h: 0}}}})), csegen_491()(Commands_n__6956_1098_putLabels($1, $2, $3, $0, allLabels))(Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Text_PrettyPrint_Prettyprinter_Doc_unsafeTextWithoutNewLines('.'), a2: {h: 0}}))), a2: {h: 0}}})));
+  const $15 = csegen_116()($1a => Commands_unslugifyLabel($0.a10, $1a))($3);
+  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_593()('Added'), csegen_491()(Commands_n__7181_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_491()(Commands_n__7181_1299_putLabels($1, $2, $3, $0, allLabels))(Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Text_PrettyPrint_Prettyprinter_Doc_unsafeTextWithoutNewLines('.'), a2: {h: 0}}))), a2: {h: 0}}})));
  };
  return Data_Promise_x3ex3ex3d_Monad_Promise(Data_Promise_x3ex3ex3d_Monad_Promise(FFI_Git_currentBranch($1), $b => PullRequest_identifyOrCreatePR($0, $1, $2, 0, $b)), $12);
 }
@@ -10013,7 +10013,7 @@ function Commands_graph($0, $1, $2) {
   }
  };
  const $3 = Data_List_find($5, $2);
- return Commands_case__graph_1982($1, $2, $0, $3, Data_List_headx27(Prelude_Types_List_mapMaybeAppend({h: 0}, $14 => Commands_teamNameArg($14), $2)));
+ return Commands_case__graph_2126($1, $2, $0, $3, Data_List_headx27(Prelude_Types_List_mapMaybeAppend({h: 0}, $14 => Commands_teamNameArg($14), $2)));
 }
 
 /* Commands.contribute : Config => Git => Octokit => List ContributeArg -> Promise () */
@@ -10036,9 +10036,9 @@ function Commands_contribute($0, $1, $2, $3) {
    };
    const $2c = Prelude_Types_List_filterAppend({h: 0}, $2f, openPrs);
    const $36 = Data_List_partition($39 => Data_PullRequest_isRequestedReviewer(myLogin, $39), $2c);
-   return Commands_case__contribute_2450($1, $2, $3, $0, openPrs, myLogin, $19, $26, $2c, $36, Prelude_Interfaces_mapHom({a1: d => b => c => a => $4d => $4e => $4f => ({a1: $4d($4f.a1), a2: $4e($4f.a2)}), a2: b => c => a => $58 => $59 => ({a1: $58($59.a1), a2: $59.a2}), a3: a => d => b => $60 => $61 => ({a1: $61.a1, a2: $60($61.a2)})}, $68 => Data_List_sortBy(csegen_610(), $68), $36));
+   return Commands_case__contribute_2594($1, $2, $3, $0, openPrs, myLogin, $19, $26, $2c, $36, Prelude_Interfaces_mapHom({a1: d => b => c => a => $4d => $4e => $4f => ({a1: $4d($4f.a1), a2: $4e($4f.a2)}), a2: b => c => a => $58 => $59 => ({a1: $58($59.a1), a2: $59.a2}), a3: a => d => b => $60 => $61 => ({a1: $61.a1, a2: $60($61.a2)})}, $68 => Data_List_sortBy(csegen_608(), $68), $36));
   };
-  return Data_Promise_x3ex3ex3d_Monad_Promise(csegen_606()(FFI_GitHub_getSelf($2)), $18);
+  return Data_Promise_x3ex3ex3d_Monad_Promise(csegen_604()(FFI_GitHub_getSelf($2)), $18);
  };
  return Data_Promise_x3ex3ex3d_Monad_Promise(FFI_GitHub_listPullRequests($2, $0.a2, $0.a3, {a1: 0}, 100n, 0n), $10);
 }
@@ -10057,7 +10057,7 @@ function Commands_branch($0, $1) {
 /* Commands.assign : Config => Git => Octokit => List String -> {default False _ : Bool} ->
 Promise () */
 function Commands_assign($0, $1, $2, $3, $4) {
- return Commands_case__assign_1622($0, $1, $2, $4, $3, Commands_n__7375_1504_partitionedArgs($0, $1, $2, $4, $3));
+ return Commands_case__assign_1766($0, $1, $2, $4, $3, Commands_n__7536_1651_partitionedArgs($0, $1, $2, $4, $3));
 }
 
 /* Commands.<||> : Alternative t => (a -> t b) -> (a -> t b) -> a -> t b */
@@ -10067,7 +10067,7 @@ function Commands_x3cx7cx7cx3e($0, $1, $2, $3) {
 
 /* User.Reflect.case block in case block in reflectOnSelf */
 function User_Reflect_case__casex20blockx20inx20reflectOnSelf_1862($0, $1, $2, $3, $4, $5, $6, $7, $8, $9) {
- 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_623())($2a))), {a1: $7, a2: $9.a1});
+ 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_621())($2a))), {a1: $7, a2: $9.a1});
  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));
 }
 
@@ -10083,7 +10083,7 @@ function User_Me_n__7184_1985_teams($0, $1, $2) {
 
 /* User.Me.7184:1984:login */
 function User_Me_n__7184_1984_login($0, $1, $2) {
- return Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(csegen_595()('GitHub Login:'), User_Me_n__7184_1981_green($0, $1, $2, $1.a1));
+ return Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(csegen_593()('GitHub Login:'), User_Me_n__7184_1981_green($0, $1, $2, $1.a1));
 }
 
 /* User.Reflect.6277:1056:ital */
@@ -10111,7 +10111,7 @@ function User_Me_n__7184_1981_green($0, $1, $2, $3) {
 
 /* User.Me.7184:1983:fullName */
 function User_Me_n__7184_1983_fullName($0, $1, $2) {
- return Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(csegen_595()('GitHub Name:'), User_Me_n__7184_1981_green($0, $1, $2, $1.a2));
+ return Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(csegen_593()('GitHub Name:'), User_Me_n__7184_1981_green($0, $1, $2, $1.a2));
 }
 
 /* User.Me.7184:1982:email */
@@ -10127,7 +10127,7 @@ function User_Me_n__7184_1982_email($0, $1, $2) {
    break;
   }
  }
- return Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(csegen_595()('Git Email:'), $8);
+ return Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(csegen_593()('Git Email:'), $8);
 }
 
 /* User.Reflect.rightTitle : String */
@@ -10150,21 +10150,21 @@ function User_Reflect_reflectOnSelf($0, $1) {
  const $a = prs => {
   const $12 = myLogin => {
    const $2e = reviews => {
-    const $2f = csegen_60()(csegen_630())(Data_List_headx27(Data_List_sortBy($3a => $3b => Prelude_Basics_on(csegen_608(), csegen_630(), $3a, $3b), reviews)));
+    const $2f = csegen_60()(csegen_628())(Data_List_headx27(Data_List_sortBy($3a => $3b => Prelude_Basics_on(csegen_606(), csegen_628(), $3a, $3b), reviews)));
     const $44 = PullRequest_tuple(prs);
     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);
     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));
    };
-   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_608(), csegen_623(), $22, $23), PullRequest_combined(prs))))), $2e);
+   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_606(), csegen_621(), $22, $23), PullRequest_combined(prs))))), $2e);
   };
-  return Data_Promise_x3ex3ex3d_Monad_Promise(csegen_606()(FFI_GitHub_getSelf($1)), $12);
+  return Data_Promise_x3ex3ex3d_Monad_Promise(csegen_604()(FFI_GitHub_getSelf($1)), $12);
  };
  return Data_Promise_x3ex3ex3d_Monad_Promise(PullRequest_listPartitionedPRs($0, $1, 4n, User_Reflect_prCount()), $a);
 }
 
 /* User.Me.printInfoOnSelf : Config => Octokit => Git => Promise () */
 function User_Me_printInfoOnSelf($0, $1, $2) {
- return Data_Promise_x3ex3ex3d_Monad_Promise(csegen_55()($9 => User_Me_n__7324_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_592()(FFI_GitHub_listMyTeams($1)), githubTeams => Util_renderIO($0, csegen_94(), User_Me_print(gitEmail, githubUser, githubTeams)))));
+ return Data_Promise_x3ex3ex3d_Monad_Promise(csegen_55()($9 => User_Me_n__7324_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_590()(FFI_GitHub_listMyTeams($1)), githubTeams => Util_renderIO($0, csegen_94(), User_Me_print(gitEmail, githubUser, githubTeams)))));
 }
 
 /* User.Reflect.print : Nat -> Nat -> Nat -> Nat -> Nat -> Nat -> Maybe Date -> Maybe Date -> Maybe Date -> Doc AnsiStyle */
@@ -10212,7 +10212,7 @@ function User_Reflect_graph($0, $1, $2, $3, $4, $5) {
 
 /* User.Reflect.details : Nat -> Nat -> Nat -> Nat -> Nat -> Nat -> Maybe Date -> Maybe Date -> Maybe Date -> Doc AnsiStyle */
 function User_Reflect_details($0, $1, $2, $3, $4, $5, $6, $7, $8) {
- 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_645(), 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_649()($8), a2: {a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_hsep({a1: csegen_651(), 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_645(), 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_649()($7), a2: {a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_hsep({a1: csegen_651(), 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}}}}}}}}}});
+ 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_643(), 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_647()($8), a2: {a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_hsep({a1: csegen_649(), 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_643(), 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_647()($7), a2: {a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_hsep({a1: csegen_649(), 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}}}}}}}}}});
 }
 
 /* User.Reflect.chart : Nat -> Nat -> Nat -> Nat -> Nat -> Nat -> Nat -> Doc AnsiStyle */
@@ -10357,15 +10357,15 @@ function PullRequest_n__9013_2624_editorDescription($0, $1, $2, $3, $4, $5, $6,
         const $62 = $5.a1.a1.a1;
         const $61 = $66 => $67 => $62(undefined)(undefined)($66)($67);
         const $60 = $61($71 => (undefined));
-        return $60(System_File_ReadWrite_removeFile($5, csegen_674()));
+        return $60(System_File_ReadWrite_removeFile($5, csegen_672()));
        };
        return Prelude_Interfaces_when($5.a1.a1, $59, $5f);
       };
-      const $4a = $5.a1.a2(undefined)(undefined)(System_File_Meta_exists($5, csegen_674()))($58);
+      const $4a = $5.a1.a2(undefined)(undefined)(System_File_Meta_exists($5, csegen_672()))($58);
       const $44 = $5.a1.a2(undefined)(undefined)($4a);
       return $44($78 => $5.a1.a1.a2(undefined)(description));
      };
-     return $5.a1.a2(undefined)(undefined)(System_File_ReadWrite_readFile($5, csegen_674()))($41);
+     return $5.a1.a2(undefined)(undefined)(System_File_ReadWrite_readFile($5, csegen_672()))($41);
     }
     default: return $5.a1.a1.a2(undefined)({h: 0 /* Left */, a1: {h: 0 /* GenericFileError */, a1: $32}});
    }
@@ -10377,7 +10377,7 @@ function PullRequest_n__9013_2624_editorDescription($0, $1, $2, $3, $4, $5, $6,
 
 /* PullRequest.8323:1960:csv */
 function PullRequest_n__8323_1960_csv($0, $1, $2, $3, $4, $5, $6) {
- return Util_renderString($5, Text_PrettyPrint_Prettyprinter_Doc_encloseSep(Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), csegen_579(), csegen_116()(csegen_398())($6)));
+ return Util_renderString($5, Text_PrettyPrint_Prettyprinter_Doc_encloseSep(Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), csegen_578(), csegen_116()(csegen_398())($6)));
 }
 
 /* PullRequest.9013:2625:createPR */
@@ -10463,7 +10463,7 @@ function PullRequest_reviewsForPrs($0, $1, $2) {
   };
   return Data_Promise_x3ex3ex3d_Monad_Promise($18, reviews => $3f => $40 => Data_Promise_pure_Applicative_Promise(Prelude_Types_join_Monad_List(reviews), $3f, $40));
  };
- return Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Basics_flip(csegen_449(), csegen_593(), Prelude_Types_traverse_Traversable_List(csegen_86(), $f => PullRequest_n__8098_1704_forkedReviews($0, $1, $2, $f), $2)), $16);
+ return Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Basics_flip(csegen_449(), csegen_591(), Prelude_Types_traverse_Traversable_List(csegen_86(), $f => PullRequest_n__8098_1704_forkedReviews($0, $1, $2, $f), $2)), $16);
 }
 
 /* PullRequest.reviewsByUser : Config => Octokit => String -> List PullRequest -> Promise (List Review) */
@@ -10677,11 +10677,11 @@ function PullRequest_identifyOrCreatePR($0, $1, $2, $3, $4) {
       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));
       return Data_Promise_x3ex3ex3d_Monad_Promise($13, $26 => $27 => $28 => Data_Promise_pure_Applicative_Promise({a1: 0, a2: $f.a1}, $27, $28));
      }
-     default: return csegen_724();
+     default: return csegen_722();
     }
    }
    case 0: /* nil */ return csegen_55()($34 => ({a1: 1, a2: $34}))(PullRequest_n__9013_2625_createPR($1, $2, $4, $3, $0));
-   default: return csegen_724();
+   default: return csegen_722();
   }
  };
  return Data_Promise_x3ex3ex3d_Monad_Promise(FFI_GitHub_listPRsForBranch($2, $0.a2, $0.a3, $4), $e);
@@ -11256,7 +11256,7 @@ function Graph_n__6229_2263_header($0, $1, $2, $3, $4, $5) {
    break;
   }
  }
- 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_757()}};
+ 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_755()}};
  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};
  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};
  const $d = {a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(csegen_62()('Weighted review workload.'))}, a2: $15};
@@ -11267,7 +11267,7 @@ function Graph_n__6229_2263_header($0, $1, $2, $3, $4, $5) {
 
 /* Graph.5908:1932:header */
 function Graph_n__5908_1932_header($0) {
- 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_757()}}));
+ 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_755()}}));
 }
 
 /* Graph.6229:2262:greenBox */
@@ -11412,9 +11412,9 @@ function Graph_reviewsGraph($0, $1, $2, $3, $4, $5) {
 
 /* Graph.healthGraph : List PullRequest -> Doc AnsiStyle */
 function Graph_healthGraph($0) {
- 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_609(), $4, $5), Data_List_sortBy(csegen_610(), $0));
+ 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_607(), $4, $5), Data_List_sortBy(csegen_608(), $0));
  const $1e = Prelude_Types_foldr_Foldable_List(xs => m => Prelude_Types_max_Ord_Nat(Data_List1_length(xs), m), 1n, $1);
- return Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Graph_n__5908_1932_header($0), a2: {a1: Graph_graph({a1: $32 => Graph_totalWidth_Graphable_x28PRsOnDatex20x24dateTyx29(csegen_778(), $32), a2: $38 => Graph_label_Graphable_x28PRsOnDatex20x24dateTyx29(csegen_778(), $38), a3: $3e => Graph_score_Graphable_x28PRsOnDatex20x24dateTyx29(csegen_778(), $3e), a4: $44 => Graph_detractor_Graphable_x28PRsOnDatex20x24dateTyx29(csegen_778(), $44), a5: $4a => Graph_bonus_Graphable_x28PRsOnDatex20x24dateTyx29(csegen_778(), $4a)}, $1e, Graph_n__5908_1930_unfoldGraph($0, Data_Fuel_limit(48n), $1, {h: 0})), a2: {h: 0}}});
+ return Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Graph_n__5908_1932_header($0), a2: {a1: Graph_graph({a1: $32 => Graph_totalWidth_Graphable_x28PRsOnDatex20x24dateTyx29(csegen_776(), $32), a2: $38 => Graph_label_Graphable_x28PRsOnDatex20x24dateTyx29(csegen_776(), $38), a3: $3e => Graph_score_Graphable_x28PRsOnDatex20x24dateTyx29(csegen_776(), $3e), a4: $44 => Graph_detractor_Graphable_x28PRsOnDatex20x24dateTyx29(csegen_776(), $44), a5: $4a => Graph_bonus_Graphable_x28PRsOnDatex20x24dateTyx29(csegen_776(), $4a)}, $1e, Graph_n__5908_1930_unfoldGraph($0, Data_Fuel_limit(48n), $1, {h: 0})), a2: {h: 0}}});
 }
 
 /* Graph.graphOne : Graphable g => Nat -> g -> Doc AnsiStyle */
@@ -11434,13 +11434,67 @@ function Graph_bar($0, $1, $2, $3) {
  return Text_PrettyPrint_Prettyprinter_Doc_indent(Number(_truncBigInt32($0)), Text_PrettyPrint_Prettyprinter_Doc_hcat({a1: Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_color(1), Text_PrettyPrint_Prettyprinter_Doc_hcat(Data_List_replicateTR({h: 0}, $2, Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_Char(csegen_62()('\u{25e6}'))))), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_color(3), Text_PrettyPrint_Prettyprinter_Doc_hcat(Data_List_replicateTR({h: 0}, $1, Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_Char(csegen_62()('\u{b7}'))))), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_color(2), Text_PrettyPrint_Prettyprinter_Doc_hcat(Data_List_replicateTR({h: 0}, $3, Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_Char(csegen_62()('\u{25aa}'))))), a2: {h: 0}}}}));
 }
 
-/* BashCompletion.4384:8309:slugsOrLoginsOrLabels */
-function BashCompletion_n__4384_8309_slugsOrLoginsOrLabels($0, $1, $2) {
+/* BashCompletion.case block in case block in unhashify */
+function BashCompletion_case__casex20blockx20inx20unhashify_7794($0, $1, $2) {
+ switch($0) {
+  case '': {
+   switch($2.h) {
+    case 0: /* nil */ return $1;
+    default: {
+     switch($2.a1) {
+      case '#': return $2.a2;
+      default: return $1;
+     }
+    }
+   }
+  }
+  default: {
+   switch($2.a1) {
+    case '#': return $2.a2;
+    default: return $1;
+   }
+  }
+ }
+}
+
+/* BashCompletion.case block in unhashify */
+function BashCompletion_case__unhashify_7774($0, $1) {
+ switch($0) {
+  case '': {
+   switch($1.h) {
+    case 0: /* nil */ return '';
+    default: {
+     switch($1.a1) {
+      case '#': return $1.a2;
+      case '\u{5c}': {
+       const $6 = ('\u{5c}'+$1.a2);
+       return BashCompletion_case__casex20blockx20inx20unhashify_7794($1.a2, $6, Data_String_strM($1.a2));
+      }
+      default: return $0;
+     }
+    }
+   }
+  }
+  default: {
+   switch($1.a1) {
+    case '#': return $1.a2;
+    case '\u{5c}': {
+     const $11 = ('\u{5c}'+$1.a2);
+     return BashCompletion_case__casex20blockx20inx20unhashify_7794($1.a2, $11, Data_String_strM($1.a2));
+    }
+    default: return $0;
+   }
+  }
+ }
+}
+
+/* BashCompletion.4506:8427:slugsOrLoginsOrLabels */
+function BashCompletion_n__4506_8427_slugsOrLoginsOrLabels($0, $1, $2) {
  switch(Data_String_isPrefixOf('+', $1)) {
   case 1: return csegen_116()($b => ('+'+$b))($2.a11);
   case 0: {
    switch(BashCompletion_isHashPrefix($1)) {
-    case 1: return csegen_793()($2.a10);
+    case 1: return csegen_791()($2.a10);
     case 0: return $2.a9;
    }
   }
@@ -11452,6 +11506,11 @@ function BashCompletion_unslugify($0) {
  return Prelude_Types_fastPack(Data_List_replaceOn(csegen_132(), '\u{25cc}', ' ', Prelude_Types_fastUnpack($0)));
 }
 
+/* BashCompletion.unhashify : String -> String */
+function BashCompletion_unhashify($0) {
+ return BashCompletion_case__unhashify_7774($0, Data_String_strM($0));
+}
+
 /* BashCompletion.slugify : String -> String */
 function BashCompletion_slugify($0) {
  return Prelude_Types_fastPack(Data_List_replaceOn(csegen_132(), ' ', '\u{25cc}', Prelude_Types_fastUnpack($0)));
@@ -11488,8 +11547,8 @@ function BashCompletion_opts($0, $1, $2, $3) {
   }
   case 'label': {
    switch($2) {
-    case '--': return csegen_795()($0.a10);
-    default: return Prelude_Types_List_filterAppend({h: 0}, $24 => Data_String_isPrefixOf($2, $24), csegen_795()($0.a10));
+    case '--': return csegen_793()($0.a10);
+    default: return Prelude_Types_List_filterAppend({h: 0}, $24 => Data_String_isPrefixOf($2, $24), csegen_793()($0.a10));
    }
   }
   case 'list': {
@@ -11530,7 +11589,7 @@ function BashCompletion_opts($0, $1, $2, $3) {
       case 'graph': return {a1: '--completed', a2: $0.a9};
       case '--completed': return $0.a9;
       default: {
-       switch(Data_Maybe_isJust(Data_List_find($51 => Prelude_EqOrd_x3dx3d_Eq_String($51, $3), csegen_796()))) {
+       switch(Data_Maybe_isJust(Data_List_find($51 => Prelude_EqOrd_x3dx3d_Eq_String($51, $3), csegen_794()))) {
         case 1: return Prelude_Types_List_filterAppend({h: 0}, $5a => Data_String_isPrefixOf($2, $5a), $0.a9);
         case 0: return {h: 0};
        }
@@ -11538,7 +11597,7 @@ function BashCompletion_opts($0, $1, $2, $3) {
      }
     }
     default: {
-     switch(Data_Maybe_isJust(Data_List_find($65 => Prelude_EqOrd_x3dx3d_Eq_String($65, $3), csegen_796()))) {
+     switch(Data_Maybe_isJust(Data_List_find($65 => Prelude_EqOrd_x3dx3d_Eq_String($65, $3), csegen_794()))) {
       case 1: return Prelude_Types_List_filterAppend({h: 0}, $6e => Data_String_isPrefixOf($2, $6e), $0.a9);
       case 0: return {h: 0};
      }
@@ -11547,7 +11606,7 @@ function BashCompletion_opts($0, $1, $2, $3) {
   }
   case 'pr': {
    switch(BashCompletion_isHashPrefix($2)) {
-    case 1: return csegen_793()($0.a10);
+    case 1: return csegen_791()($0.a10);
     case 0: return {h: 0};
    }
   }
@@ -11562,7 +11621,7 @@ function BashCompletion_opts($0, $1, $2, $3) {
     default: {
      switch(Data_String_isPrefixOf($2, '--dry')) {
       case 1: return {a1: '--dry', a2: {h: 0}};
-      case 0: return Prelude_Types_List_filterAppend({h: 0}, $8a => Data_String_isPrefixOf($2, $8a), BashCompletion_n__4384_8309_slugsOrLoginsOrLabels($3, $2, $0));
+      case 0: return BashCompletion_n__4506_8427_slugsOrLoginsOrLabels($3, $2, $0);
      }
     }
    }
@@ -11579,6 +11638,11 @@ function BashCompletion_isHashPrefix($0) {
  }
 }
 
+/* BashCompletion.hashify : String -> String */
+function BashCompletion_hashify($0) {
+ return ('#'+$0);
+}
+
 /* BashCompletion.cmdOpts : String -> String -> String -> Maybe (List String) */
 function BashCompletion_cmdOpts($0, $1, $2) {
  switch($1) {
@@ -11660,8 +11724,8 @@ function BashCompletion_cmdOpts($0, $1, $2) {
         }
         case 'contribute': {
          switch($1) {
-          case '-': return csegen_798();
-          case '--': return csegen_798();
+          case '-': return csegen_796();
+          case '--': return csegen_796();
           default: {
            switch(Data_String_isPrefixOf($1, '--checkout')) {
             case 1: return {a1: {a1: '--checkout', a2: {h: 0}}};
@@ -11673,7 +11737,7 @@ function BashCompletion_cmdOpts($0, $1, $2) {
         case 'graph': {
          switch($1) {
           case '--': return {h: 0};
-          case '-': return csegen_800();
+          case '-': return csegen_798();
           default: {
            switch(Data_String_isPrefixOf($1, '--completed')) {
             case 1: return {a1: {a1: '--completed', a2: {h: 0}}};
@@ -11764,8 +11828,8 @@ function BashCompletion_cmdOpts($0, $1, $2) {
       }
       case 'contribute': {
        switch($1) {
-        case '-': return csegen_798();
-        case '--': return csegen_798();
+        case '-': return csegen_796();
+        case '--': return csegen_796();
         default: {
          switch(Data_String_isPrefixOf($1, '--checkout')) {
           case 1: return {a1: {a1: '--checkout', a2: {h: 0}}};
@@ -11777,7 +11841,7 @@ function BashCompletion_cmdOpts($0, $1, $2) {
       case 'graph': {
        switch($1) {
         case '--': return {h: 0};
-        case '-': return csegen_800();
+        case '-': return csegen_798();
         default: {
          switch(Data_String_isPrefixOf($1, '--completed')) {
           case 1: return {a1: {a1: '--completed', a2: {h: 0}}};
@@ -11806,7 +11870,7 @@ function AppVersion_printVersion($0) {
 
 /* AppVersion.appVersion : String */
 const AppVersion_appVersion = __lazy(function () {
- return '2.4.0';
+ return '2.4.1';
 });
 
 

package/package.json

@@ -1,6 +1,6 @@
 {
   "name": "@mattpolzin/harmony",
-  "version": "2.4.0",
+  "version": "2.4.1",
   "publishConfig": {
     "access": "public"
   },