@mattpolzin/harmony 6.5.0 → 6.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.
- package/harmony +759 -622
- package/man/harmony.1 +1 -1
- package/package.json +1 -1
package/harmony
CHANGED
|
@@ -1035,7 +1035,7 @@ function x24tcOpt_1($0) {
|
|
|
1035
1035
|
case 0: return {h: 0 /* {TcDone:1} */, a1: $0.a5};
|
|
1036
1036
|
default: {
|
|
1037
1037
|
const $17 = {a1: $0.a5.a1.a1, a2: $0.a5.a1.a2, a3: $0.a5.a1.a3};
|
|
1038
|
-
const $1b = Data_List_DeleteBy_deleteByx27($1e => $1f => Prelude_Basics_on($0.a1.a1.a1,
|
|
1038
|
+
const $1b = Data_List_DeleteBy_deleteByx27($1e => $1f => Prelude_Basics_on($0.a1.a1.a1, csegen_883(), $1e, $1f), $17, $0.a6);
|
|
1039
1039
|
switch($1b.a1.h) {
|
|
1040
1040
|
case 0: /* nothing */ {
|
|
1041
1041
|
switch($0.a8) {
|
|
@@ -1050,7 +1050,7 @@ function x24tcOpt_1($0) {
|
|
|
1050
1050
|
}
|
|
1051
1051
|
default: {
|
|
1052
1052
|
const $64 = {a1: $0.a5.a1.a1, a2: $0.a5.a1.a2, a3: $0.a5.a1.a3};
|
|
1053
|
-
const $68 = Data_List_DeleteBy_deleteByx27($6b => $6c => Prelude_Basics_on($0.a1.a1.a1,
|
|
1053
|
+
const $68 = Data_List_DeleteBy_deleteByx27($6b => $6c => Prelude_Basics_on($0.a1.a1.a1, csegen_883(), $6b, $6c), $64, $0.a6);
|
|
1054
1054
|
switch($68.a1.h) {
|
|
1055
1055
|
case 0: /* nothing */ {
|
|
1056
1056
|
switch($0.a8) {
|
|
@@ -1075,7 +1075,7 @@ function x24tcOpt_1($0) {
|
|
|
1075
1075
|
case 0: return {h: 0 /* {TcDone:1} */, a1: $0.a5};
|
|
1076
1076
|
default: {
|
|
1077
1077
|
const $b5 = {a1: $0.a5.a1.a1, a2: $0.a5.a1.a2, a3: $0.a5.a1.a3};
|
|
1078
|
-
const $b9 = Data_List_DeleteBy_deleteByx27($bc => $bd => Prelude_Basics_on($0.a1.a1.a1,
|
|
1078
|
+
const $b9 = Data_List_DeleteBy_deleteByx27($bc => $bd => Prelude_Basics_on($0.a1.a1.a1, csegen_883(), $bc, $bd), $b5, $0.a6);
|
|
1079
1079
|
switch($b9.a1.h) {
|
|
1080
1080
|
case 0: /* nothing */ {
|
|
1081
1081
|
switch($0.a8) {
|
|
@@ -1090,7 +1090,7 @@ function x24tcOpt_1($0) {
|
|
|
1090
1090
|
}
|
|
1091
1091
|
default: {
|
|
1092
1092
|
const $102 = {a1: $0.a5.a1.a1, a2: $0.a5.a1.a2, a3: $0.a5.a1.a3};
|
|
1093
|
-
const $106 = Data_List_DeleteBy_deleteByx27($109 => $10a => Prelude_Basics_on($0.a1.a1.a1,
|
|
1093
|
+
const $106 = Data_List_DeleteBy_deleteByx27($109 => $10a => Prelude_Basics_on($0.a1.a1.a1, csegen_883(), $109, $10a), $102, $0.a6);
|
|
1094
1094
|
switch($106.a1.h) {
|
|
1095
1095
|
case 0: /* nothing */ {
|
|
1096
1096
|
switch($0.a8) {
|
|
@@ -1155,7 +1155,7 @@ function Prelude_Show_n__3215_12601_showx27($0, $1, $2, $3) {
|
|
|
1155
1155
|
/* {$tcOpt:4} */
|
|
1156
1156
|
function x24tcOpt_4($0) {
|
|
1157
1157
|
switch($0.h) {
|
|
1158
|
-
case 1: /* {TcContinue4:1} */ return {h: 2 /* {TcContinue4:2} */, a1: $0.a1, a2: $0.a2, a3: $0.a3, a4: $0.a4, a5: $0.a5(), a6: $0.a9, a7: {a1: {a1: $0.a6.a3, a2: {a1:
|
|
1158
|
+
case 1: /* {TcContinue4:1} */ return {h: 2 /* {TcContinue4:2} */, a1: $0.a1, a2: $0.a2, a3: $0.a3, a4: $0.a4, a5: $0.a5(), a6: $0.a9, a7: {a1: {a1: $0.a6.a3, a2: {a1: Commands_Graph_n__7454_6603_graphable($0.a1, $0.a2, $0.a3, $0.a4, $0.a8), a2: $0.a11}}}};
|
|
1159
1159
|
case 2: /* {TcContinue4:2} */ {
|
|
1160
1160
|
switch($0.a5.h) {
|
|
1161
1161
|
case 0: /* nothing */ {
|
|
@@ -1174,7 +1174,7 @@ function x24tcOpt_4($0) {
|
|
|
1174
1174
|
case undefined: /* cons */ return {h: 0 /* {TcDone:4} */, a1: $0.a7.a1.a2};
|
|
1175
1175
|
default: {
|
|
1176
1176
|
switch($0.a7.h) {
|
|
1177
|
-
case 0: /* nothing */ return {h: 2 /* {TcContinue4:2} */, a1: $0.a1, a2: $0.a2, a3: $0.a3, a4: $0.a4, a5: $0.a5.a1(), a6: $0.a6.a2, a7: {a1: {a1: $0.a6.a1.a1.a3, a2: {a1:
|
|
1177
|
+
case 0: /* nothing */ return {h: 2 /* {TcContinue4:2} */, a1: $0.a1, a2: $0.a2, a3: $0.a3, a4: $0.a4, a5: $0.a5.a1(), a6: $0.a6.a2, a7: {a1: {a1: $0.a6.a1.a1.a3, a2: {a1: Commands_Graph_n__7454_6603_graphable($0.a1, $0.a2, $0.a3, $0.a4, $0.a6.a1), a2: {h: 0}}}}};
|
|
1178
1178
|
case undefined: /* just */ {
|
|
1179
1179
|
const $39 = {a1: $0.a6.a1.a1, a2: $0.a6.a1.a2};
|
|
1180
1180
|
switch(((Data_Date_nextMonth($0.a7.a1.a1.a2)===$0.a6.a1.a1.a3.a2)?1:0)) {
|
|
@@ -1188,7 +1188,7 @@ function x24tcOpt_4($0) {
|
|
|
1188
1188
|
}
|
|
1189
1189
|
default: {
|
|
1190
1190
|
switch($0.a7.h) {
|
|
1191
|
-
case 0: /* nothing */ return {h: 2 /* {TcContinue4:2} */, a1: $0.a1, a2: $0.a2, a3: $0.a3, a4: $0.a4, a5: $0.a5.a1(), a6: $0.a6.a2, a7: {a1: {a1: $0.a6.a1.a1.a3, a2: {a1:
|
|
1191
|
+
case 0: /* nothing */ return {h: 2 /* {TcContinue4:2} */, a1: $0.a1, a2: $0.a2, a3: $0.a3, a4: $0.a4, a5: $0.a5.a1(), a6: $0.a6.a2, a7: {a1: {a1: $0.a6.a1.a1.a3, a2: {a1: Commands_Graph_n__7454_6603_graphable($0.a1, $0.a2, $0.a3, $0.a4, $0.a6.a1), a2: {h: 0}}}}};
|
|
1192
1192
|
case undefined: /* just */ {
|
|
1193
1193
|
const $73 = {a1: $0.a6.a1.a1, a2: $0.a6.a1.a2};
|
|
1194
1194
|
switch(((Data_Date_nextMonth($0.a7.a1.a1.a2)===$0.a6.a1.a1.a3.a2)?1:0)) {
|
|
@@ -1202,7 +1202,7 @@ function x24tcOpt_4($0) {
|
|
|
1202
1202
|
}
|
|
1203
1203
|
default: {
|
|
1204
1204
|
switch($0.a7.h) {
|
|
1205
|
-
case 0: /* nothing */ return {h: 2 /* {TcContinue4:2} */, a1: $0.a1, a2: $0.a2, a3: $0.a3, a4: $0.a4, a5: $0.a5.a1(), a6: $0.a6.a2, a7: {a1: {a1: $0.a6.a1.a1.a3, a2: {a1:
|
|
1205
|
+
case 0: /* nothing */ return {h: 2 /* {TcContinue4:2} */, a1: $0.a1, a2: $0.a2, a3: $0.a3, a4: $0.a4, a5: $0.a5.a1(), a6: $0.a6.a2, a7: {a1: {a1: $0.a6.a1.a1.a3, a2: {a1: Commands_Graph_n__7454_6603_graphable($0.a1, $0.a2, $0.a3, $0.a4, $0.a6.a1), a2: {h: 0}}}}};
|
|
1206
1206
|
case undefined: /* just */ {
|
|
1207
1207
|
const $ad = {a1: $0.a6.a1.a1, a2: $0.a6.a1.a2};
|
|
1208
1208
|
switch(((Data_Date_nextMonth($0.a7.a1.a1.a2)===$0.a6.a1.a1.a3.a2)?1:0)) {
|
|
@@ -1226,7 +1226,7 @@ function x24tcOpt_4($0) {
|
|
|
1226
1226
|
case undefined: /* cons */ return {h: 0 /* {TcDone:4} */, a1: $0.a7.a1.a2};
|
|
1227
1227
|
default: {
|
|
1228
1228
|
switch($0.a7.h) {
|
|
1229
|
-
case 0: /* nothing */ return {h: 2 /* {TcContinue4:2} */, a1: $0.a1, a2: $0.a2, a3: $0.a3, a4: $0.a4, a5: $0.a5.a1(), a6: $0.a6.a2, a7: {a1: {a1: $0.a6.a1.a1.a3, a2: {a1:
|
|
1229
|
+
case 0: /* nothing */ return {h: 2 /* {TcContinue4:2} */, a1: $0.a1, a2: $0.a2, a3: $0.a3, a4: $0.a4, a5: $0.a5.a1(), a6: $0.a6.a2, a7: {a1: {a1: $0.a6.a1.a1.a3, a2: {a1: Commands_Graph_n__7454_6603_graphable($0.a1, $0.a2, $0.a3, $0.a4, $0.a6.a1), a2: {h: 0}}}}};
|
|
1230
1230
|
case undefined: /* just */ {
|
|
1231
1231
|
const $ec = {a1: $0.a6.a1.a1, a2: $0.a6.a1.a2};
|
|
1232
1232
|
switch(((Data_Date_nextMonth($0.a7.a1.a1.a2)===$0.a6.a1.a1.a3.a2)?1:0)) {
|
|
@@ -1240,7 +1240,7 @@ function x24tcOpt_4($0) {
|
|
|
1240
1240
|
}
|
|
1241
1241
|
default: {
|
|
1242
1242
|
switch($0.a7.h) {
|
|
1243
|
-
case 0: /* nothing */ return {h: 2 /* {TcContinue4:2} */, a1: $0.a1, a2: $0.a2, a3: $0.a3, a4: $0.a4, a5: $0.a5.a1(), a6: $0.a6.a2, a7: {a1: {a1: $0.a6.a1.a1.a3, a2: {a1:
|
|
1243
|
+
case 0: /* nothing */ return {h: 2 /* {TcContinue4:2} */, a1: $0.a1, a2: $0.a2, a3: $0.a3, a4: $0.a4, a5: $0.a5.a1(), a6: $0.a6.a2, a7: {a1: {a1: $0.a6.a1.a1.a3, a2: {a1: Commands_Graph_n__7454_6603_graphable($0.a1, $0.a2, $0.a3, $0.a4, $0.a6.a1), a2: {h: 0}}}}};
|
|
1244
1244
|
case undefined: /* just */ {
|
|
1245
1245
|
const $126 = {a1: $0.a6.a1.a1, a2: $0.a6.a1.a2};
|
|
1246
1246
|
switch(((Data_Date_nextMonth($0.a7.a1.a1.a2)===$0.a6.a1.a1.a3.a2)?1:0)) {
|
|
@@ -1254,7 +1254,7 @@ function x24tcOpt_4($0) {
|
|
|
1254
1254
|
}
|
|
1255
1255
|
default: {
|
|
1256
1256
|
switch($0.a7.h) {
|
|
1257
|
-
case 0: /* nothing */ return {h: 2 /* {TcContinue4:2} */, a1: $0.a1, a2: $0.a2, a3: $0.a3, a4: $0.a4, a5: $0.a5.a1(), a6: $0.a6.a2, a7: {a1: {a1: $0.a6.a1.a1.a3, a2: {a1:
|
|
1257
|
+
case 0: /* nothing */ return {h: 2 /* {TcContinue4:2} */, a1: $0.a1, a2: $0.a2, a3: $0.a3, a4: $0.a4, a5: $0.a5.a1(), a6: $0.a6.a2, a7: {a1: {a1: $0.a6.a1.a1.a3, a2: {a1: Commands_Graph_n__7454_6603_graphable($0.a1, $0.a2, $0.a3, $0.a4, $0.a6.a1), a2: {h: 0}}}}};
|
|
1258
1258
|
case undefined: /* just */ {
|
|
1259
1259
|
const $160 = {a1: $0.a6.a1.a1, a2: $0.a6.a1.a2};
|
|
1260
1260
|
switch(((Data_Date_nextMonth($0.a7.a1.a1.a2)===$0.a6.a1.a1.a3.a2)?1:0)) {
|
|
@@ -1278,7 +1278,7 @@ function x24tcOpt_4($0) {
|
|
|
1278
1278
|
case undefined: /* cons */ return {h: 0 /* {TcDone:4} */, a1: $0.a7.a1.a2};
|
|
1279
1279
|
default: {
|
|
1280
1280
|
switch($0.a7.h) {
|
|
1281
|
-
case 0: /* nothing */ return {h: 2 /* {TcContinue4:2} */, a1: $0.a1, a2: $0.a2, a3: $0.a3, a4: $0.a4, a5: $0.a5.a1(), a6: $0.a6.a2, a7: {a1: {a1: $0.a6.a1.a1.a3, a2: {a1:
|
|
1281
|
+
case 0: /* nothing */ return {h: 2 /* {TcContinue4:2} */, a1: $0.a1, a2: $0.a2, a3: $0.a3, a4: $0.a4, a5: $0.a5.a1(), a6: $0.a6.a2, a7: {a1: {a1: $0.a6.a1.a1.a3, a2: {a1: Commands_Graph_n__7454_6603_graphable($0.a1, $0.a2, $0.a3, $0.a4, $0.a6.a1), a2: {h: 0}}}}};
|
|
1282
1282
|
case undefined: /* just */ {
|
|
1283
1283
|
const $19f = {a1: $0.a6.a1.a1, a2: $0.a6.a1.a2};
|
|
1284
1284
|
switch(((Data_Date_nextMonth($0.a7.a1.a1.a2)===$0.a6.a1.a1.a3.a2)?1:0)) {
|
|
@@ -1292,7 +1292,7 @@ function x24tcOpt_4($0) {
|
|
|
1292
1292
|
}
|
|
1293
1293
|
default: {
|
|
1294
1294
|
switch($0.a7.h) {
|
|
1295
|
-
case 0: /* nothing */ return {h: 2 /* {TcContinue4:2} */, a1: $0.a1, a2: $0.a2, a3: $0.a3, a4: $0.a4, a5: $0.a5.a1(), a6: $0.a6.a2, a7: {a1: {a1: $0.a6.a1.a1.a3, a2: {a1:
|
|
1295
|
+
case 0: /* nothing */ return {h: 2 /* {TcContinue4:2} */, a1: $0.a1, a2: $0.a2, a3: $0.a3, a4: $0.a4, a5: $0.a5.a1(), a6: $0.a6.a2, a7: {a1: {a1: $0.a6.a1.a1.a3, a2: {a1: Commands_Graph_n__7454_6603_graphable($0.a1, $0.a2, $0.a3, $0.a4, $0.a6.a1), a2: {h: 0}}}}};
|
|
1296
1296
|
case undefined: /* just */ {
|
|
1297
1297
|
const $1d9 = {a1: $0.a6.a1.a1, a2: $0.a6.a1.a2};
|
|
1298
1298
|
switch(((Data_Date_nextMonth($0.a7.a1.a1.a2)===$0.a6.a1.a1.a3.a2)?1:0)) {
|
|
@@ -1306,7 +1306,7 @@ function x24tcOpt_4($0) {
|
|
|
1306
1306
|
}
|
|
1307
1307
|
default: {
|
|
1308
1308
|
switch($0.a7.h) {
|
|
1309
|
-
case 0: /* nothing */ return {h: 2 /* {TcContinue4:2} */, a1: $0.a1, a2: $0.a2, a3: $0.a3, a4: $0.a4, a5: $0.a5.a1(), a6: $0.a6.a2, a7: {a1: {a1: $0.a6.a1.a1.a3, a2: {a1:
|
|
1309
|
+
case 0: /* nothing */ return {h: 2 /* {TcContinue4:2} */, a1: $0.a1, a2: $0.a2, a3: $0.a3, a4: $0.a4, a5: $0.a5.a1(), a6: $0.a6.a2, a7: {a1: {a1: $0.a6.a1.a1.a3, a2: {a1: Commands_Graph_n__7454_6603_graphable($0.a1, $0.a2, $0.a3, $0.a4, $0.a6.a1), a2: {h: 0}}}}};
|
|
1310
1310
|
case undefined: /* just */ {
|
|
1311
1311
|
const $213 = {a1: $0.a6.a1.a1, a2: $0.a6.a1.a2};
|
|
1312
1312
|
switch(((Data_Date_nextMonth($0.a7.a1.a1.a2)===$0.a6.a1.a1.a3.a2)?1:0)) {
|
|
@@ -1328,18 +1328,18 @@ function x24tcOpt_4($0) {
|
|
|
1328
1328
|
}
|
|
1329
1329
|
}
|
|
1330
1330
|
|
|
1331
|
-
/* Commands.Graph.
|
|
1332
|
-
function
|
|
1331
|
+
/* Commands.Graph.7475:6732:insertNext */
|
|
1332
|
+
function Commands_Graph_n__7475_6732_insertNext($0, $1, $2, $3, $4, $5, $6, $7, $8, $9, $a) {
|
|
1333
1333
|
return __tailRec(x24tcOpt_4, {h: 1 /* {TcContinue4:1} */, a1: $0, a2: $1, a3: $2, a4: $3, a5: $4, a6: $5, a7: $6, a8: $7, a9: $8, a10: $9, a11: $a});
|
|
1334
1334
|
}
|
|
1335
1335
|
|
|
1336
|
-
/* Commands.Graph.
|
|
1337
|
-
function
|
|
1336
|
+
/* Commands.Graph.7454:6606:unfoldGraph */
|
|
1337
|
+
function Commands_Graph_n__7454_6606_unfoldGraph($0, $1, $2, $3, $4, $5, $6) {
|
|
1338
1338
|
return __tailRec(x24tcOpt_4, {h: 2 /* {TcContinue4:2} */, a1: $0, a2: $1, a3: $2, a4: $3, a5: $4, a6: $5, a7: $6});
|
|
1339
1339
|
}
|
|
1340
1340
|
|
|
1341
|
-
/* Commands.Graph.
|
|
1342
|
-
function
|
|
1341
|
+
/* Commands.Graph.7475:6733:insertPlaceholder */
|
|
1342
|
+
function Commands_Graph_n__7475_6733_insertPlaceholder($0, $1, $2, $3, $4, $5, $6, $7, $8, $9, $a) {
|
|
1343
1343
|
return __tailRec(x24tcOpt_4, {h: 3 /* {TcContinue4:3} */, a1: $0, a2: $1, a3: $2, a4: $3, a5: $4, a6: $5, a7: $6, a8: $7, a9: $8, a10: $9, a11: $a});
|
|
1344
1344
|
}
|
|
1345
1345
|
|
|
@@ -2825,18 +2825,68 @@ const csegen_340 = __lazy(function () {
|
|
|
2825
2825
|
return () => $0 => Language_JSON_Accessors_optional($3 => Language_JSON_Accessors_string($3), $0);
|
|
2826
2826
|
});
|
|
2827
2827
|
|
|
2828
|
-
/* {csegen:
|
|
2829
|
-
const
|
|
2828
|
+
/* {csegen:345} */
|
|
2829
|
+
const csegen_345 = __lazy(function () {
|
|
2830
|
+
return {a1: {a1: Data_Config_booleanOptions(), a2: Prelude_Types_foldMap_Foldable_List(csegen_86()(), $9 => $9, {a1: 'Determines whether or not to request reviews from teams when requesting individual reviewers from a team.', a2: {h: 0}})}, a2: 0};
|
|
2831
|
+
});
|
|
2832
|
+
|
|
2833
|
+
/* {csegen:349} */
|
|
2834
|
+
const csegen_349 = __lazy(function () {
|
|
2835
|
+
return {a1: {a1: Data_Config_booleanOptions(), a2: Prelude_Types_foldMap_Foldable_List(csegen_86()(), $9 => $9, {a1: 'Determines whether or not to request reviews from an individual user based on Harmony\'s heuristics when requestin review from teams. You might want to disable `requestUsers` to allow GitHub to pick users to request based on the team. This setting does not affect the ability to request reviews from individual users withe Harmony\'s `+<username>` syntax.', a2: {h: 0}})}, a2: 1};
|
|
2836
|
+
});
|
|
2837
|
+
|
|
2838
|
+
/* {csegen:356} */
|
|
2839
|
+
const csegen_356 = __lazy(function () {
|
|
2840
|
+
return {a1: {a1: {h: 0 /* Enum */, a1: {a1: 'none', a2: {a1: 'name', a2: {a1: 'at-mention', a2: {h: 0}}}}}, a2: Prelude_Types_foldMap_Foldable_List(csegen_86()(), $f => $f, {a1: 'Determines whether- and how to comment on PR indicating that Harmony chose a reviewer.', a2: {h: 0}})}, a2: 2};
|
|
2841
|
+
});
|
|
2842
|
+
|
|
2843
|
+
/* {csegen:363} */
|
|
2844
|
+
const csegen_363 = __lazy(function () {
|
|
2845
|
+
return {a1: {a1: {h: 0 /* Enum */, a1: {a1: 'none', a2: {a1: 'jira', a2: {a1: 'github', a2: {h: 0}}}}}, a2: Prelude_Types_foldMap_Foldable_List(csegen_86()(), $f => $f, {a1: 'Determines whether- and how to parse branch names for a prefix to automatically add to a new PR\'s title or body to link the PR and issue/ticket.', a2: {h: 0}})}, a2: 3};
|
|
2846
|
+
});
|
|
2847
|
+
|
|
2848
|
+
/* {csegen:367} */
|
|
2849
|
+
const csegen_367 = __lazy(function () {
|
|
2850
|
+
return {a1: {a1: {h: 1 /* Any */, a1: 'string'}, a2: Prelude_Types_foldMap_Foldable_List(csegen_86()(), $9 => $9, {a1: 'A string to prefix default PR titles with when the branch the PR is being created from is determined to be a bugfix branch (branch name starts with \'bugfix\'). For example, a common prefix is \'[fix]\'.', a2: {h: 0}})}, a2: 4};
|
|
2851
|
+
});
|
|
2852
|
+
|
|
2853
|
+
/* {csegen:371} */
|
|
2854
|
+
const csegen_371 = __lazy(function () {
|
|
2855
|
+
return {a1: {a1: Data_Config_booleanOptions(), a2: Prelude_Types_foldMap_Foldable_List(csegen_86()(), $9 => $9, {a1: 'Determines whether to add a tree of PRs to the description for any PR that is into a branch other than the `mainBranch` configured.\n This looks like:\n > \u{2a00} `main`\n >> \u{2196} `feature-1` (https://github.com/org/repo/pull/1234)\n >> **The first feature**\n >>>> \u{2196} `feature-2`', a2: {h: 0}})}, a2: 5};
|
|
2856
|
+
});
|
|
2857
|
+
|
|
2858
|
+
/* {csegen:373} */
|
|
2859
|
+
const csegen_373 = __lazy(function () {
|
|
2860
|
+
return {a1: {a1: {h: 1 /* Any */, a1: 'string'}, a2: 'The name of the default Git remote to use (e.g. \'origin\').'}, a2: 6};
|
|
2861
|
+
});
|
|
2862
|
+
|
|
2863
|
+
/* {csegen:375} */
|
|
2864
|
+
const csegen_375 = __lazy(function () {
|
|
2865
|
+
return {a1: {a1: {h: 1 /* Any */, a1: 'string'}, a2: 'The name of the default Git base branch for new PRs.'}, a2: 7};
|
|
2866
|
+
});
|
|
2867
|
+
|
|
2868
|
+
/* {csegen:380} */
|
|
2869
|
+
const csegen_380 = __lazy(function () {
|
|
2870
|
+
return {a1: {a1: {h: 0 /* Enum */, a1: {a1: 'dark', a2: {a1: 'light', a2: {h: 0}}}}, a2: ''}, a2: 8};
|
|
2871
|
+
});
|
|
2872
|
+
|
|
2873
|
+
/* {csegen:384} */
|
|
2874
|
+
const csegen_384 = __lazy(function () {
|
|
2875
|
+
return {a1: {a1: {h: 1 /* Any */, a1: 'string'}, a2: Prelude_Types_foldMap_Foldable_List(csegen_86()(), $9 => $9, {a1: 'The Personal Access Token Harmony should use to authenticate with GitHub. You can leave this unset if you want to set a PAT via the GITHUB_PAT or GH_TOKEN environment variable.', a2: {h: 0}})}, a2: 9};
|
|
2876
|
+
});
|
|
2877
|
+
|
|
2878
|
+
/* {csegen:409} */
|
|
2879
|
+
const csegen_409 = __lazy(function () {
|
|
2830
2880
|
return {a1: csegen_76(), a2: $3 => $4 => Prelude_EqOrd_compare_Ord_String($3, $4), a3: $9 => $a => Prelude_EqOrd_x3c_Ord_String($9, $a), a4: $f => $10 => Prelude_EqOrd_x3e_Ord_String($f, $10), a5: $15 => $16 => Prelude_EqOrd_x3cx3d_Ord_String($15, $16), a6: $1b => $1c => Prelude_EqOrd_x3ex3d_Ord_String($1b, $1c), a7: $21 => $22 => Prelude_EqOrd_max_Ord_String($21, $22), a8: $27 => $28 => Prelude_EqOrd_min_Ord_String($27, $28)};
|
|
2831
2881
|
});
|
|
2832
2882
|
|
|
2833
|
-
/* {csegen:
|
|
2834
|
-
const
|
|
2883
|
+
/* {csegen:412} */
|
|
2884
|
+
const csegen_412 = __lazy(function () {
|
|
2835
2885
|
return {a1: $1 => $2 => Prelude_EqOrd_x3dx3d_Eq_Integer($1, $2), a2: $7 => $8 => Prelude_EqOrd_x2fx3d_Eq_Integer($7, $8)};
|
|
2836
2886
|
});
|
|
2837
2887
|
|
|
2838
|
-
/* {csegen:
|
|
2839
|
-
const
|
|
2888
|
+
/* {csegen:420} */
|
|
2889
|
+
const csegen_420 = __lazy(function () {
|
|
2840
2890
|
return $0 => {
|
|
2841
2891
|
const $1 = Language_JSON_Accessors_string($0);
|
|
2842
2892
|
switch($1.h) {
|
|
@@ -2846,93 +2896,93 @@ const csegen_387 = __lazy(function () {
|
|
|
2846
2896
|
};
|
|
2847
2897
|
});
|
|
2848
2898
|
|
|
2849
|
-
/* {csegen:
|
|
2850
|
-
const
|
|
2899
|
+
/* {csegen:429} */
|
|
2900
|
+
const csegen_429 = __lazy(function () {
|
|
2851
2901
|
return {a1: $1 => $2 => _add32s($1, $2), a2: $6 => $7 => _mul32s($6, $7), a3: $b => Number(_truncBigInt32($b))};
|
|
2852
2902
|
});
|
|
2853
2903
|
|
|
2854
|
-
/* {csegen:
|
|
2855
|
-
const
|
|
2904
|
+
/* {csegen:449} */
|
|
2905
|
+
const csegen_449 = __lazy(function () {
|
|
2856
2906
|
return $0 => Prelude_EqOrd_x3dx3d_Eq_Char($0, '/');
|
|
2857
2907
|
});
|
|
2858
2908
|
|
|
2859
|
-
/* {csegen:
|
|
2860
|
-
const
|
|
2909
|
+
/* {csegen:455} */
|
|
2910
|
+
const csegen_455 = __lazy(function () {
|
|
2861
2911
|
return () => $0 => $0.a1;
|
|
2862
2912
|
});
|
|
2863
2913
|
|
|
2864
|
-
/* {csegen:
|
|
2865
|
-
const
|
|
2914
|
+
/* {csegen:468} */
|
|
2915
|
+
const csegen_468 = __lazy(function () {
|
|
2866
2916
|
return () => $0 => $1 => Data_Promise_map_Functor_x28Promisex20x24ex29($4 => Number(_truncUBigInt32($4)), System_time(csegen_48()()), $0, $1);
|
|
2867
2917
|
});
|
|
2868
2918
|
|
|
2869
|
-
/* {csegen:
|
|
2870
|
-
const
|
|
2919
|
+
/* {csegen:473} */
|
|
2920
|
+
const csegen_473 = __lazy(function () {
|
|
2871
2921
|
return $0 => $1 => $2 => $3 => Prelude_Types_map_Functor_Maybe($2, $3);
|
|
2872
2922
|
});
|
|
2873
2923
|
|
|
2874
|
-
/* {csegen:
|
|
2875
|
-
const
|
|
2924
|
+
/* {csegen:496} */
|
|
2925
|
+
const csegen_496 = __lazy(function () {
|
|
2876
2926
|
return () => $0 => $1 => $2 => Data_Promise_liftIO_HasIO_x28Promisex20x24ex29($5 => Prelude_IO_prim__putStr('\n', $5), $0, $1, $2);
|
|
2877
2927
|
});
|
|
2878
2928
|
|
|
2879
|
-
/* {csegen:
|
|
2880
|
-
const
|
|
2929
|
+
/* {csegen:498} */
|
|
2930
|
+
const csegen_498 = __lazy(function () {
|
|
2881
2931
|
return () => $0 => $1 => $2 => Data_Promise_liftIO_HasIO_x28Promisex20x24ex29($5 => Prelude_IO_prim__getStr($5), $0, $1, $2);
|
|
2882
2932
|
});
|
|
2883
2933
|
|
|
2884
|
-
/* {csegen:
|
|
2885
|
-
const
|
|
2934
|
+
/* {csegen:502} */
|
|
2935
|
+
const csegen_502 = __lazy(function () {
|
|
2886
2936
|
return () => $0 => $1 => Data_Promise_pure_Applicative_x28Promisex20x24ex29({h: 0}, $0, $1);
|
|
2887
2937
|
});
|
|
2888
2938
|
|
|
2889
|
-
/* {csegen:
|
|
2890
|
-
const
|
|
2939
|
+
/* {csegen:516} */
|
|
2940
|
+
const csegen_516 = __lazy(function () {
|
|
2891
2941
|
return {a1: Commands_Help_argument(0, '...'), a2: {h: 0}};
|
|
2892
2942
|
});
|
|
2893
2943
|
|
|
2894
|
-
/* {csegen:
|
|
2895
|
-
const
|
|
2896
|
-
return {a1: Commands_Help_argument(0, '#<label>'), a2:
|
|
2944
|
+
/* {csegen:521} */
|
|
2945
|
+
const csegen_521 = __lazy(function () {
|
|
2946
|
+
return {a1: Commands_Help_argument(0, '#<label>'), a2: csegen_516()};
|
|
2897
2947
|
});
|
|
2898
2948
|
|
|
2899
|
-
/* {csegen:
|
|
2900
|
-
const
|
|
2949
|
+
/* {csegen:693} */
|
|
2950
|
+
const csegen_693 = __lazy(function () {
|
|
2901
2951
|
return $0 => $1 => System_Git_currentBranch($0, $1);
|
|
2902
2952
|
});
|
|
2903
2953
|
|
|
2904
|
-
/* {csegen:
|
|
2905
|
-
const
|
|
2954
|
+
/* {csegen:707} */
|
|
2955
|
+
const csegen_707 = __lazy(function () {
|
|
2906
2956
|
return {a1: d => b => c => a => $1 => $2 => $3 => ({a1: $1($3.a1), a2: $2($3.a2)}), a2: b => c => a => $c => $d => ({a1: $c($d.a1), a2: $d.a2}), a3: a => d => b => $14 => $15 => ({a1: $15.a1, a2: $14($15.a2)})};
|
|
2907
2957
|
});
|
|
2908
2958
|
|
|
2909
|
-
/* {csegen:
|
|
2910
|
-
const
|
|
2959
|
+
/* {csegen:711} */
|
|
2960
|
+
const csegen_711 = __lazy(function () {
|
|
2911
2961
|
return {a1: {h: 0}, a2: {a1: '-i', a2: {h: 0}}};
|
|
2912
2962
|
});
|
|
2913
2963
|
|
|
2914
|
-
/* {csegen:
|
|
2915
|
-
const
|
|
2964
|
+
/* {csegen:717} */
|
|
2965
|
+
const csegen_717 = __lazy(function () {
|
|
2916
2966
|
return $0 => $1 => Data_Promise_pure_Applicative_x28Promisex20x24ex29(undefined, $0, $1);
|
|
2917
2967
|
});
|
|
2918
2968
|
|
|
2919
|
-
/* {csegen:
|
|
2920
|
-
const
|
|
2969
|
+
/* {csegen:741} */
|
|
2970
|
+
const csegen_741 = __lazy(function () {
|
|
2921
2971
|
return {a1: csegen_9(), a2: a => ({h: 0}), a3: a => $4 => $5 => Prelude_Types_x3cx7cx3e_Alternative_Maybe($4, $5)};
|
|
2922
2972
|
});
|
|
2923
2973
|
|
|
2924
|
-
/* {csegen:
|
|
2925
|
-
const
|
|
2926
|
-
return $0 => Data_List_sort(
|
|
2974
|
+
/* {csegen:742} */
|
|
2975
|
+
const csegen_742 = __lazy(function () {
|
|
2976
|
+
return $0 => Data_List_sort(csegen_409(), $0);
|
|
2927
2977
|
});
|
|
2928
2978
|
|
|
2929
|
-
/* {csegen:
|
|
2930
|
-
const
|
|
2979
|
+
/* {csegen:744} */
|
|
2980
|
+
const csegen_744 = __lazy(function () {
|
|
2931
2981
|
return $0 => $1 => $2 => FFI_Concurrency_promiseAll(csegen_66(), $0, $1, $2);
|
|
2932
2982
|
});
|
|
2933
2983
|
|
|
2934
|
-
/* {csegen:
|
|
2935
|
-
const
|
|
2984
|
+
/* {csegen:751} */
|
|
2985
|
+
const csegen_751 = __lazy(function () {
|
|
2936
2986
|
return $0 => {
|
|
2937
2987
|
switch($0.h) {
|
|
2938
2988
|
case 0: /* nothing */ return 1;
|
|
@@ -2941,93 +2991,93 @@ const csegen_716 = __lazy(function () {
|
|
|
2941
2991
|
};
|
|
2942
2992
|
});
|
|
2943
2993
|
|
|
2944
|
-
/* {csegen:
|
|
2945
|
-
const
|
|
2994
|
+
/* {csegen:756} */
|
|
2995
|
+
const csegen_756 = __lazy(function () {
|
|
2946
2996
|
return $0 => $1 => Data_Date_compare_Ord_Date($0, $1);
|
|
2947
2997
|
});
|
|
2948
2998
|
|
|
2949
|
-
/* {csegen:
|
|
2950
|
-
const
|
|
2999
|
+
/* {csegen:757} */
|
|
3000
|
+
const csegen_757 = __lazy(function () {
|
|
2951
3001
|
return $0 => $0.a3;
|
|
2952
3002
|
});
|
|
2953
3003
|
|
|
2954
|
-
/* {csegen:
|
|
2955
|
-
const
|
|
2956
|
-
return $0 => $1 => Prelude_Basics_on(
|
|
3004
|
+
/* {csegen:758} */
|
|
3005
|
+
const csegen_758 = __lazy(function () {
|
|
3006
|
+
return $0 => $1 => Prelude_Basics_on(csegen_756(), csegen_757(), $0, $1);
|
|
2957
3007
|
});
|
|
2958
3008
|
|
|
2959
|
-
/* {csegen:
|
|
2960
|
-
const
|
|
3009
|
+
/* {csegen:780} */
|
|
3010
|
+
const csegen_780 = __lazy(function () {
|
|
2961
3011
|
return $0 => $0.a3;
|
|
2962
3012
|
});
|
|
2963
3013
|
|
|
2964
|
-
/* {csegen:
|
|
2965
|
-
const
|
|
3014
|
+
/* {csegen:783} */
|
|
3015
|
+
const csegen_783 = __lazy(function () {
|
|
2966
3016
|
return Theme_cs({a1: 2, a2: {h: 0}}, {h: 0 /* Left */, a1: undefined});
|
|
2967
3017
|
});
|
|
2968
3018
|
|
|
2969
|
-
/* {csegen:
|
|
2970
|
-
const
|
|
3019
|
+
/* {csegen:784} */
|
|
3020
|
+
const csegen_784 = __lazy(function () {
|
|
2971
3021
|
return Theme_cs({a1: 4, a2: {h: 0}}, {h: 0 /* Left */, a1: undefined});
|
|
2972
3022
|
});
|
|
2973
3023
|
|
|
2974
|
-
/* {csegen:
|
|
2975
|
-
const
|
|
3024
|
+
/* {csegen:786} */
|
|
3025
|
+
const csegen_786 = __lazy(function () {
|
|
2976
3026
|
return $0 => $0.a1;
|
|
2977
3027
|
});
|
|
2978
3028
|
|
|
2979
|
-
/* {csegen:
|
|
2980
|
-
const
|
|
3029
|
+
/* {csegen:793} */
|
|
3030
|
+
const csegen_793 = __lazy(function () {
|
|
2981
3031
|
return date => Text_PrettyPrint_Prettyprinter_Doc_indent(2, Text_PrettyPrint_Prettyprinter_Doc_hsep({a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('earliest:'), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(Data_Date_show_Show_Date(date)), a2: {h: 0}}}));
|
|
2982
3032
|
});
|
|
2983
3033
|
|
|
2984
|
-
/* {csegen:
|
|
2985
|
-
const
|
|
3034
|
+
/* {csegen:803} */
|
|
3035
|
+
const csegen_803 = __lazy(function () {
|
|
2986
3036
|
return Theme_cs({a1: 0, a2: {h: 0}}, {h: 0 /* Left */, a1: undefined});
|
|
2987
3037
|
});
|
|
2988
3038
|
|
|
2989
|
-
/* {csegen:
|
|
2990
|
-
const
|
|
3039
|
+
/* {csegen:804} */
|
|
3040
|
+
const csegen_804 = __lazy(function () {
|
|
2991
3041
|
return Theme_cs({a1: 1, a2: {h: 0}}, {h: 0 /* Left */, a1: undefined});
|
|
2992
3042
|
});
|
|
2993
3043
|
|
|
2994
|
-
/* {csegen:
|
|
2995
|
-
const
|
|
3044
|
+
/* {csegen:805} */
|
|
3045
|
+
const csegen_805 = __lazy(function () {
|
|
2996
3046
|
return Theme_cs({a1: 3, a2: {h: 0}}, {h: 0 /* Left */, a1: undefined});
|
|
2997
3047
|
});
|
|
2998
3048
|
|
|
2999
|
-
/* {csegen:
|
|
3000
|
-
const
|
|
3049
|
+
/* {csegen:807} */
|
|
3050
|
+
const csegen_807 = __lazy(function () {
|
|
3001
3051
|
return Theme_cs({a1: 5, a2: {h: 0}}, {h: 0 /* Left */, a1: undefined});
|
|
3002
3052
|
});
|
|
3003
3053
|
|
|
3004
|
-
/* {csegen:
|
|
3005
|
-
const
|
|
3054
|
+
/* {csegen:832} */
|
|
3055
|
+
const csegen_832 = __lazy(function () {
|
|
3006
3056
|
return $0 => Prelude_Types_either(() => $3 => '', () => $5 => $5, $0);
|
|
3007
3057
|
});
|
|
3008
3058
|
|
|
3009
|
-
/* {csegen:
|
|
3010
|
-
const
|
|
3059
|
+
/* {csegen:839} */
|
|
3060
|
+
const csegen_839 = __lazy(function () {
|
|
3011
3061
|
return $0 => Util_Prompting_yesNoPrompt(csegen_48()(), 1, 'Would you like to continue creating a Pull Request anyway?');
|
|
3012
3062
|
});
|
|
3013
3063
|
|
|
3014
|
-
/* {csegen:
|
|
3015
|
-
const
|
|
3064
|
+
/* {csegen:878} */
|
|
3065
|
+
const csegen_878 = __lazy(function () {
|
|
3016
3066
|
return $0 => Prelude_Types_fastPack(Prelude_Types_List_reverse($0));
|
|
3017
3067
|
});
|
|
3018
3068
|
|
|
3019
|
-
/* {csegen:
|
|
3020
|
-
const
|
|
3069
|
+
/* {csegen:883} */
|
|
3070
|
+
const csegen_883 = __lazy(function () {
|
|
3021
3071
|
return $0 => $0.a1;
|
|
3022
3072
|
});
|
|
3023
3073
|
|
|
3024
|
-
/* {csegen:
|
|
3025
|
-
const
|
|
3074
|
+
/* {csegen:893} */
|
|
3075
|
+
const csegen_893 = __lazy(function () {
|
|
3026
3076
|
return {a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc()}, a2: {h: 0}};
|
|
3027
3077
|
});
|
|
3028
3078
|
|
|
3029
|
-
/* {csegen:
|
|
3030
|
-
const
|
|
3079
|
+
/* {csegen:909} */
|
|
3080
|
+
const csegen_909 = __lazy(function () {
|
|
3031
3081
|
return {a1: ann => $1 => Commands_Graph_pretty_Pretty_Date($1), a2: ann => $5 => $6 => Commands_Graph_prettyPrec_Pretty_Date($5, $6)};
|
|
3032
3082
|
});
|
|
3033
3083
|
|
|
@@ -3043,7 +3093,7 @@ function Main_case__casex20blockx20inx20casex20blockx20inx20casex20blockx20inx20
|
|
|
3043
3093
|
case 0: /* nil */ {
|
|
3044
3094
|
const $1c = $1d => $1e => $1f => {
|
|
3045
3095
|
switch($1d.h) {
|
|
3046
|
-
case undefined: /* just */ return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($23 => $24 => $25 => Data_Promise_liftIO_HasIO_x28Promisex20x24ex29($28 => FFI_GitHub_octokit($1d.a1, $28), $23, $24, $25), $30 => $31 =>
|
|
3096
|
+
case undefined: /* just */ return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($23 => $24 => $25 => Data_Promise_liftIO_HasIO_x28Promisex20x24ex29($28 => FFI_GitHub_octokit($1d.a1, $28), $23, $24, $25), $30 => $31 => Main_n__9085_1301_gitCompletions($0, $1, $2, $3, $4, $6, () => $30, $31), $1e, $1f);
|
|
3047
3097
|
case 0: /* nothing */ return Data_Promise_pure_Applicative_x28Promisex20x24ex29({h: 0}, $1e, $1f);
|
|
3048
3098
|
}
|
|
3049
3099
|
};
|
|
@@ -3054,35 +3104,35 @@ function Main_case__casex20blockx20inx20casex20blockx20inx20casex20blockx20inx20
|
|
|
3054
3104
|
};
|
|
3055
3105
|
}
|
|
3056
3106
|
|
|
3057
|
-
/* Main.
|
|
3058
|
-
function
|
|
3107
|
+
/* Main.9085:1302:trivialCompletions */
|
|
3108
|
+
function Main_n__9085_1302_trivialCompletions($0, $1, $2, $3, $4) {
|
|
3059
3109
|
return ShellCompletion_Common_cmdOpts($3, $2, $1, $0);
|
|
3060
3110
|
}
|
|
3061
3111
|
|
|
3062
|
-
/* Main.
|
|
3063
|
-
function
|
|
3112
|
+
/* Main.9496:1728:parsePg */
|
|
3113
|
+
function Main_n__9496_1728_parsePg($0, $1, $2, $3, $4, $5) {
|
|
3064
3114
|
return Data_String_parsePositive(csegen_2(), $5);
|
|
3065
3115
|
}
|
|
3066
3116
|
|
|
3067
|
-
/* Main.
|
|
3068
|
-
function
|
|
3117
|
+
/* Main.9496:1727:parseLim */
|
|
3118
|
+
function Main_n__9496_1727_parseLim($0, $1, $2, $3, $4) {
|
|
3069
3119
|
return Prelude_Interfaces_x3cx3dx3c(csegen_14(), x => Data_Fin_natToFin(x, 101n), $d => Data_String_parsePositive(csegen_2(), $d));
|
|
3070
3120
|
}
|
|
3071
3121
|
|
|
3072
|
-
/* Main.
|
|
3073
|
-
function
|
|
3122
|
+
/* Main.9085:1301:gitCompletions */
|
|
3123
|
+
function Main_n__9085_1301_gitCompletions($0, $1, $2, $3, $4, $5, $6, $7) {
|
|
3074
3124
|
return ShellCompletion_Common_githubOpts($5, $6, $3, $2, $1, $0, $7);
|
|
3075
3125
|
}
|
|
3076
3126
|
|
|
3077
|
-
/* Main.
|
|
3078
|
-
function
|
|
3127
|
+
/* Main.9085:1300:ffiCompletions */
|
|
3128
|
+
function Main_n__9085_1300_ffiCompletions($0, $1, $2, $3, $4) {
|
|
3079
3129
|
return ShellCompletion_Common_ffiOpts(csegen_31()(), $3, $2, $1, $0);
|
|
3080
3130
|
}
|
|
3081
3131
|
|
|
3082
|
-
/* Main.
|
|
3083
|
-
function
|
|
3132
|
+
/* Main.9085:1299:completions */
|
|
3133
|
+
function Main_n__9085_1299_completions($0, $1, $2, $3, $4, $5) {
|
|
3084
3134
|
return $6 => {
|
|
3085
|
-
const $7 =
|
|
3135
|
+
const $7 = Main_n__9085_1302_trivialCompletions($0, $1, $2, $3, $4);
|
|
3086
3136
|
switch($7.h) {
|
|
3087
3137
|
case 0: /* nothing */ {
|
|
3088
3138
|
const $1e = $1f => $20 => $21 => {
|
|
@@ -3103,7 +3153,7 @@ function Main_n__9063_1299_completions($0, $1, $2, $3, $4, $5) {
|
|
|
3103
3153
|
case undefined: /* just */ return Data_Promise_pure_Applicative_x28Promisex20x24ex29($1f.a1, $20, $21);
|
|
3104
3154
|
}
|
|
3105
3155
|
};
|
|
3106
|
-
return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($10 => $11 => $12 => Data_Promise_liftIO_HasIO_x28Promisex20x24ex29(
|
|
3156
|
+
return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($10 => $11 => $12 => Data_Promise_liftIO_HasIO_x28Promisex20x24ex29(Main_n__9085_1300_ffiCompletions($0, $1, $2, $3, $4), $10, $11, $12), $1e, $5, $6);
|
|
3107
3157
|
}
|
|
3108
3158
|
case undefined: /* just */ return Data_Promise_pure_Applicative_x28Promisex20x24ex29($7.a1, $5, $6);
|
|
3109
3159
|
}
|
|
@@ -3136,8 +3186,8 @@ function Main_shouldUseColors($0) {
|
|
|
3136
3186
|
function Main_shellCompletion($0, $1, $2, $3, $4) {
|
|
3137
3187
|
const $6 = $7 => $8 => {
|
|
3138
3188
|
switch($1) {
|
|
3139
|
-
case 0: return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($c =>
|
|
3140
|
-
case 1: return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($28 =>
|
|
3189
|
+
case 0: return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($c => Main_n__9085_1299_completions($4, $3, $2, $1, $0, $c), $15 => $16 => $17 => $18 => Data_Promise_liftIO_HasIO_x28Promisex20x24ex29($1b => Prelude_IO_prim__putStr(Data_String_fastUnlines($15), $1b), $16, $17, $18), $7, $8);
|
|
3190
|
+
case 1: return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($28 => Main_n__9085_1299_completions($4, $3, $2, $1, $0, $28), $31 => $32 => $33 => $34 => Data_Promise_liftIO_HasIO_x28Promisex20x24ex29($37 => Prelude_IO_prim__putStr(Data_String_Extra_join('~', csegen_66(), $31), $37), $32, $33, $34), $7, $8);
|
|
3141
3191
|
}
|
|
3142
3192
|
};
|
|
3143
3193
|
return Main_resolvex27x27($6);
|
|
@@ -3355,7 +3405,7 @@ function Main_handleAuthenticatedArgs($0, $1, $2) {
|
|
|
3355
3405
|
}
|
|
3356
3406
|
return Prelude_Types_x3ex3ex3d_Monad_Maybe($b2, filter => ({a1: {a1: filter, a2: {a1: $af.a1, a2: $af.a2}}}));
|
|
3357
3407
|
};
|
|
3358
|
-
const $91 = Prelude_Types_x3ex3ex3d_Monad_Maybe(Prelude_Types_x3cx2ax3e_Applicative_Maybe(Prelude_Types_x3cx2ax3e_Applicative_Maybe({a1: $99 => $9a => ({a1: $99, a2: $9a})},
|
|
3408
|
+
const $91 = Prelude_Types_x3ex3ex3d_Monad_Maybe(Prelude_Types_x3cx2ax3e_Applicative_Maybe(Prelude_Types_x3cx2ax3e_Applicative_Maybe({a1: $99 => $9a => ({a1: $99, a2: $9a})}, Main_n__9496_1727_parseLim($1, $2.a2.a2.a1, $2.a2.a2.a2.a1, $2.a2.a2.a2.a2.a1, $0)($2.a2.a2.a2.a1)), Main_n__9496_1728_parsePg($1, $2.a2.a2.a1, $2.a2.a2.a2.a1, $2.a2.a2.a2.a2.a1, $0, $2.a2.a2.a2.a2.a1)), $ae);
|
|
3359
3409
|
return $bf => {
|
|
3360
3410
|
switch($91.h) {
|
|
3361
3411
|
case undefined: /* just */ return $c1 => Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(FFI_GitHub_listPullRequestsJsonStr($1, $0.a2, $0.a3, $91.a1.a1, $91.a1.a2.a1, $91.a1.a2.a2), pullsJsonStr => $d0 => $d1 => $d2 => Data_Promise_liftIO_HasIO_x28Promisex20x24ex29($d5 => Prelude_IO_prim__putStr(pullsJsonStr, $d5), $d0, $d1, $d2), $bf, $c1);
|
|
@@ -6390,8 +6440,23 @@ function Data_Promise_bind($0, $1, $2, $3) {
|
|
|
6390
6440
|
return $4($3);
|
|
6391
6441
|
}
|
|
6392
6442
|
|
|
6443
|
+
/* ShellCompletion.Common.with block in allSettableValuesForProp */
|
|
6444
|
+
function ShellCompletion_Common_with__allSettableValuesForProp_13607($0, $1, $2) {
|
|
6445
|
+
switch($1.h) {
|
|
6446
|
+
case 0: /* nothing */ return {h: 0};
|
|
6447
|
+
case undefined: /* just */ {
|
|
6448
|
+
const $f = Data_Config_reifyProp($1.a1);
|
|
6449
|
+
const $e = $f.a1;
|
|
6450
|
+
const $13 = Data_Config_reifyProp($1.a1);
|
|
6451
|
+
const $12 = $13.a2;
|
|
6452
|
+
const $c = Data_Config_propOptions($e, $12);
|
|
6453
|
+
return Prelude_Types_List_mapAppend({h: 0}, $7 => Data_CompletionStyle_describe($2, '', $7), $c);
|
|
6454
|
+
}
|
|
6455
|
+
}
|
|
6456
|
+
}
|
|
6457
|
+
|
|
6393
6458
|
/* ShellCompletion.Common.case block in describe,assigned */
|
|
6394
|
-
function
|
|
6459
|
+
function ShellCompletion_Common_case__describex2cassigned_14841($0, $1, $2, $3) {
|
|
6395
6460
|
switch($3.h) {
|
|
6396
6461
|
case 0: /* nothing */ return '';
|
|
6397
6462
|
case undefined: /* just */ {
|
|
@@ -6404,7 +6469,7 @@ function ShellCompletion_Common_case__describex2cassigned_14811($0, $1, $2, $3)
|
|
|
6404
6469
|
}
|
|
6405
6470
|
|
|
6406
6471
|
/* ShellCompletion.Common.case block in describe,openPrs */
|
|
6407
|
-
function
|
|
6472
|
+
function ShellCompletion_Common_case__describex2copenPrs_14763($0, $1, $2) {
|
|
6408
6473
|
switch($2.h) {
|
|
6409
6474
|
case undefined: /* just */ {
|
|
6410
6475
|
switch($2.a1) {
|
|
@@ -6423,7 +6488,7 @@ function ShellCompletion_Common_case__describex2copenPrs_14733($0, $1, $2) {
|
|
|
6423
6488
|
}
|
|
6424
6489
|
|
|
6425
6490
|
/* ShellCompletion.Common.case block in optsForRequestCmd,slugsOrLoginsOrLabels */
|
|
6426
|
-
function
|
|
6491
|
+
function ShellCompletion_Common_case__optsForRequestCmdx2cslugsOrLoginsOrLabels_14203($0, $1, $2, $3) {
|
|
6427
6492
|
switch($3.h) {
|
|
6428
6493
|
case 1: /* :: */ {
|
|
6429
6494
|
switch($3.a1) {
|
|
@@ -6445,27 +6510,27 @@ function ShellCompletion_Common_case__optsForRequestCmdx2cslugsOrLoginsOrLabels_
|
|
|
6445
6510
|
}
|
|
6446
6511
|
}
|
|
6447
6512
|
|
|
6448
|
-
/* ShellCompletion.Common.
|
|
6449
|
-
function
|
|
6450
|
-
return
|
|
6513
|
+
/* ShellCompletion.Common.6717:14197:slugsOrLoginsOrLabels */
|
|
6514
|
+
function ShellCompletion_Common_n__6717_14197_slugsOrLoginsOrLabels($0, $1, $2) {
|
|
6515
|
+
return ShellCompletion_Common_case__optsForRequestCmdx2cslugsOrLoginsOrLabels_14203($0, $1, $2, Data_String_asList($0));
|
|
6451
6516
|
}
|
|
6452
6517
|
|
|
6453
|
-
/* ShellCompletion.Common.
|
|
6454
|
-
function
|
|
6455
|
-
return
|
|
6518
|
+
/* ShellCompletion.Common.7273:14757:openPrs */
|
|
6519
|
+
function ShellCompletion_Common_n__7273_14757_openPrs($0, $1) {
|
|
6520
|
+
return ShellCompletion_Common_case__describex2copenPrs_14763($0, $1, $0.a7);
|
|
6456
6521
|
}
|
|
6457
6522
|
|
|
6458
|
-
/* ShellCompletion.Common.
|
|
6459
|
-
function
|
|
6523
|
+
/* ShellCompletion.Common.7273:14756:assigned */
|
|
6524
|
+
function ShellCompletion_Common_n__7273_14756_assigned($0, $1, $2) {
|
|
6460
6525
|
switch($2.h) {
|
|
6461
6526
|
case 0: /* nothing */ return '';
|
|
6462
|
-
case undefined: /* just */ return
|
|
6527
|
+
case undefined: /* just */ return ShellCompletion_Common_case__describex2cassigned_14841($0, $1, $2.a1, $0.a6);
|
|
6463
6528
|
}
|
|
6464
6529
|
}
|
|
6465
6530
|
|
|
6466
6531
|
/* ShellCompletion.Common.optsForRequestCmd : Config => CompletionStyle -> String -> List String */
|
|
6467
6532
|
function ShellCompletion_Common_optsForRequestCmd($0, $1, $2) {
|
|
6468
|
-
return Prelude_Types_List_tailRecAppend(ShellCompletion_Util_withPrefix($1, $2, ShellCompletion_Common_allRequestCmdOpts($1)),
|
|
6533
|
+
return Prelude_Types_List_tailRecAppend(ShellCompletion_Util_withPrefix($1, $2, ShellCompletion_Common_allRequestCmdOpts($1)), ShellCompletion_Common_n__6717_14197_slugsOrLoginsOrLabels($2, $1, $0));
|
|
6469
6534
|
}
|
|
6470
6535
|
|
|
6471
6536
|
/* ShellCompletion.Common.optsForPrIntoOption : HasIO io => String -> io (Maybe (List String)) */
|
|
@@ -6531,7 +6596,7 @@ function ShellCompletion_Common_ffiOpts($0, $1, $2, $3, $4) {
|
|
|
6531
6596
|
|
|
6532
6597
|
/* ShellCompletion.Common.describe : Maybe String -> Issue -> String */
|
|
6533
6598
|
function ShellCompletion_Common_describe($0, $1) {
|
|
6534
|
-
return Prelude_Types_foldMap_Foldable_List(csegen_86()(), $7 => $7, {a1:
|
|
6599
|
+
return Prelude_Types_foldMap_Foldable_List(csegen_86()(), $7 => $7, {a1: ShellCompletion_Common_n__7273_14756_assigned($1, $0, $0), a2: {a1: ShellCompletion_Common_n__7273_14757_openPrs($1, $0), a2: {a1: $1.a2, a2: {h: 0}}}});
|
|
6535
6600
|
}
|
|
6536
6601
|
|
|
6537
6602
|
/* ShellCompletion.Common.configuredOpts : Config => CompletionStyle -> String -> String -> String -> List String */
|
|
@@ -7069,7 +7134,12 @@ function ShellCompletion_Common_cmdOpts($0, $1, $2, $3) {
|
|
|
7069
7134
|
default: {
|
|
7070
7135
|
switch($3) {
|
|
7071
7136
|
case 'config': return ShellCompletion_Util_someWithPrefix($0, $2, ShellCompletion_Common_allSettableProps($0));
|
|
7072
|
-
default:
|
|
7137
|
+
default: {
|
|
7138
|
+
switch($2) {
|
|
7139
|
+
case '--': return ShellCompletion_Util_all($0, ShellCompletion_Common_allSettableValuesForProp($0, $3));
|
|
7140
|
+
default: return ShellCompletion_Util_someWithPrefix($0, $2, ShellCompletion_Common_allSettableValuesForProp($0, $3));
|
|
7141
|
+
}
|
|
7142
|
+
}
|
|
7073
7143
|
}
|
|
7074
7144
|
}
|
|
7075
7145
|
}
|
|
@@ -7077,7 +7147,12 @@ function ShellCompletion_Common_cmdOpts($0, $1, $2, $3) {
|
|
|
7077
7147
|
default: {
|
|
7078
7148
|
switch($3) {
|
|
7079
7149
|
case 'config': return ShellCompletion_Util_someWithPrefix($0, $2, ShellCompletion_Common_allSettableProps($0));
|
|
7080
|
-
default:
|
|
7150
|
+
default: {
|
|
7151
|
+
switch($2) {
|
|
7152
|
+
case '--': return ShellCompletion_Util_all($0, ShellCompletion_Common_allSettableValuesForProp($0, $3));
|
|
7153
|
+
default: return ShellCompletion_Util_someWithPrefix($0, $2, ShellCompletion_Common_allSettableValuesForProp($0, $3));
|
|
7154
|
+
}
|
|
7155
|
+
}
|
|
7081
7156
|
}
|
|
7082
7157
|
}
|
|
7083
7158
|
}
|
|
@@ -7177,62 +7252,62 @@ function ShellCompletion_Common_cmdOpts($0, $1, $2, $3) {
|
|
|
7177
7252
|
case '--into': return {h: 0};
|
|
7178
7253
|
case '--ready': return ShellCompletion_Util_someFrom($0, csegen_157(), ShellCompletion_Common_allPrCmdOpts($0));
|
|
7179
7254
|
case 'pr': {
|
|
7180
|
-
let $
|
|
7255
|
+
let $1f0;
|
|
7181
7256
|
switch(Util_String_isHashPrefix($2)) {
|
|
7182
7257
|
case 1: {
|
|
7183
|
-
$
|
|
7258
|
+
$1f0 = () => ({h: 0});
|
|
7184
7259
|
break;
|
|
7185
7260
|
}
|
|
7186
7261
|
case 0: {
|
|
7187
|
-
$
|
|
7262
|
+
$1f0 = () => ({a1: {h: 0}});
|
|
7188
7263
|
break;
|
|
7189
7264
|
}
|
|
7190
7265
|
}
|
|
7191
|
-
return Prelude_Types_x3cx7cx3e_Alternative_Maybe(ShellCompletion_Util_someWithPrefixOrNothing($0, $2, ShellCompletion_Common_allPrCmdOpts($0)), $
|
|
7266
|
+
return Prelude_Types_x3cx7cx3e_Alternative_Maybe(ShellCompletion_Util_someWithPrefixOrNothing($0, $2, ShellCompletion_Common_allPrCmdOpts($0)), $1f0);
|
|
7192
7267
|
}
|
|
7193
7268
|
case '--draft': {
|
|
7194
|
-
const $
|
|
7269
|
+
const $1fd = c => {
|
|
7195
7270
|
switch(ShellCompletion_Util_matches($0, '--into', c)) {
|
|
7196
7271
|
case 1: return 1;
|
|
7197
7272
|
case 0: return ShellCompletion_Util_matches($0, '--print-tree', c);
|
|
7198
7273
|
}
|
|
7199
7274
|
};
|
|
7200
|
-
const $
|
|
7201
|
-
const $
|
|
7202
|
-
let $
|
|
7275
|
+
const $1fa = Prelude_Types_List_filterAppend({h: 0}, $1fd, ShellCompletion_Common_allPrCmdOpts($0));
|
|
7276
|
+
const $1f6 = ShellCompletion_Util_someWithPrefixOrNothing($0, $2, $1fa);
|
|
7277
|
+
let $20a;
|
|
7203
7278
|
switch(Util_String_isHashPrefix($2)) {
|
|
7204
7279
|
case 1: {
|
|
7205
|
-
$
|
|
7280
|
+
$20a = () => ({h: 0});
|
|
7206
7281
|
break;
|
|
7207
7282
|
}
|
|
7208
7283
|
case 0: {
|
|
7209
|
-
$
|
|
7284
|
+
$20a = () => ({a1: {h: 0}});
|
|
7210
7285
|
break;
|
|
7211
7286
|
}
|
|
7212
7287
|
}
|
|
7213
|
-
return Prelude_Types_x3cx7cx3e_Alternative_Maybe($
|
|
7288
|
+
return Prelude_Types_x3cx7cx3e_Alternative_Maybe($1f6, $20a);
|
|
7214
7289
|
}
|
|
7215
7290
|
default: {
|
|
7216
|
-
const $
|
|
7291
|
+
const $217 = c => {
|
|
7217
7292
|
switch(ShellCompletion_Util_matches($0, '--draft', c)) {
|
|
7218
7293
|
case 1: return 1;
|
|
7219
7294
|
case 0: return ShellCompletion_Util_matches($0, '--print-tree', c);
|
|
7220
7295
|
}
|
|
7221
7296
|
};
|
|
7222
|
-
const $
|
|
7223
|
-
const $
|
|
7224
|
-
let $
|
|
7297
|
+
const $214 = Prelude_Types_List_filterAppend({h: 0}, $217, ShellCompletion_Common_allPrCmdOpts($0));
|
|
7298
|
+
const $210 = ShellCompletion_Util_someWithPrefixOrNothing($0, $2, $214);
|
|
7299
|
+
let $224;
|
|
7225
7300
|
switch(Util_String_isHashPrefix($2)) {
|
|
7226
7301
|
case 1: {
|
|
7227
|
-
$
|
|
7302
|
+
$224 = () => ({h: 0});
|
|
7228
7303
|
break;
|
|
7229
7304
|
}
|
|
7230
7305
|
case 0: {
|
|
7231
|
-
$
|
|
7306
|
+
$224 = () => ({a1: {h: 0}});
|
|
7232
7307
|
break;
|
|
7233
7308
|
}
|
|
7234
7309
|
}
|
|
7235
|
-
return Prelude_Types_x3cx7cx3e_Alternative_Maybe($
|
|
7310
|
+
return Prelude_Types_x3cx7cx3e_Alternative_Maybe($210, $224);
|
|
7236
7311
|
}
|
|
7237
7312
|
}
|
|
7238
7313
|
}
|
|
@@ -7246,62 +7321,62 @@ function ShellCompletion_Common_cmdOpts($0, $1, $2, $3) {
|
|
|
7246
7321
|
case '--into': return {h: 0};
|
|
7247
7322
|
case '--ready': return ShellCompletion_Util_someFrom($0, csegen_157(), ShellCompletion_Common_allPrCmdOpts($0));
|
|
7248
7323
|
case 'pr': {
|
|
7249
|
-
let $
|
|
7324
|
+
let $240;
|
|
7250
7325
|
switch(Util_String_isHashPrefix($2)) {
|
|
7251
7326
|
case 1: {
|
|
7252
|
-
$
|
|
7327
|
+
$240 = () => ({h: 0});
|
|
7253
7328
|
break;
|
|
7254
7329
|
}
|
|
7255
7330
|
case 0: {
|
|
7256
|
-
$
|
|
7331
|
+
$240 = () => ({a1: {h: 0}});
|
|
7257
7332
|
break;
|
|
7258
7333
|
}
|
|
7259
7334
|
}
|
|
7260
|
-
return Prelude_Types_x3cx7cx3e_Alternative_Maybe(ShellCompletion_Util_someWithPrefixOrNothing($0, $2, ShellCompletion_Common_allPrCmdOpts($0)), $
|
|
7335
|
+
return Prelude_Types_x3cx7cx3e_Alternative_Maybe(ShellCompletion_Util_someWithPrefixOrNothing($0, $2, ShellCompletion_Common_allPrCmdOpts($0)), $240);
|
|
7261
7336
|
}
|
|
7262
7337
|
case '--draft': {
|
|
7263
|
-
const $
|
|
7338
|
+
const $24d = c => {
|
|
7264
7339
|
switch(ShellCompletion_Util_matches($0, '--into', c)) {
|
|
7265
7340
|
case 1: return 1;
|
|
7266
7341
|
case 0: return ShellCompletion_Util_matches($0, '--print-tree', c);
|
|
7267
7342
|
}
|
|
7268
7343
|
};
|
|
7269
|
-
const $
|
|
7270
|
-
const $
|
|
7271
|
-
let $
|
|
7344
|
+
const $24a = Prelude_Types_List_filterAppend({h: 0}, $24d, ShellCompletion_Common_allPrCmdOpts($0));
|
|
7345
|
+
const $246 = ShellCompletion_Util_someWithPrefixOrNothing($0, $2, $24a);
|
|
7346
|
+
let $25a;
|
|
7272
7347
|
switch(Util_String_isHashPrefix($2)) {
|
|
7273
7348
|
case 1: {
|
|
7274
|
-
$
|
|
7349
|
+
$25a = () => ({h: 0});
|
|
7275
7350
|
break;
|
|
7276
7351
|
}
|
|
7277
7352
|
case 0: {
|
|
7278
|
-
$
|
|
7353
|
+
$25a = () => ({a1: {h: 0}});
|
|
7279
7354
|
break;
|
|
7280
7355
|
}
|
|
7281
7356
|
}
|
|
7282
|
-
return Prelude_Types_x3cx7cx3e_Alternative_Maybe($
|
|
7357
|
+
return Prelude_Types_x3cx7cx3e_Alternative_Maybe($246, $25a);
|
|
7283
7358
|
}
|
|
7284
7359
|
default: {
|
|
7285
|
-
const $
|
|
7360
|
+
const $267 = c => {
|
|
7286
7361
|
switch(ShellCompletion_Util_matches($0, '--draft', c)) {
|
|
7287
7362
|
case 1: return 1;
|
|
7288
7363
|
case 0: return ShellCompletion_Util_matches($0, '--print-tree', c);
|
|
7289
7364
|
}
|
|
7290
7365
|
};
|
|
7291
|
-
const $
|
|
7292
|
-
const $
|
|
7293
|
-
let $
|
|
7366
|
+
const $264 = Prelude_Types_List_filterAppend({h: 0}, $267, ShellCompletion_Common_allPrCmdOpts($0));
|
|
7367
|
+
const $260 = ShellCompletion_Util_someWithPrefixOrNothing($0, $2, $264);
|
|
7368
|
+
let $274;
|
|
7294
7369
|
switch(Util_String_isHashPrefix($2)) {
|
|
7295
7370
|
case 1: {
|
|
7296
|
-
$
|
|
7371
|
+
$274 = () => ({h: 0});
|
|
7297
7372
|
break;
|
|
7298
7373
|
}
|
|
7299
7374
|
case 0: {
|
|
7300
|
-
$
|
|
7375
|
+
$274 = () => ({a1: {h: 0}});
|
|
7301
7376
|
break;
|
|
7302
7377
|
}
|
|
7303
7378
|
}
|
|
7304
|
-
return Prelude_Types_x3cx7cx3e_Alternative_Maybe($
|
|
7379
|
+
return Prelude_Types_x3cx7cx3e_Alternative_Maybe($260, $274);
|
|
7305
7380
|
}
|
|
7306
7381
|
}
|
|
7307
7382
|
}
|
|
@@ -7312,62 +7387,62 @@ function ShellCompletion_Common_cmdOpts($0, $1, $2, $3) {
|
|
|
7312
7387
|
case '--into': return {h: 0};
|
|
7313
7388
|
case '--ready': return ShellCompletion_Util_someFrom($0, csegen_157(), ShellCompletion_Common_allPrCmdOpts($0));
|
|
7314
7389
|
case 'pr': {
|
|
7315
|
-
let $
|
|
7390
|
+
let $289;
|
|
7316
7391
|
switch(Util_String_isHashPrefix($2)) {
|
|
7317
7392
|
case 1: {
|
|
7318
|
-
$
|
|
7393
|
+
$289 = () => ({h: 0});
|
|
7319
7394
|
break;
|
|
7320
7395
|
}
|
|
7321
7396
|
case 0: {
|
|
7322
|
-
$
|
|
7397
|
+
$289 = () => ({a1: {h: 0}});
|
|
7323
7398
|
break;
|
|
7324
7399
|
}
|
|
7325
7400
|
}
|
|
7326
|
-
return Prelude_Types_x3cx7cx3e_Alternative_Maybe(ShellCompletion_Util_someWithPrefixOrNothing($0, $2, ShellCompletion_Common_allPrCmdOpts($0)), $
|
|
7401
|
+
return Prelude_Types_x3cx7cx3e_Alternative_Maybe(ShellCompletion_Util_someWithPrefixOrNothing($0, $2, ShellCompletion_Common_allPrCmdOpts($0)), $289);
|
|
7327
7402
|
}
|
|
7328
7403
|
case '--draft': {
|
|
7329
|
-
const $
|
|
7404
|
+
const $296 = c => {
|
|
7330
7405
|
switch(ShellCompletion_Util_matches($0, '--into', c)) {
|
|
7331
7406
|
case 1: return 1;
|
|
7332
7407
|
case 0: return ShellCompletion_Util_matches($0, '--print-tree', c);
|
|
7333
7408
|
}
|
|
7334
7409
|
};
|
|
7335
|
-
const $
|
|
7336
|
-
const $
|
|
7337
|
-
let $
|
|
7410
|
+
const $293 = Prelude_Types_List_filterAppend({h: 0}, $296, ShellCompletion_Common_allPrCmdOpts($0));
|
|
7411
|
+
const $28f = ShellCompletion_Util_someWithPrefixOrNothing($0, $2, $293);
|
|
7412
|
+
let $2a3;
|
|
7338
7413
|
switch(Util_String_isHashPrefix($2)) {
|
|
7339
7414
|
case 1: {
|
|
7340
|
-
$
|
|
7415
|
+
$2a3 = () => ({h: 0});
|
|
7341
7416
|
break;
|
|
7342
7417
|
}
|
|
7343
7418
|
case 0: {
|
|
7344
|
-
$
|
|
7419
|
+
$2a3 = () => ({a1: {h: 0}});
|
|
7345
7420
|
break;
|
|
7346
7421
|
}
|
|
7347
7422
|
}
|
|
7348
|
-
return Prelude_Types_x3cx7cx3e_Alternative_Maybe($
|
|
7423
|
+
return Prelude_Types_x3cx7cx3e_Alternative_Maybe($28f, $2a3);
|
|
7349
7424
|
}
|
|
7350
7425
|
default: {
|
|
7351
|
-
const $
|
|
7426
|
+
const $2b0 = c => {
|
|
7352
7427
|
switch(ShellCompletion_Util_matches($0, '--draft', c)) {
|
|
7353
7428
|
case 1: return 1;
|
|
7354
7429
|
case 0: return ShellCompletion_Util_matches($0, '--print-tree', c);
|
|
7355
7430
|
}
|
|
7356
7431
|
};
|
|
7357
|
-
const $
|
|
7358
|
-
const $
|
|
7359
|
-
let $
|
|
7432
|
+
const $2ad = Prelude_Types_List_filterAppend({h: 0}, $2b0, ShellCompletion_Common_allPrCmdOpts($0));
|
|
7433
|
+
const $2a9 = ShellCompletion_Util_someWithPrefixOrNothing($0, $2, $2ad);
|
|
7434
|
+
let $2bd;
|
|
7360
7435
|
switch(Util_String_isHashPrefix($2)) {
|
|
7361
7436
|
case 1: {
|
|
7362
|
-
$
|
|
7437
|
+
$2bd = () => ({h: 0});
|
|
7363
7438
|
break;
|
|
7364
7439
|
}
|
|
7365
7440
|
case 0: {
|
|
7366
|
-
$
|
|
7441
|
+
$2bd = () => ({a1: {h: 0}});
|
|
7367
7442
|
break;
|
|
7368
7443
|
}
|
|
7369
7444
|
}
|
|
7370
|
-
return Prelude_Types_x3cx7cx3e_Alternative_Maybe($
|
|
7445
|
+
return Prelude_Types_x3cx7cx3e_Alternative_Maybe($2a9, $2bd);
|
|
7371
7446
|
}
|
|
7372
7447
|
}
|
|
7373
7448
|
}
|
|
@@ -7394,7 +7469,12 @@ function ShellCompletion_Common_cmdOpts($0, $1, $2, $3) {
|
|
|
7394
7469
|
default: {
|
|
7395
7470
|
switch($3) {
|
|
7396
7471
|
case 'config': return ShellCompletion_Util_someWithPrefix($0, $2, ShellCompletion_Common_allSettableProps($0));
|
|
7397
|
-
default:
|
|
7472
|
+
default: {
|
|
7473
|
+
switch($2) {
|
|
7474
|
+
case '--': return ShellCompletion_Util_all($0, ShellCompletion_Common_allSettableValuesForProp($0, $3));
|
|
7475
|
+
default: return ShellCompletion_Util_someWithPrefix($0, $2, ShellCompletion_Common_allSettableValuesForProp($0, $3));
|
|
7476
|
+
}
|
|
7477
|
+
}
|
|
7398
7478
|
}
|
|
7399
7479
|
}
|
|
7400
7480
|
}
|
|
@@ -7402,7 +7482,12 @@ function ShellCompletion_Common_cmdOpts($0, $1, $2, $3) {
|
|
|
7402
7482
|
default: {
|
|
7403
7483
|
switch($3) {
|
|
7404
7484
|
case 'config': return ShellCompletion_Util_someWithPrefix($0, $2, ShellCompletion_Common_allSettableProps($0));
|
|
7405
|
-
default:
|
|
7485
|
+
default: {
|
|
7486
|
+
switch($2) {
|
|
7487
|
+
case '--': return ShellCompletion_Util_all($0, ShellCompletion_Common_allSettableValuesForProp($0, $3));
|
|
7488
|
+
default: return ShellCompletion_Util_someWithPrefix($0, $2, ShellCompletion_Common_allSettableValuesForProp($0, $3));
|
|
7489
|
+
}
|
|
7490
|
+
}
|
|
7406
7491
|
}
|
|
7407
7492
|
}
|
|
7408
7493
|
}
|
|
@@ -7415,6 +7500,11 @@ function ShellCompletion_Common_cmdOpts($0, $1, $2, $3) {
|
|
|
7415
7500
|
}
|
|
7416
7501
|
}
|
|
7417
7502
|
|
|
7503
|
+
/* ShellCompletion.Common.allSettableValuesForProp : (s : CompletionStyle) -> String -> List CompletionResult */
|
|
7504
|
+
function ShellCompletion_Common_allSettableValuesForProp($0, $1) {
|
|
7505
|
+
return ShellCompletion_Common_with__allSettableValuesForProp_13607($1, Data_Config_settablePropNamed($1), $0);
|
|
7506
|
+
}
|
|
7507
|
+
|
|
7418
7508
|
/* ShellCompletion.Common.allSettableProps : (s : CompletionStyle) -> List CompletionResult */
|
|
7419
7509
|
function ShellCompletion_Common_allSettableProps($0) {
|
|
7420
7510
|
return Prelude_Types_List_mapAppend({h: 0}, $4 => Data_CompletionStyle_completionResult($0, $4), Data_Config_settablePropNamesAndHelp());
|
|
@@ -9709,13 +9799,13 @@ function Data_PullRequest_isAuthor($0, $1) {
|
|
|
9709
9799
|
return Prelude_EqOrd_x3dx3d_Eq_String($1.a5, $0);
|
|
9710
9800
|
}
|
|
9711
9801
|
|
|
9712
|
-
/* Data.Config.
|
|
9713
|
-
function
|
|
9802
|
+
/* Data.Config.10438:7800:personalAccessToken */
|
|
9803
|
+
function Data_Config_n__10438_7800_personalAccessToken($0) {
|
|
9714
9804
|
return Prelude_Types_maybe(() => 'Not set (will use $GITHUB_PAT or $GH_TOKEN environment variable)', () => $4 => Data_Config_show_Show_x28Hiddenx20x24ax29($4), $0.a16);
|
|
9715
9805
|
}
|
|
9716
9806
|
|
|
9717
|
-
/* Data.Config.
|
|
9718
|
-
function
|
|
9807
|
+
/* Data.Config.11092:8446:parseConfigJson */
|
|
9808
|
+
function Data_Config_n__11092_8446_parseConfigJson($0, $1) {
|
|
9719
9809
|
switch($1.h) {
|
|
9720
9810
|
case 6: /* JObject */ {
|
|
9721
9811
|
const $22 = $23 => {
|
|
@@ -9756,7 +9846,7 @@ function Data_Config_ParseBranchStrategy_show_Show_ParseBranchStrategy($0) {
|
|
|
9756
9846
|
|
|
9757
9847
|
/* Data.Config.show */
|
|
9758
9848
|
function Data_Config_show_Show_Config($0) {
|
|
9759
|
-
return Data_String_fastUnlines({a1: Prelude_Types_foldMap_Foldable_List(csegen_86()(), $9 => $9, {a1: ' updatedAt: ', a2: {a1: Prelude_Show_show_Show_Bits32($0.a1), a2: {h: 0}}}), a2: {a1: Prelude_Types_foldMap_Foldable_List(csegen_86()(), $19 => $19, {a1: ' theme: ', a2: {a1: Data_Theme_show_Show_Theme($0.a18), a2: {h: 0}}}), a2: {a1: Prelude_Types_foldMap_Foldable_List(csegen_86()(), $29 => $29, {a1: ' org or user: ', a2: {a1: Prelude_Show_show_Show_String($0.a2), a2: {h: 0}}}), a2: {a1: Prelude_Types_foldMap_Foldable_List(csegen_86()(), $39 => $39, {a1: ' repo: ', a2: {a1: Prelude_Show_show_Show_String($0.a3), a2: {h: 0}}}), a2: {a1: Prelude_Types_foldMap_Foldable_List(csegen_86()(), $49 => $49, {a1: ' defaultRemote: ', a2: {a1: Prelude_Show_show_Show_String($0.a4), a2: {h: 0}}}), a2: {a1: Prelude_Types_foldMap_Foldable_List(csegen_86()(), $59 => $59, {a1: ' mainBranch: ', a2: {a1: Prelude_Show_show_Show_String($0.a5), a2: {h: 0}}}), a2: {a1: Prelude_Types_foldMap_Foldable_List(csegen_86()(), $69 => $69, {a1: ' requestTeams: ', a2: {a1: Prelude_Show_show_Show_Bool($0.a6), a2: {h: 0}}}), a2: {a1: Prelude_Types_foldMap_Foldable_List(csegen_86()(), $79 => $79, {a1: ' requestUsers: ', a2: {a1: Prelude_Show_show_Show_Bool($0.a7), a2: {h: 0}}}), a2: {a1: Prelude_Types_foldMap_Foldable_List(csegen_86()(), $89 => $89, {a1: ' commentOnRequest: ', a2: {a1: Data_Config_CommentStrategy_show_Show_CommentStrategy($0.a8), a2: {h: 0}}}), a2: {a1: Prelude_Types_foldMap_Foldable_List(csegen_86()(), $99 => $99, {a1: ' branchParsing: ', a2: {a1: Data_Config_ParseBranchStrategy_show_Show_ParseBranchStrategy($0.a9), a2: {h: 0}}}), a2: {a1: Prelude_Types_foldMap_Foldable_List(csegen_86()(), $a9 => $a9, {a1: ' bugfixPRTitlePrefix: ', a2: {a1: Prelude_Show_show_Show_x28Maybex20x24ax29(csegen_88(), $0.a10), a2: {h: 0}}}), a2: {a1: Prelude_Types_foldMap_Foldable_List(csegen_86()(), $bb => $bb, {a1: 'addPrTreeDescription: ', a2: {a1: Prelude_Show_show_Show_Bool($0.a11), a2: {h: 0}}}), a2: {a1: Prelude_Types_foldMap_Foldable_List(csegen_86()(), $cb => $cb, {a1: ' teamSlugs: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_88(), $0.a12), a2: {h: 0}}}), a2: {a1: Prelude_Types_foldMap_Foldable_List(csegen_86()(), $dd => $dd, {a1: ' repoLabels: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_88(), $0.a13), a2: {h: 0}}}), a2: {a1: Prelude_Types_foldMap_Foldable_List(csegen_86()(), $ef => $ef, {a1: ' orgMembers: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_88(), $0.a14), a2: {h: 0}}}), a2: {a1: Prelude_Types_foldMap_Foldable_List(csegen_86()(), $101 => $101, {a1: ' ignoredPRs: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29({a1: x => Prelude_Show_show_Show_Integer(x), a2: d => x => Prelude_Show_showPrec_Show_Integer(d, x)}, $0.a15), a2: {h: 0}}}), a2: {a1: Prelude_Types_foldMap_Foldable_List(csegen_86()(), $119 => $119, {a1: ' githubPAT: ', a2: {a1:
|
|
9849
|
+
return Data_String_fastUnlines({a1: Prelude_Types_foldMap_Foldable_List(csegen_86()(), $9 => $9, {a1: ' updatedAt: ', a2: {a1: Prelude_Show_show_Show_Bits32($0.a1), a2: {h: 0}}}), a2: {a1: Prelude_Types_foldMap_Foldable_List(csegen_86()(), $19 => $19, {a1: ' theme: ', a2: {a1: Data_Theme_show_Show_Theme($0.a18), a2: {h: 0}}}), a2: {a1: Prelude_Types_foldMap_Foldable_List(csegen_86()(), $29 => $29, {a1: ' org or user: ', a2: {a1: Prelude_Show_show_Show_String($0.a2), a2: {h: 0}}}), a2: {a1: Prelude_Types_foldMap_Foldable_List(csegen_86()(), $39 => $39, {a1: ' repo: ', a2: {a1: Prelude_Show_show_Show_String($0.a3), a2: {h: 0}}}), a2: {a1: Prelude_Types_foldMap_Foldable_List(csegen_86()(), $49 => $49, {a1: ' defaultRemote: ', a2: {a1: Prelude_Show_show_Show_String($0.a4), a2: {h: 0}}}), a2: {a1: Prelude_Types_foldMap_Foldable_List(csegen_86()(), $59 => $59, {a1: ' mainBranch: ', a2: {a1: Prelude_Show_show_Show_String($0.a5), a2: {h: 0}}}), a2: {a1: Prelude_Types_foldMap_Foldable_List(csegen_86()(), $69 => $69, {a1: ' requestTeams: ', a2: {a1: Prelude_Show_show_Show_Bool($0.a6), a2: {h: 0}}}), a2: {a1: Prelude_Types_foldMap_Foldable_List(csegen_86()(), $79 => $79, {a1: ' requestUsers: ', a2: {a1: Prelude_Show_show_Show_Bool($0.a7), a2: {h: 0}}}), a2: {a1: Prelude_Types_foldMap_Foldable_List(csegen_86()(), $89 => $89, {a1: ' commentOnRequest: ', a2: {a1: Data_Config_CommentStrategy_show_Show_CommentStrategy($0.a8), a2: {h: 0}}}), a2: {a1: Prelude_Types_foldMap_Foldable_List(csegen_86()(), $99 => $99, {a1: ' branchParsing: ', a2: {a1: Data_Config_ParseBranchStrategy_show_Show_ParseBranchStrategy($0.a9), a2: {h: 0}}}), a2: {a1: Prelude_Types_foldMap_Foldable_List(csegen_86()(), $a9 => $a9, {a1: ' bugfixPRTitlePrefix: ', a2: {a1: Prelude_Show_show_Show_x28Maybex20x24ax29(csegen_88(), $0.a10), a2: {h: 0}}}), a2: {a1: Prelude_Types_foldMap_Foldable_List(csegen_86()(), $bb => $bb, {a1: 'addPrTreeDescription: ', a2: {a1: Prelude_Show_show_Show_Bool($0.a11), a2: {h: 0}}}), a2: {a1: Prelude_Types_foldMap_Foldable_List(csegen_86()(), $cb => $cb, {a1: ' teamSlugs: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_88(), $0.a12), a2: {h: 0}}}), a2: {a1: Prelude_Types_foldMap_Foldable_List(csegen_86()(), $dd => $dd, {a1: ' repoLabels: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_88(), $0.a13), a2: {h: 0}}}), a2: {a1: Prelude_Types_foldMap_Foldable_List(csegen_86()(), $ef => $ef, {a1: ' orgMembers: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_88(), $0.a14), a2: {h: 0}}}), a2: {a1: Prelude_Types_foldMap_Foldable_List(csegen_86()(), $101 => $101, {a1: ' ignoredPRs: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29({a1: x => Prelude_Show_show_Show_Integer(x), a2: d => x => Prelude_Show_showPrec_Show_Integer(d, x)}, $0.a15), a2: {h: 0}}}), a2: {a1: Prelude_Types_foldMap_Foldable_List(csegen_86()(), $119 => $119, {a1: ' githubPAT: ', a2: {a1: Data_Config_n__10438_7800_personalAccessToken($0), a2: {h: 0}}}), a2: {a1: Prelude_Types_foldMap_Foldable_List(csegen_86()(), $128 => $128, {a1: ' githubUser: ', a2: {a1: Prelude_Show_show_Show_x28Maybex20x24ax29(csegen_88(), $0.a17), a2: {h: 0}}}), a2: {h: 0}}}}}}}}}}}}}}}}}}});
|
|
9760
9850
|
}
|
|
9761
9851
|
|
|
9762
9852
|
/* Data.Config.CommentStrategy.show */
|
|
@@ -9773,11 +9863,27 @@ function Data_Config_show_Show_x28Hiddenx20x24ax29($0) {
|
|
|
9773
9863
|
return 'xxxxxxxx (hidden)';
|
|
9774
9864
|
}
|
|
9775
9865
|
|
|
9866
|
+
/* Data.Config.(.strValue) : Options -> String */
|
|
9867
|
+
function Data_Config_rf__strValue($0) {
|
|
9868
|
+
switch($0.h) {
|
|
9869
|
+
case 0: /* Enum */ return Prelude_Types_foldMap_Foldable_List(csegen_86()(), $7 => $7, Data_List_intersperse('/', $0.a1));
|
|
9870
|
+
case 1: /* Any */ return $0.a1;
|
|
9871
|
+
}
|
|
9872
|
+
}
|
|
9873
|
+
|
|
9776
9874
|
/* Data.Config.(.filepath) : Config -> String */
|
|
9777
9875
|
function Data_Config_rf__filepath($0) {
|
|
9778
9876
|
return $0.a19.a1;
|
|
9779
9877
|
}
|
|
9780
9878
|
|
|
9879
|
+
/* Data.Config.(.enumeratedOptions) : Options -> List String */
|
|
9880
|
+
function Data_Config_rf__enumeratedOptions($0) {
|
|
9881
|
+
switch($0.h) {
|
|
9882
|
+
case 0: /* Enum */ return $0.a1;
|
|
9883
|
+
case 1: /* Any */ return {h: 0};
|
|
9884
|
+
}
|
|
9885
|
+
}
|
|
9886
|
+
|
|
9781
9887
|
/* Data.Config.(.editor) : Config -> Maybe String */
|
|
9782
9888
|
function Data_Config_rf__editor($0) {
|
|
9783
9889
|
return $0.a19.a4;
|
|
@@ -9795,7 +9901,7 @@ function Data_Config_rf__colors($0) {
|
|
|
9795
9901
|
|
|
9796
9902
|
/* Data.Config.settableProps : List SomeSettableProp */
|
|
9797
9903
|
const Data_Config_settableProps = __lazy(function () {
|
|
9798
|
-
return {a1: {a1: 'requestTeams', a2:
|
|
9904
|
+
return {a1: {a1: 'requestTeams', a2: csegen_345()}, a2: {a1: {a1: 'requestUsers', a2: csegen_349()}, a2: {a1: {a1: 'commentOnRequest', a2: csegen_356()}, a2: {a1: {a1: 'branchParsing', a2: csegen_363()}, a2: {a1: {a1: 'bugfixPRTitlePrefix', a2: csegen_367()}, a2: {a1: {a1: 'addPrTreeDescription', a2: csegen_371()}, a2: {a1: {a1: 'defaultRemote', a2: csegen_373()}, a2: {a1: {a1: 'mainBranch', a2: csegen_375()}, a2: {a1: {a1: 'theme', a2: csegen_380()}, a2: {a1: {a1: 'githubPAT', a2: csegen_384()}, a2: {h: 0}}}}}}}}}}};
|
|
9799
9905
|
});
|
|
9800
9906
|
|
|
9801
9907
|
/* Data.Config.settablePropNamesAndHelp : List (String, String) */
|
|
@@ -9825,6 +9931,27 @@ function Data_Config_settablePropNamed($0) {
|
|
|
9825
9931
|
}
|
|
9826
9932
|
}
|
|
9827
9933
|
|
|
9934
|
+
/* Data.Config.reifyProp : Exists (SettableProp name) -> (h : (Options, String) ** SettableProp name h) */
|
|
9935
|
+
function Data_Config_reifyProp($0) {
|
|
9936
|
+
switch($0) {
|
|
9937
|
+
case 0: return csegen_345();
|
|
9938
|
+
case 1: return csegen_349();
|
|
9939
|
+
case 2: return csegen_356();
|
|
9940
|
+
case 3: return csegen_363();
|
|
9941
|
+
case 4: return csegen_367();
|
|
9942
|
+
case 5: return csegen_371();
|
|
9943
|
+
case 6: return csegen_373();
|
|
9944
|
+
case 7: return csegen_375();
|
|
9945
|
+
case 8: return csegen_380();
|
|
9946
|
+
case 9: return csegen_384();
|
|
9947
|
+
}
|
|
9948
|
+
}
|
|
9949
|
+
|
|
9950
|
+
/* Data.Config.propOptions : SettableProp n h -> List String */
|
|
9951
|
+
function Data_Config_propOptions($0, $1) {
|
|
9952
|
+
return Data_Config_rf__enumeratedOptions(Builtin_fst($0));
|
|
9953
|
+
}
|
|
9954
|
+
|
|
9828
9955
|
/* Data.Config.propName' : SomeSettableProp -> String */
|
|
9829
9956
|
function Data_Config_propNamex27($0) {
|
|
9830
9957
|
return $0.a1;
|
|
@@ -9832,12 +9959,17 @@ function Data_Config_propNamex27($0) {
|
|
|
9832
9959
|
|
|
9833
9960
|
/* Data.Config.propHelp' : SomeSettableProp -> String */
|
|
9834
9961
|
function Data_Config_propHelpx27($0) {
|
|
9835
|
-
return $0.a2.a1;
|
|
9962
|
+
return Data_Config_propHelp($0.a2.a1, $0.a2.a2);
|
|
9963
|
+
}
|
|
9964
|
+
|
|
9965
|
+
/* Data.Config.propHelp : SettableProp n h -> String */
|
|
9966
|
+
function Data_Config_propHelp($0, $1) {
|
|
9967
|
+
return (Prelude_Types_foldMap_Foldable_List(csegen_86()(), $8 => $8, {a1: '[', a2: {a1: Data_Config_rf__strValue(Builtin_fst($0)), a2: {a1: '] ', a2: {h: 0}}}})+Builtin_snd($0));
|
|
9836
9968
|
}
|
|
9837
9969
|
|
|
9838
9970
|
/* Data.Config.parseConfig : Ephemeral -> String -> Either String Config */
|
|
9839
9971
|
function Data_Config_parseConfig($0, $1) {
|
|
9840
|
-
return Prelude_Interfaces_x3ex3dx3e(csegen_241(), csegen_288(), $8 =>
|
|
9972
|
+
return Prelude_Interfaces_x3ex3dx3e(csegen_241(), csegen_288(), $8 => Data_Config_n__11092_8446_parseConfigJson($0, $8), $1);
|
|
9841
9973
|
}
|
|
9842
9974
|
|
|
9843
9975
|
/* Data.Config.CommentStrategy.parseCommentConfig : String -> Maybe CommentStrategy */
|
|
@@ -9868,7 +10000,7 @@ const Data_Config_longestSettablePropName = __lazy(function () {
|
|
|
9868
10000
|
|
|
9869
10001
|
/* Data.Config.json : Config -> JSON */
|
|
9870
10002
|
function Data_Config_json($0) {
|
|
9871
|
-
return {h: 6 /* JObject */, a1: {a1: {a1: 'requestTeams', a2: {h: 3 /* JBool */, a1: $0.a6}}, a2: {a1: {a1: 'requestUsers', a2: {h: 3 /* JBool */, a1: $0.a7}}, a2: {a1: {a1: 'commentOnRequest', a2: {h: 4 /* JString */, a1: Data_Config_CommentStrategy_show_Show_CommentStrategy($0.a8)}}, a2: {a1: {a1: 'branchParsing', a2: {h: 4 /* JString */, a1: Data_Config_ParseBranchStrategy_show_Show_ParseBranchStrategy($0.a9)}}, a2: {a1: {a1: 'bugfixPRTitlePrefix', a2: Prelude_Types_maybe(() => ({h: 0 /* JNull */}), () => $21 => ({h: 4 /* JString */, a1: $21}), $0.a10)}, a2: {a1: {a1: 'addPrTreeDescription', a2: {h: 3 /* JBool */, a1: $0.a11}}, a2: {a1: {a1: 'org', a2: {h: 4 /* JString */, a1: $0.a2}}, a2: {a1: {a1: 'repo', a2: {h: 4 /* JString */, a1: $0.a3}}, a2: {a1: {a1: 'defaultRemote', a2: {h: 4 /* JString */, a1: $0.a4}}, a2: {a1: {a1: 'mainBranch', a2: {h: 4 /* JString */, a1: $0.a5}}, a2: {a1: {a1: 'theme', a2: {h: 4 /* JString */, a1: Data_Theme_show_Show_Theme($0.a18)}}, a2: {a1: {a1: 'orgMembers', a2: {h: 5 /* JArray */, a1: Prelude_Types_List_mapAppend({h: 0}, $4c => ({h: 4 /* JString */, a1: $4c}), Data_List_sort(
|
|
10003
|
+
return {h: 6 /* JObject */, a1: {a1: {a1: 'requestTeams', a2: {h: 3 /* JBool */, a1: $0.a6}}, a2: {a1: {a1: 'requestUsers', a2: {h: 3 /* JBool */, a1: $0.a7}}, a2: {a1: {a1: 'commentOnRequest', a2: {h: 4 /* JString */, a1: Data_Config_CommentStrategy_show_Show_CommentStrategy($0.a8)}}, a2: {a1: {a1: 'branchParsing', a2: {h: 4 /* JString */, a1: Data_Config_ParseBranchStrategy_show_Show_ParseBranchStrategy($0.a9)}}, a2: {a1: {a1: 'bugfixPRTitlePrefix', a2: Prelude_Types_maybe(() => ({h: 0 /* JNull */}), () => $21 => ({h: 4 /* JString */, a1: $21}), $0.a10)}, a2: {a1: {a1: 'addPrTreeDescription', a2: {h: 3 /* JBool */, a1: $0.a11}}, a2: {a1: {a1: 'org', a2: {h: 4 /* JString */, a1: $0.a2}}, a2: {a1: {a1: 'repo', a2: {h: 4 /* JString */, a1: $0.a3}}, a2: {a1: {a1: 'defaultRemote', a2: {h: 4 /* JString */, a1: $0.a4}}, a2: {a1: {a1: 'mainBranch', a2: {h: 4 /* JString */, a1: $0.a5}}, a2: {a1: {a1: 'theme', a2: {h: 4 /* JString */, a1: Data_Theme_show_Show_Theme($0.a18)}}, a2: {a1: {a1: 'orgMembers', a2: {h: 5 /* JArray */, a1: Prelude_Types_List_mapAppend({h: 0}, $4c => ({h: 4 /* JString */, a1: $4c}), Data_List_sort(csegen_409(), $0.a14))}}, a2: {a1: {a1: 'teamSlugs', a2: {h: 5 /* JArray */, a1: Prelude_Types_List_mapAppend({h: 0}, $5b => ({h: 4 /* JString */, a1: $5b}), Data_List_sort(csegen_409(), $0.a12))}}, a2: {a1: {a1: 'repoLabels', a2: {h: 5 /* JArray */, a1: Prelude_Types_List_mapAppend({h: 0}, $6a => ({h: 4 /* JString */, a1: $6a}), Data_List_sort(csegen_409(), $0.a13))}}, a2: {a1: {a1: 'ignoredPRs', a2: {h: 5 /* JArray */, a1: Prelude_Types_List_mapAppend({h: 0}, $79 => ({h: 1 /* JInteger */, a1: $79}), Data_List_sort({a1: csegen_412(), a2: csegen_298(), a3: $83 => $84 => Prelude_EqOrd_x3c_Ord_Integer($83, $84), a4: $89 => $8a => Prelude_EqOrd_x3e_Ord_Integer($89, $8a), a5: $8f => $90 => Prelude_EqOrd_x3cx3d_Ord_Integer($8f, $90), a6: $95 => $96 => Prelude_EqOrd_x3ex3d_Ord_Integer($95, $96), a7: $9b => $9c => Prelude_EqOrd_max_Ord_Integer($9b, $9c), a8: $a1 => $a2 => Prelude_EqOrd_min_Ord_Integer($a1, $a2)}, $0.a15))}}, a2: {a1: {a1: 'githubPAT', a2: Prelude_Types_maybe(() => ({h: 0 /* JNull */}), () => $ae => ({h: 4 /* JString */, a1: $ae}), $0.a16)}, a2: {a1: {a1: 'githubUser', a2: Prelude_Types_maybe(() => ({h: 0 /* JNull */}), () => $b8 => ({h: 4 /* JString */, a1: $b8}), $0.a17)}, a2: {a1: {a1: 'updatedAt', a2: {h: 1 /* JInteger */, a1: BigInt($0.a1)}}, a2: {h: 0}}}}}}}}}}}}}}}}}}}};
|
|
9872
10004
|
}
|
|
9873
10005
|
|
|
9874
10006
|
/* Data.Config.filename : String */
|
|
@@ -9878,14 +10010,19 @@ const Data_Config_filename = __lazy(function () {
|
|
|
9878
10010
|
|
|
9879
10011
|
/* Data.Config.commentConfig : JSON -> Either String CommentStrategy */
|
|
9880
10012
|
function Data_Config_commentConfig($0) {
|
|
9881
|
-
return Prelude_Interfaces_x3ex3dx3e(csegen_241(),
|
|
10013
|
+
return Prelude_Interfaces_x3ex3dx3e(csegen_241(), csegen_420(), $7 => Data_Either_maybeToEither(() => '', Data_Config_CommentStrategy_parseCommentConfig($7)), $0);
|
|
9882
10014
|
}
|
|
9883
10015
|
|
|
9884
10016
|
/* Data.Config.branchConfig : JSON -> Either String ParseBranchStrategy */
|
|
9885
10017
|
function Data_Config_branchConfig($0) {
|
|
9886
|
-
return Prelude_Interfaces_x3ex3dx3e(csegen_241(),
|
|
10018
|
+
return Prelude_Interfaces_x3ex3dx3e(csegen_241(), csegen_420(), $7 => Data_Either_maybeToEither(() => '', Data_Config_ParseBranchStrategy_parseBranchConfig($7)), $0);
|
|
9887
10019
|
}
|
|
9888
10020
|
|
|
10021
|
+
/* Data.Config.booleanOptions : Options */
|
|
10022
|
+
const Data_Config_booleanOptions = __lazy(function () {
|
|
10023
|
+
return {h: 0 /* Enum */, a1: {a1: 'true', a2: {a1: 'false', a2: {h: 0}}}};
|
|
10024
|
+
});
|
|
10025
|
+
|
|
9889
10026
|
/* Data.Theme.show */
|
|
9890
10027
|
function Data_Theme_show_Show_Theme($0) {
|
|
9891
10028
|
switch($0) {
|
|
@@ -9914,13 +10051,13 @@ function Util_Prompting_with__yesNoPromptx2cyesUnlessNo_1370($0, $1, $2, $3, $4,
|
|
|
9914
10051
|
}
|
|
9915
10052
|
}
|
|
9916
10053
|
|
|
9917
|
-
/* Util.Prompting.
|
|
9918
|
-
function
|
|
10054
|
+
/* Util.Prompting.5953:1362:yesUnlessNo */
|
|
10055
|
+
function Util_Prompting_n__5953_1362_yesUnlessNo($0, $1, $2, $3) {
|
|
9919
10056
|
return Util_Prompting_with__yesNoPromptx2cyesUnlessNo_1370(undefined, $0, $1, $2, $3, Data_String_toLower($3));
|
|
9920
10057
|
}
|
|
9921
10058
|
|
|
9922
|
-
/* Util.Prompting.
|
|
9923
|
-
function
|
|
10059
|
+
/* Util.Prompting.6464:1857:readTemplate */
|
|
10060
|
+
function Util_Prompting_n__6464_1857_readTemplate($0, $1, $2, $3, $4) {
|
|
9924
10061
|
const $11 = $12 => {
|
|
9925
10062
|
switch($12) {
|
|
9926
10063
|
case 0: return $0.a1.a1.a2(undefined)('');
|
|
@@ -9938,8 +10075,8 @@ function Util_Prompting_n__6446_1857_readTemplate($0, $1, $2, $3, $4) {
|
|
|
9938
10075
|
return $0.a1.a2(undefined)(undefined)(System_File_Meta_exists($0, $4))($11);
|
|
9939
10076
|
}
|
|
9940
10077
|
|
|
9941
|
-
/* Util.
|
|
9942
|
-
function
|
|
10078
|
+
/* Util.5840:1244:getMoreLines */
|
|
10079
|
+
function Util_n__5840_1244_getMoreLines($0, $1, $2) {
|
|
9943
10080
|
switch($2.h) {
|
|
9944
10081
|
case 0: /* nothing */ return $0.a1.a1.a2(undefined)(Prelude_Types_List_reverse($1));
|
|
9945
10082
|
case undefined: /* just */ {
|
|
@@ -9950,13 +10087,13 @@ function Util_n__5822_1244_getMoreLines($0, $1, $2) {
|
|
|
9950
10087
|
case '': {
|
|
9951
10088
|
switch(line) {
|
|
9952
10089
|
case '': return $0.a1.a1.a2(undefined)(Prelude_Types_List_reverse($1.a2));
|
|
9953
|
-
default: return
|
|
10090
|
+
default: return Util_n__5840_1244_getMoreLines($0, {a1: line, a2: $1}, $2.a1());
|
|
9954
10091
|
}
|
|
9955
10092
|
}
|
|
9956
|
-
default: return
|
|
10093
|
+
default: return Util_n__5840_1244_getMoreLines($0, {a1: line, a2: $1}, $2.a1());
|
|
9957
10094
|
}
|
|
9958
10095
|
}
|
|
9959
|
-
default: return
|
|
10096
|
+
default: return Util_n__5840_1244_getMoreLines($0, {a1: line, a2: $1}, $2.a1());
|
|
9960
10097
|
}
|
|
9961
10098
|
};
|
|
9962
10099
|
return $0.a1.a2(undefined)(undefined)($0.a1.a1.a1(undefined)(undefined)($20 => Data_String_trim($20))($0.a2(undefined)($29 => Prelude_IO_prim__getStr($29))))($2c);
|
|
@@ -9964,13 +10101,13 @@ function Util_n__5822_1244_getMoreLines($0, $1, $2) {
|
|
|
9964
10101
|
}
|
|
9965
10102
|
}
|
|
9966
10103
|
|
|
9967
|
-
/* Util.Prompting.
|
|
9968
|
-
function
|
|
10104
|
+
/* Util.Prompting.6121:1516:defaultStr */
|
|
10105
|
+
function Util_Prompting_n__6121_1516_defaultStr($0, $1) {
|
|
9969
10106
|
return Prelude_Types_maybe(() => '', () => $5 => Util_Prompting_enterForDefaultStr($5), $0);
|
|
9970
10107
|
}
|
|
9971
10108
|
|
|
9972
|
-
/* Util.Prompting.
|
|
9973
|
-
function
|
|
10109
|
+
/* Util.Prompting.5953:1361:defaultAnswerStr */
|
|
10110
|
+
function Util_Prompting_n__5953_1361_defaultAnswerStr($0, $1, $2) {
|
|
9974
10111
|
switch($1) {
|
|
9975
10112
|
case 0: return 'y/N';
|
|
9976
10113
|
case 1: return 'Y/n';
|
|
@@ -9979,7 +10116,7 @@ function Util_Prompting_n__5935_1361_defaultAnswerStr($0, $1, $2) {
|
|
|
9979
10116
|
|
|
9980
10117
|
/* Util.Prompting.yesNoPrompt : HasIO io => {default True _ : Bool} -> String -> io Bool */
|
|
9981
10118
|
function Util_Prompting_yesNoPrompt($0, $1, $2) {
|
|
9982
|
-
return $0.a1.a2(undefined)(undefined)($0.a2(undefined)($11 => Prelude_IO_prim__putStr(Prelude_Types_foldMap_Foldable_List(csegen_86()(), $19 => $19, {a1: $2, a2: {a1: ' [', a2: {a1:
|
|
10119
|
+
return $0.a1.a2(undefined)(undefined)($0.a2(undefined)($11 => Prelude_IO_prim__putStr(Prelude_Types_foldMap_Foldable_List(csegen_86()(), $19 => $19, {a1: $2, a2: {a1: ' [', a2: {a1: Util_Prompting_n__5953_1361_defaultAnswerStr($0, $1, $2), a2: {a1: '] ', a2: {h: 0}}}}}), $11)))($29 => $0.a1.a1.a1(undefined)(undefined)($34 => Util_Prompting_n__5953_1362_yesUnlessNo($0, $1, $2, Data_String_trim($34)))($0.a2(undefined)($42 => Prelude_IO_prim__getStr($42))));
|
|
9983
10120
|
}
|
|
9984
10121
|
|
|
9985
10122
|
/* Util.whenNothing : Applicative f => Maybe a -> f () -> f () */
|
|
@@ -10016,7 +10153,7 @@ function Util_Prompting_prepareDescriptionFile($0, $1, $2, $3) {
|
|
|
10016
10153
|
const $20 = Prelude_Types_foldMap_Foldable_List(csegen_86()(), $26 => $26, {a1: $2, a2: {a1: '\n', a2: {a1: templateContents, a2: {h: 0}}}});
|
|
10017
10154
|
return $0.a1.a1.a1(undefined)(undefined)($38 => undefined)(System_File_ReadWrite_writeFile($0, $3, $20));
|
|
10018
10155
|
};
|
|
10019
|
-
return $0.a1.a2(undefined)(undefined)(Prelude_Types_maybe(() => $0.a1.a1.a2(undefined)(''), () => $17 =>
|
|
10156
|
+
return $0.a1.a2(undefined)(undefined)(Prelude_Types_maybe(() => $0.a1.a1.a2(undefined)(''), () => $17 => Util_Prompting_n__6464_1857_readTemplate($0, $3, $2, $1, $17), $1))($1f);
|
|
10020
10157
|
}
|
|
10021
10158
|
|
|
10022
10159
|
/* Util.Prompting.orIfEmpty : Maybe String -> String -> String */
|
|
@@ -10099,7 +10236,7 @@ function Util_Prompting_inlineDescription($0, $1, $2) {
|
|
|
10099
10236
|
|
|
10100
10237
|
/* Util.getManyLines : HasIO io => Fuel -> io (List String) */
|
|
10101
10238
|
function Util_getManyLines($0, $1) {
|
|
10102
|
-
return
|
|
10239
|
+
return Util_n__5840_1244_getMoreLines($0, {h: 0}, $1);
|
|
10103
10240
|
}
|
|
10104
10241
|
|
|
10105
10242
|
/* Util.Prompting.getLineEnterForDefault : HasIO io => String -> Maybe String -> io String */
|
|
@@ -10114,7 +10251,7 @@ function Util_Prompting_enterForDefaultStr($0) {
|
|
|
10114
10251
|
|
|
10115
10252
|
/* Util.Prompting.enterForDefaultPrompt : String -> Maybe String -> String */
|
|
10116
10253
|
function Util_Prompting_enterForDefaultPrompt($0, $1) {
|
|
10117
|
-
return Prelude_Types_foldMap_Foldable_List(csegen_86()(), $7 => $7, {a1: $0, a2: {a1:
|
|
10254
|
+
return Prelude_Types_foldMap_Foldable_List(csegen_86()(), $7 => $7, {a1: $0, a2: {a1: Util_Prompting_n__6121_1516_defaultStr($1, $0), a2: {h: 0}}});
|
|
10118
10255
|
}
|
|
10119
10256
|
|
|
10120
10257
|
/* Util.Prompting.editorDescription : HasIO io => String -> Maybe String -> String -> io (Either FileError String) */
|
|
@@ -10172,7 +10309,7 @@ function System_getEnv($0, $1) {
|
|
|
10172
10309
|
function System_getArgs($0) {
|
|
10173
10310
|
const $12 = n => {
|
|
10174
10311
|
switch(Prelude_EqOrd_x3e_Ord_Int(n, Number(_truncBigInt32(0n)))) {
|
|
10175
|
-
case 1: return Prelude_Basics_flip($1a => $1b => Prelude_Types_traverse_Traversable_List($0.a1.a1, $1a, $1b), Prelude_Types_rangeFromTo_Range_x24a({a1: {a1:
|
|
10312
|
+
case 1: return Prelude_Basics_flip($1a => $1b => Prelude_Types_traverse_Traversable_List($0.a1.a1, $1a, $1b), Prelude_Types_rangeFromTo_Range_x24a({a1: {a1: csegen_429(), a2: $29 => $2a => Prelude_Num_div_Integral_Int($29, $2a), a3: $2f => $30 => Prelude_Num_mod_Integral_Int($2f, $30)}, a2: {a1: {a1: {a1: $38 => $39 => Prelude_EqOrd_x3dx3d_Eq_Int($38, $39), a2: $3e => $3f => Prelude_EqOrd_x2fx3d_Eq_Int($3e, $3f)}, a2: $44 => $45 => Prelude_EqOrd_compare_Ord_Int($44, $45), a3: $4a => $4b => Prelude_EqOrd_x3c_Ord_Int($4a, $4b), a4: $50 => $51 => Prelude_EqOrd_x3e_Ord_Int($50, $51), a5: $56 => $57 => Prelude_EqOrd_x3cx3d_Ord_Int($56, $57), a6: $5c => $5d => Prelude_EqOrd_x3ex3d_Ord_Int($5c, $5d), a7: $62 => $63 => Prelude_EqOrd_max_Ord_Int($62, $63), a8: $68 => $69 => Prelude_EqOrd_min_Ord_Int($68, $69)}, a2: {a1: csegen_429(), a2: $71 => _sub32s(0, $71), a3: $75 => $76 => _sub32s($75, $76)}}}, 0, _sub32s(n, 1)), $7e => $0.a2(undefined)($84 => System_prim__getArg($7e, $84)));
|
|
10176
10313
|
case 0: return $0.a1.a1.a2(undefined)({h: 0});
|
|
10177
10314
|
}
|
|
10178
10315
|
};
|
|
@@ -10268,63 +10405,63 @@ function Config_case__parseGitHubURIx2cparseSuffix_1607($0, $1, $2) {
|
|
|
10268
10405
|
default: return {h: 0};
|
|
10269
10406
|
}
|
|
10270
10407
|
};
|
|
10271
|
-
return Prelude_Types_x3ex3ex3d_Monad_Maybe({a1: Data_String_split(
|
|
10408
|
+
return Prelude_Types_x3ex3ex3d_Monad_Maybe({a1: Data_String_split(csegen_449(), $2.a1)}, $b);
|
|
10272
10409
|
}
|
|
10273
10410
|
|
|
10274
|
-
/* Config.
|
|
10275
|
-
function
|
|
10411
|
+
/* Config.9982:2702:themePrompt */
|
|
10412
|
+
function Config_n__9982_2702_themePrompt($0, $1, $2, $3, $4) {
|
|
10276
10413
|
const $5 = Util_Prompting_enterForDefaultStr('dark');
|
|
10277
10414
|
return $4.a1.a2(undefined)(undefined)($4.a2(undefined)($16 => Prelude_IO_prim__putStr((Prelude_Types_foldMap_Foldable_List(csegen_86()(), $1f => $1f, {a1: 'Would you like harmony configured for a \'dark\' or \'light\' terminal background?', a2: {a1: $5, a2: {h: 0}}})+'\n'), $16)))($28 => Util_Prompting_offerRetry($4, 'The theme must be either \'dark\' or \'light\'. Which would you prefer?', 'Could not parse the input as a valid theme; will use \'dark\' for now.', () => 1, $4.a1.a1.a1(undefined)(undefined)($39 => Data_Theme_parseString(Util_Prompting_orIfEmpty({a1: 'dark'}, Data_String_trim($39))))($4.a2(undefined)($48 => Prelude_IO_prim__getStr($48)))));
|
|
10278
10415
|
}
|
|
10279
10416
|
|
|
10280
|
-
/* Config.
|
|
10281
|
-
function
|
|
10417
|
+
/* Config.9982:2701:repo */
|
|
10418
|
+
function Config_n__9982_2701_repo($0, $1, $2, $3, $4) {
|
|
10282
10419
|
return Prelude_Types_map_Functor_Maybe(csegen_272()(), $4);
|
|
10283
10420
|
}
|
|
10284
10421
|
|
|
10285
|
-
/* Config.
|
|
10286
|
-
function
|
|
10422
|
+
/* Config.8910:1587:parseSuffix */
|
|
10423
|
+
function Config_n__8910_1587_parseSuffix($0, $1) {
|
|
10287
10424
|
return Config_case__parseGitHubURIx2cparseSuffix_1607($0, $1, Data_String_break$($8 => Prelude_EqOrd_x3dx3d_Eq_Char($8, '.'), $1));
|
|
10288
10425
|
}
|
|
10289
10426
|
|
|
10290
|
-
/* Config.
|
|
10291
|
-
function
|
|
10292
|
-
return Prelude_Interfaces_x3ex3dx3e(csegen_14(), $6 => Config_dropPrefixx27('git@github.com:', $6), $b =>
|
|
10427
|
+
/* Config.8910:1586:parseSSH */
|
|
10428
|
+
function Config_n__8910_1586_parseSSH($0, $1) {
|
|
10429
|
+
return Prelude_Interfaces_x3ex3dx3e(csegen_14(), $6 => Config_dropPrefixx27('git@github.com:', $6), $b => Config_n__8910_1587_parseSuffix($0, $b), $1);
|
|
10293
10430
|
}
|
|
10294
10431
|
|
|
10295
|
-
/* Config.
|
|
10296
|
-
function
|
|
10297
|
-
return Prelude_Interfaces_x3ex3dx3e(csegen_14(), $6 => Config_dropPrefixx27('https://github/com/', $6), $b =>
|
|
10432
|
+
/* Config.8910:1585:parseHTTPS */
|
|
10433
|
+
function Config_n__8910_1585_parseHTTPS($0, $1) {
|
|
10434
|
+
return Prelude_Interfaces_x3ex3dx3e(csegen_14(), $6 => Config_dropPrefixx27('https://github/com/', $6), $b => Config_n__8910_1587_parseSuffix($0, $b), $1);
|
|
10298
10435
|
}
|
|
10299
10436
|
|
|
10300
|
-
/* Config.
|
|
10301
|
-
function
|
|
10302
|
-
return Prelude_Types_map_Functor_Maybe(
|
|
10437
|
+
/* Config.9982:2700:org */
|
|
10438
|
+
function Config_n__9982_2700_org($0, $1, $2, $3, $4) {
|
|
10439
|
+
return Prelude_Types_map_Functor_Maybe(csegen_455()(), $4);
|
|
10303
10440
|
}
|
|
10304
10441
|
|
|
10305
|
-
/* Config.
|
|
10306
|
-
function
|
|
10442
|
+
/* Config.8618:1303:oneDayAgo */
|
|
10443
|
+
function Config_n__8618_1303_oneDayAgo($0, $1, $2) {
|
|
10307
10444
|
return $2.a1.a2(undefined)(undefined)(System_time($2))(now => $2.a1.a1.a2(undefined)(Number(_truncUBigInt32((now-86400n)))));
|
|
10308
10445
|
}
|
|
10309
10446
|
|
|
10310
|
-
/* Config.
|
|
10311
|
-
function
|
|
10447
|
+
/* Config.9885:2593:help */
|
|
10448
|
+
function Config_n__9885_2593_help($0, $1) {
|
|
10312
10449
|
return Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29(Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_color(2), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String($1.a1)), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(Prelude_Types_foldMap_Foldable_List(csegen_86()(), $14 => $14, {a1: ': ', a2: {a1: (Data_String_replicate(Prelude_Types_prim__integerToNat((Data_Config_longestSettablePropName()-Prelude_Types_String_length($1.a1))), ' ')+$1.a2), a2: {h: 0}}})));
|
|
10313
10450
|
}
|
|
10314
10451
|
|
|
10315
|
-
/* Config.
|
|
10316
|
-
function
|
|
10452
|
+
/* Config.8863:1538:drop' */
|
|
10453
|
+
function Config_n__8863_1538_dropx27($0, $1) {
|
|
10317
10454
|
return Config_with__dropPrefixx27x2cdropx27_1546($0, $1, Data_List_PrefixSuffix_dropPrefix($8 => $9 => Decidable_Equality_decEq_DecEq_Char($8, $9), Prelude_Types_fastUnpack($0), $1));
|
|
10318
10455
|
}
|
|
10319
10456
|
|
|
10320
|
-
/* Config.
|
|
10321
|
-
function
|
|
10457
|
+
/* Config.9982:2698:commentConfigPrompt */
|
|
10458
|
+
function Config_n__9982_2698_commentConfigPrompt($0, $1, $2, $3, $4) {
|
|
10322
10459
|
const $5 = Util_Prompting_enterForDefaultStr('name');
|
|
10323
10460
|
return $4.a1.a2(undefined)(undefined)($4.a2(undefined)($16 => Prelude_IO_prim__putStr((Prelude_Types_foldMap_Foldable_List(csegen_86()(), $1f => $1f, {a1: 'What kind of comment would you like Harmony to leave when it requests reviewers? [none/name/at-mention]', a2: {a1: $5, a2: {h: 0}}})+'\n'), $16)))($28 => Util_Prompting_offerRetry($4, 'The comment strategy must be \'none\', \'name\', or \'at-mention\'. Which would you prefer?', 'Could not parse the input as a valid option; will use \'name\' for now.', () => 1, $4.a1.a1.a1(undefined)(undefined)($39 => Data_Config_CommentStrategy_parseCommentConfig(Util_Prompting_orIfEmpty({a1: 'name'}, Data_String_trim($39))))($4.a2(undefined)($48 => Prelude_IO_prim__getStr($48)))));
|
|
10324
10461
|
}
|
|
10325
10462
|
|
|
10326
|
-
/* Config.
|
|
10327
|
-
function
|
|
10463
|
+
/* Config.8752:1431:checkRequestSettings */
|
|
10464
|
+
function Config_n__8752_1431_checkRequestSettings($0, $1) {
|
|
10328
10465
|
let $2;
|
|
10329
10466
|
switch($1.a6) {
|
|
10330
10467
|
case 1: {
|
|
@@ -10342,8 +10479,8 @@ function Config_n__8734_1431_checkRequestSettings($0, $1) {
|
|
|
10342
10479
|
}
|
|
10343
10480
|
}
|
|
10344
10481
|
|
|
10345
|
-
/* Config.
|
|
10346
|
-
function
|
|
10482
|
+
/* Config.9982:2697:branchParsingPrompt */
|
|
10483
|
+
function Config_n__9982_2697_branchParsingPrompt($0, $1, $2, $3, $4) {
|
|
10347
10484
|
const $5 = Util_Prompting_enterForDefaultStr('none');
|
|
10348
10485
|
return $4.a1.a2(undefined)(undefined)($4.a2(undefined)($16 => Prelude_IO_prim__putStr((Prelude_Types_foldMap_Foldable_List(csegen_86()(), $1f => $1f, {a1: 'Would you like harmony to parse branch names for \'jira\' slugs or \'github\' issue numbers to use as part of new PR title or body?', a2: {a1: $5, a2: {h: 0}}})+'\n'), $16)))($28 => Util_Prompting_offerRetry($4, 'Branch parsing must be \'none\', \'jira\', or \'github\'. Which would you prefer?', 'Could not parse the input as a valid option; will use \'none\' for now.', () => 0, $4.a1.a1.a1(undefined)(undefined)($39 => Data_Config_ParseBranchStrategy_parseBranchConfig(Util_Prompting_orIfEmpty({a1: 'none'}, Data_String_trim($39))))($4.a2(undefined)($48 => Prelude_IO_prim__getStr($48)))));
|
|
10349
10486
|
}
|
|
@@ -10380,7 +10517,7 @@ function Config_syncIfOld($0, $1, $2, $3) {
|
|
|
10380
10517
|
case 0: return $1b => Data_Promise_pure_Applicative_x28Promisex20x24ex29($1, $e, $1b);
|
|
10381
10518
|
}
|
|
10382
10519
|
};
|
|
10383
|
-
return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(
|
|
10520
|
+
return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(Config_n__8618_1303_oneDayAgo($0, $1, csegen_48()()), $c, $2, $3);
|
|
10384
10521
|
}
|
|
10385
10522
|
|
|
10386
10523
|
/* Config.syncConfig : Config => Octokit => Bool -> Promise' Config */
|
|
@@ -10393,9 +10530,9 @@ function Config_syncConfig($0, $1, $2, $3, $4) {
|
|
|
10393
10530
|
const $51 = {a1: updatedAt, 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: teamSlugs, a13: labelNames, a14: orgMembers, a15: $0.a15, a16: $0.a16, a17: {a1: githubUser}, a18: $0.a18, a19: $0.a19};
|
|
10394
10531
|
return $67 => $68 => Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($6b => $6c => Data_Promise_map_Functor_x28Promisex20x24ex29($6f => undefined, $71 => $72 => Config_writeConfig($51, $71, $72), $6b, $6c), $7a => $7b => $7c => Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(Prelude_Interfaces_when(csegen_40()(), $2, () => $85 => $86 => Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($89 => $8a => $8b => Data_Promise_liftIO_HasIO_x28Promisex20x24ex29($8e => Prelude_IO_prim__putStr('Your updated configuration is:\n', $8e), $89, $8a, $8b), $96 => $97 => $98 => $99 => Data_Promise_liftIO_HasIO_x28Promisex20x24ex29($9c => Prelude_IO_prim__putStr((Data_Config_show_Show_Config($51)+'\n'), $9c), $97, $98, $99), $85, $86)), $aa => $ab => $ac => Data_Promise_pure_Applicative_x28Promisex20x24ex29($51, $ab, $ac), $7b, $7c), $67, $68);
|
|
10395
10532
|
};
|
|
10396
|
-
return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(
|
|
10533
|
+
return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(csegen_468()(), $50, $4a, $4b);
|
|
10397
10534
|
};
|
|
10398
|
-
return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($3e => $3f => Data_Promise_map_Functor_x28Promisex20x24ex29(
|
|
10535
|
+
return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($3e => $3f => Data_Promise_map_Functor_x28Promisex20x24ex29(csegen_455()(), FFI_GitHub_getSelf($1), $3e, $3f), $49, $3a, $3b);
|
|
10399
10536
|
};
|
|
10400
10537
|
return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($2f => $30 => FFI_GitHub_listRepoLabels($1, $0.a2, $0.a3, $2f, $30), $39, $2b, $2c);
|
|
10401
10538
|
};
|
|
@@ -10406,7 +10543,7 @@ function Config_syncConfig($0, $1, $2, $3, $4) {
|
|
|
10406
10543
|
|
|
10407
10544
|
/* Config.settablePropsWithHelp : Config => String */
|
|
10408
10545
|
function Config_settablePropsWithHelp($0) {
|
|
10409
|
-
return Util_renderString($0, Text_PrettyPrint_Prettyprinter_Doc_vsep(Prelude_Types_List_mapAppend({h: 0}, $9 =>
|
|
10546
|
+
return Util_renderString($0, Text_PrettyPrint_Prettyprinter_Doc_vsep(Prelude_Types_List_mapAppend({h: 0}, $9 => Config_n__9885_2593_help($0, $9), Data_Config_settablePropNamesAndHelp())));
|
|
10410
10547
|
}
|
|
10411
10548
|
|
|
10412
10549
|
/* Config.setConfig : Config => String -> String -> Promise' Config */
|
|
@@ -10418,16 +10555,16 @@ function Config_setConfig($0, $1, $2) {
|
|
|
10418
10555
|
function Config_propSetter($0, $1) {
|
|
10419
10556
|
return $2 => {
|
|
10420
10557
|
switch($0) {
|
|
10421
|
-
case 0: return Config_update(
|
|
10422
|
-
case 1: return Config_update(
|
|
10423
|
-
case 2: return Config_update(
|
|
10424
|
-
case 3: return Config_update(
|
|
10425
|
-
case 4: return Config_update(
|
|
10426
|
-
case 5: return Config_update(
|
|
10427
|
-
case 6: return Config_update(
|
|
10428
|
-
case 7: return Config_update(
|
|
10429
|
-
case 8: return Config_update(
|
|
10430
|
-
case 9: return Config_update(
|
|
10558
|
+
case 0: return Config_update(csegen_473(), $8 => Config_parseBool($8), b => $c => ({a1: $c.a1, a2: $c.a2, a3: $c.a3, a4: $c.a4, a5: $c.a5, a6: b, a7: $c.a7, a8: $c.a8, a9: $c.a9, a10: $c.a10, a11: $c.a11, a12: $c.a12, a13: $c.a13, a14: $c.a14, a15: $c.a15, a16: $c.a16, a17: $c.a17, a18: $c.a18, a19: $c.a19}), $1, $2);
|
|
10559
|
+
case 1: return Config_update(csegen_473(), $27 => Config_parseBool($27), b => $2b => ({a1: $2b.a1, a2: $2b.a2, a3: $2b.a3, a4: $2b.a4, a5: $2b.a5, a6: $2b.a6, a7: b, a8: $2b.a8, a9: $2b.a9, a10: $2b.a10, a11: $2b.a11, a12: $2b.a12, a13: $2b.a13, a14: $2b.a14, a15: $2b.a15, a16: $2b.a16, a17: $2b.a17, a18: $2b.a18, a19: $2b.a19}), $1, $2);
|
|
10560
|
+
case 2: return Config_update(csegen_473(), $46 => Data_Config_CommentStrategy_parseCommentConfig(Data_String_toLower($46)), b => $4c => ({a1: $4c.a1, a2: $4c.a2, a3: $4c.a3, a4: $4c.a4, a5: $4c.a5, a6: $4c.a6, a7: $4c.a7, a8: b, a9: $4c.a9, a10: $4c.a10, a11: $4c.a11, a12: $4c.a12, a13: $4c.a13, a14: $4c.a14, a15: $4c.a15, a16: $4c.a16, a17: $4c.a17, a18: $4c.a18, a19: $4c.a19}), $1, $2);
|
|
10561
|
+
case 3: return Config_update(csegen_473(), $67 => Data_Config_ParseBranchStrategy_parseBranchConfig(Data_String_toLower($67)), s => $6d => ({a1: $6d.a1, a2: $6d.a2, a3: $6d.a3, a4: $6d.a4, a5: $6d.a5, a6: $6d.a6, a7: $6d.a7, a8: $6d.a8, a9: s, a10: $6d.a10, a11: $6d.a11, a12: $6d.a12, a13: $6d.a13, a14: $6d.a14, a15: $6d.a15, a16: $6d.a16, a17: $6d.a17, a18: $6d.a18, a19: $6d.a19}), $1, $2);
|
|
10562
|
+
case 4: return Config_update(csegen_473(), $88 => ({a1: $88}), s => $8b => ({a1: $8b.a1, a2: $8b.a2, a3: $8b.a3, a4: $8b.a4, a5: $8b.a5, a6: $8b.a6, a7: $8b.a7, a8: $8b.a8, a9: $8b.a9, a10: {a1: s}, a11: $8b.a11, a12: $8b.a12, a13: $8b.a13, a14: $8b.a14, a15: $8b.a15, a16: $8b.a16, a17: $8b.a17, a18: $8b.a18, a19: $8b.a19}), $1, $2);
|
|
10563
|
+
case 5: return Config_update(csegen_473(), $a7 => Config_parseBool($a7), b => $ab => ({a1: $ab.a1, a2: $ab.a2, a3: $ab.a3, a4: $ab.a4, a5: $ab.a5, a6: $ab.a6, a7: $ab.a7, a8: $ab.a8, a9: $ab.a9, a10: $ab.a10, a11: b, a12: $ab.a12, a13: $ab.a13, a14: $ab.a14, a15: $ab.a15, a16: $ab.a16, a17: $ab.a17, a18: $ab.a18, a19: $ab.a19}), $1, $2);
|
|
10564
|
+
case 6: return Config_update(csegen_473(), $c6 => ({a1: $c6}), s => $c9 => ({a1: $c9.a1, a2: $c9.a2, a3: $c9.a3, a4: s, a5: $c9.a5, a6: $c9.a6, a7: $c9.a7, a8: $c9.a8, a9: $c9.a9, a10: $c9.a10, a11: $c9.a11, a12: $c9.a12, a13: $c9.a13, a14: $c9.a14, a15: $c9.a15, a16: $c9.a16, a17: $c9.a17, a18: $c9.a18, a19: $c9.a19}), $1, $2);
|
|
10565
|
+
case 7: return Config_update(csegen_473(), $e4 => ({a1: $e4}), s => $e7 => ({a1: $e7.a1, a2: $e7.a2, a3: $e7.a3, a4: $e7.a4, a5: s, a6: $e7.a6, a7: $e7.a7, a8: $e7.a8, a9: $e7.a9, a10: $e7.a10, a11: $e7.a11, a12: $e7.a12, a13: $e7.a13, a14: $e7.a14, a15: $e7.a15, a16: $e7.a16, a17: $e7.a17, a18: $e7.a18, a19: $e7.a19}), $1, $2);
|
|
10566
|
+
case 8: return Config_update(csegen_473(), $102 => Data_Theme_parseString($102), t => $106 => ({a1: $106.a1, a2: $106.a2, a3: $106.a3, a4: $106.a4, a5: $106.a5, a6: $106.a6, a7: $106.a7, a8: $106.a8, a9: $106.a9, a10: $106.a10, a11: $106.a11, a12: $106.a12, a13: $106.a13, a14: $106.a14, a15: $106.a15, a16: $106.a16, a17: $106.a17, a18: t, a19: $106.a19}), $1, $2);
|
|
10567
|
+
case 9: return Config_update(csegen_473(), $121 => ({a1: $121}), s => $124 => ({a1: $124.a1, a2: $124.a2, a3: $124.a3, a4: $124.a4, a5: $124.a5, a6: $124.a6, a7: $124.a7, a8: $124.a8, a9: $124.a9, a10: $124.a10, a11: $124.a11, a12: $124.a12, a13: $124.a13, a14: $124.a14, a15: $124.a15, a16: {a1: s}, a17: $124.a17, a18: $124.a18, a19: $124.a19}), $1, $2);
|
|
10431
10568
|
}
|
|
10432
10569
|
};
|
|
10433
10570
|
}
|
|
@@ -10459,7 +10596,7 @@ function Config_preferOriginRemote($0) {
|
|
|
10459
10596
|
|
|
10460
10597
|
/* Config.parseGitHubURI : String -> Maybe GitRemote */
|
|
10461
10598
|
function Config_parseGitHubURI($0) {
|
|
10462
|
-
return Prelude_Types_x3cx7cx3e_Alternative_Maybe(
|
|
10599
|
+
return Prelude_Types_x3cx7cx3e_Alternative_Maybe(Config_n__8910_1585_parseHTTPS($0, $0), () => Config_n__8910_1586_parseSSH($0, $0));
|
|
10463
10600
|
}
|
|
10464
10601
|
|
|
10465
10602
|
/* Config.parseBool : String -> Maybe Bool */
|
|
@@ -10570,7 +10707,7 @@ function Config_findConfig($0, $1, $2) {
|
|
|
10570
10707
|
|
|
10571
10708
|
/* Config.dropPrefix' : String -> String -> Maybe String */
|
|
10572
10709
|
function Config_dropPrefixx27($0, $1) {
|
|
10573
|
-
return Prelude_Types_map_Functor_Maybe($4 => Prelude_Types_fastPack($4),
|
|
10710
|
+
return Prelude_Types_map_Functor_Maybe($4 => Prelude_Types_fastPack($4), Config_n__8863_1538_dropx27($0, Prelude_Types_fastUnpack($1)));
|
|
10574
10711
|
}
|
|
10575
10712
|
|
|
10576
10713
|
/* Config.createConfig : Maybe String -> Bool -> Nat -> Maybe String -> Promise' Config */
|
|
@@ -10587,7 +10724,7 @@ function Config_createConfig($0, $1, $2, $3, $4, $5) {
|
|
|
10587
10724
|
default: return {a1: Data_String_trim($65)};
|
|
10588
10725
|
}
|
|
10589
10726
|
};
|
|
10590
|
-
return Data_Promise_map_Functor_x28Promisex20x24ex29($64,
|
|
10727
|
+
return Data_Promise_map_Functor_x28Promisex20x24ex29($64, csegen_498()(), $61, $62);
|
|
10591
10728
|
};
|
|
10592
10729
|
const $71 = configPAT => $72 => $73 => {
|
|
10593
10730
|
const $7f = $80 => $81 => $82 => {
|
|
@@ -10629,7 +10766,7 @@ function Config_createConfig($0, $1, $2, $3, $4, $5) {
|
|
|
10629
10766
|
const $1fc = {a1: updatedAt, a2: org, a3: repo, a4: defaultRemote, a5: mainBranch, a6: requestTeams, a7: requestUsers, a8: commentOnRequest, a9: branchParsing, a10: $1f2(undefined), a11: 0, a12: teamSlugs, a13: repoLabels, a14: orgMembers, a15: $1f4, a16: $1f5, a17: $1fa, a18: theme, a19: $19e};
|
|
10630
10767
|
return $212 => $213 => Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($216 => $217 => Data_Promise_map_Functor_x28Promisex20x24ex29($21a => undefined, $21c => $21d => Config_writeConfig($1fc, $21c, $21d), $216, $217), $225 => $226 => $227 => Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($22a => $22b => $22c => Data_Promise_liftIO_HasIO_x28Promisex20x24ex29($22f => Prelude_IO_prim__putStr('Your new configuration is:\n', $22f), $22a, $22b, $22c), $237 => $238 => $239 => Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($23c => $23d => $23e => Data_Promise_liftIO_HasIO_x28Promisex20x24ex29($241 => Prelude_IO_prim__putStr((Data_Config_show_Show_Config($1fc)+'\n'), $241), $23c, $23d, $23e), $24d => $24e => $24f => Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(Prelude_Types_either(() => $254 => Util_renderIO($1fc, csegen_48()(), $254), () => csegen_35()(), Config_checkConfigConsistency($1fc)), $262 => $263 => $264 => Data_Promise_pure_Applicative_x28Promisex20x24ex29($1fc, $263, $264), $24e, $24f), $238, $239), $226, $227), $212, $213);
|
|
10631
10768
|
};
|
|
10632
|
-
return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($1e6 => $1e7 => Data_Promise_map_Functor_x28Promisex20x24ex29(
|
|
10769
|
+
return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($1e6 => $1e7 => Data_Promise_map_Functor_x28Promisex20x24ex29(csegen_455()(), FFI_GitHub_getSelf(_), $1e6, $1e7), $1f1, $1e2, $1e3);
|
|
10633
10770
|
};
|
|
10634
10771
|
return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($1d9 => $1da => FFI_GitHub_listRepoLabels(_, org, repo, $1d9, $1da), $1e1, $1d5, $1d6);
|
|
10635
10772
|
};
|
|
@@ -10638,7 +10775,7 @@ function Config_createConfig($0, $1, $2, $3, $4, $5) {
|
|
|
10638
10775
|
return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($1b3 => $1b4 => Config_nonOrgFallback(() => ({h: 0}), $1b8 => $1b9 => FFI_GitHub_listTeams(_, org, $1b8, $1b9), $1b3, $1b4), $1c1, $1af, $1b0);
|
|
10639
10776
|
};
|
|
10640
10777
|
};
|
|
10641
|
-
return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(
|
|
10778
|
+
return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(csegen_468()(), $19d, $197, $198);
|
|
10642
10779
|
};
|
|
10643
10780
|
return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($18e => $18f => FFI_GitHub_getRepoDefaultBranch(_, org, repo, $18e, $18f), $196, $18a, $18b);
|
|
10644
10781
|
};
|
|
@@ -10646,41 +10783,41 @@ function Config_createConfig($0, $1, $2, $3, $4, $5) {
|
|
|
10646
10783
|
};
|
|
10647
10784
|
return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($16b => $16c => $16d => Data_Promise_liftIO_HasIO_x28Promisex20x24ex29($170 => FFI_GitHub_octokit($80.a1, $170), $16b, $16c, $16d), $177, $167, $168);
|
|
10648
10785
|
};
|
|
10649
|
-
return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(
|
|
10786
|
+
return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(csegen_496()(), $165, $15f, $160);
|
|
10650
10787
|
};
|
|
10651
|
-
return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(
|
|
10788
|
+
return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(Config_n__9982_2702_themePrompt($3, $2, $1, $0, csegen_48()()), $15e, $152, $153);
|
|
10652
10789
|
};
|
|
10653
|
-
return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(
|
|
10790
|
+
return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(csegen_496()(), $150, $14a, $14b);
|
|
10654
10791
|
};
|
|
10655
10792
|
return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(Util_Prompting_yesNoPrompt(csegen_48()(), 1, 'Would you like harmony to request reviews from individual users when it requests a teams review?'), $149, $13f, $140);
|
|
10656
10793
|
};
|
|
10657
|
-
return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(
|
|
10794
|
+
return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(csegen_496()(), $13d, $137, $138);
|
|
10658
10795
|
};
|
|
10659
10796
|
return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(Util_Prompting_yesNoPrompt(csegen_48()(), 1, 'Would you like harmony to request reviews from teams when it requests reviewers?'), $136, $12c, $12d);
|
|
10660
10797
|
};
|
|
10661
|
-
return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(
|
|
10798
|
+
return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(csegen_496()(), $12a, $124, $125);
|
|
10662
10799
|
};
|
|
10663
|
-
return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(
|
|
10800
|
+
return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(Config_n__9982_2697_branchParsingPrompt($3, $2, $1, $0, csegen_48()()), $123, $117, $118);
|
|
10664
10801
|
};
|
|
10665
|
-
return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(
|
|
10802
|
+
return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(csegen_496()(), $115, $10f, $110);
|
|
10666
10803
|
};
|
|
10667
|
-
return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(
|
|
10804
|
+
return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(Config_n__9982_2698_commentConfigPrompt($3, $2, $1, $0, csegen_48()()), $10e, $102, $103);
|
|
10668
10805
|
};
|
|
10669
|
-
return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(
|
|
10806
|
+
return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(csegen_496()(), $100, $fa, $fb);
|
|
10670
10807
|
};
|
|
10671
10808
|
return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(Util_Prompting_getLineEnterForDefault(csegen_48()(), 'What GitHub remote repo would you like to use harmony for?', {a1: remoteGuess}), $f9, $ee, $ef);
|
|
10672
10809
|
};
|
|
10673
|
-
return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(
|
|
10810
|
+
return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(csegen_496()(), $ec, $e6, $e7);
|
|
10674
10811
|
};
|
|
10675
|
-
return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(Util_Prompting_getLineEnterForDefault(csegen_48()(), 'What repository would you like to use harmony for?',
|
|
10812
|
+
return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(Util_Prompting_getLineEnterForDefault(csegen_48()(), 'What repository would you like to use harmony for?', Config_n__9982_2701_repo($3, $2, $1, $0, defaultOrgAndRepo)), $e5, $d5, $d6);
|
|
10676
10813
|
};
|
|
10677
|
-
return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(
|
|
10814
|
+
return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(csegen_496()(), $d3, $cd, $ce);
|
|
10678
10815
|
};
|
|
10679
|
-
return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(Util_Prompting_getLineEnterForDefault(csegen_48()(), 'What GitHub org would you like to use harmony for?',
|
|
10816
|
+
return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(Util_Prompting_getLineEnterForDefault(csegen_48()(), 'What GitHub org would you like to use harmony for?', Config_n__9982_2700_org($3, $2, $1, $0, defaultOrgAndRepo)), $cc, $bc, $bd);
|
|
10680
10817
|
};
|
|
10681
|
-
return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(
|
|
10818
|
+
return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(csegen_496()(), $ba, $b4, $b5);
|
|
10682
10819
|
};
|
|
10683
|
-
return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($9a => $9b => Data_Promise_x3cx7cx3e_Alternative_x28Promisex20Stringx29($9e => $9f => Data_Promise_map_Functor_x28Promisex20x24ex29($a2 => Config_parseGitHubURI($a2), $a6 => $a7 => System_Git_remoteURI(remoteGuess, $a6, $a7), $9e, $9f), () =>
|
|
10820
|
+
return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($9a => $9b => Data_Promise_x3cx7cx3e_Alternative_x28Promisex20Stringx29($9e => $9f => Data_Promise_map_Functor_x28Promisex20x24ex29($a2 => Config_parseGitHubURI($a2), $a6 => $a7 => System_Git_remoteURI(remoteGuess, $a6, $a7), $9e, $9f), () => csegen_502()(), $9a, $9b), $b3, $96, $97);
|
|
10684
10821
|
};
|
|
10685
10822
|
return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($86 => $87 => Data_Promise_map_Functor_x28Promisex20x24ex29($8a => Config_preferOriginRemote($8a), $8e => $8f => System_Git_listRemotes($8e, $8f), $86, $87), $95, $81, $82);
|
|
10686
10823
|
}
|
|
@@ -10695,19 +10832,19 @@ function Config_createConfig($0, $1, $2, $3, $4, $5) {
|
|
|
10695
10832
|
};
|
|
10696
10833
|
return $2e();
|
|
10697
10834
|
};
|
|
10698
|
-
return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(
|
|
10835
|
+
return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(csegen_496()(), $2c, $26, $27);
|
|
10699
10836
|
};
|
|
10700
10837
|
return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($8 => $9 => $a => Data_Promise_liftIO_HasIO_x28Promisex20x24ex29($d => Prelude_IO_prim__putStr((Prelude_Types_foldMap_Foldable_List(csegen_86()(), $16 => $16, {a1: 'Creating a new configuration (storing in ', a2: {a1: Data_Config_filename(), a2: {a1: ')...', a2: {h: 0}}}})+'\n'), $d), $8, $9, $a), $24, $4, $5);
|
|
10701
10838
|
}
|
|
10702
10839
|
|
|
10703
10840
|
/* Config.checkConfigConsistency : Config -> Either (Doc AnsiStyle) () */
|
|
10704
10841
|
function Config_checkConfigConsistency($0) {
|
|
10705
|
-
return
|
|
10842
|
+
return Config_n__8752_1431_checkRequestSettings($0, $0);
|
|
10706
10843
|
}
|
|
10707
10844
|
|
|
10708
10845
|
/* Config.addIgnoredPRs : Config -> List Integer -> Promise' Config */
|
|
10709
10846
|
function Config_addIgnoredPRs($0, $1, $2, $3) {
|
|
10710
|
-
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: $0.a12, a13: $0.a13, a14: $0.a14, a15: Data_List_nub(
|
|
10847
|
+
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: $0.a12, a13: $0.a13, a14: $0.a14, a15: Data_List_nub(csegen_412(), Prelude_Types_List_tailRecAppend($0.a15, $1)), a16: $0.a16, a17: $0.a17, a18: $0.a18, a19: $0.a19}, $2, $3);
|
|
10711
10848
|
}
|
|
10712
10849
|
|
|
10713
10850
|
/* Data.List.PrefixSuffix.with block in with block in dropPrefix */
|
|
@@ -10759,21 +10896,21 @@ function AppVersion_printVersion($0) {
|
|
|
10759
10896
|
|
|
10760
10897
|
/* AppVersion.appVersion : String */
|
|
10761
10898
|
const AppVersion_appVersion = __lazy(function () {
|
|
10762
|
-
return '6.
|
|
10899
|
+
return '6.6.0';
|
|
10763
10900
|
});
|
|
10764
10901
|
|
|
10765
10902
|
/* Commands.Help.subcommandHelp' : String -> Doc AnsiStyle */
|
|
10766
10903
|
function Commands_Help_subcommandHelpx27($0) {
|
|
10767
10904
|
switch($0) {
|
|
10768
|
-
case 'label': return Commands_Help_subcommand($0, {a1: Commands_Help_argument(1, '<label>'), a2:
|
|
10769
|
-
case 'request': return Commands_Help_subcommand($0, {a1: Commands_Help_argument(1, '<team-slug> | +<user-login>'), a2:
|
|
10905
|
+
case 'label': return Commands_Help_subcommand($0, {a1: Commands_Help_argument(1, '<label>'), a2: csegen_516()}, {a1: Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29(Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29(Text_PrettyPrint_Prettyprinter_Util_reflow('Add one or more labels to a PR, creating a new PR if one does not exist.'), Text_PrettyPrint_Prettyprinter_Doc_line()), Text_PrettyPrint_Prettyprinter_Util_reflow('Labels that do not exist yet will be created automatically.')), a2: {h: 0}});
|
|
10906
|
+
case 'request': return Commands_Help_subcommand($0, {a1: Commands_Help_argument(1, '<team-slug> | +<user-login>'), a2: csegen_521()}, {a1: Text_PrettyPrint_Prettyprinter_Util_reflow(Prelude_Types_foldMap_Foldable_List(csegen_86()(), $2b => $2b, {a1: 'Request review from the given team(s) and one lucky member from one\nof those teams to review the PR for the current branch.', a2: {h: 0}})), a2: {a1: Text_PrettyPrint_Prettyprinter_Util_reflow(Prelude_Types_foldMap_Foldable_List(csegen_86()(), $38 => $38, {a1: 'Also request reviews from any users with logins specified. You specify\nthese additional users by prefixing their logins with \'+\'.', a2: {h: 0}})), a2: {a1: Text_PrettyPrint_Prettyprinter_Util_reflow('Optionally apply any number of labels by prefixing them with \'#\'.'), a2: {h: 0}}}});
|
|
10770
10907
|
case 'config': return Commands_Help_subcommand($0, {a1: Commands_Help_argument(1, '<property>'), a2: {a1: Commands_Help_argument(0, '<value>'), a2: {h: 0}}}, {a1: Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29(Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29(Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29(Text_PrettyPrint_Prettyprinter_Util_reflow(Prelude_Types_foldMap_Foldable_List(csegen_86()(), $5f => $5f, {a1: 'Get or set the value of a configuration property. Not all properties\ncan be set and read via this subcommand.', a2: {h: 0}})), Text_PrettyPrint_Prettyprinter_Doc_line()), Commands_Help_argumentx27('properties')), Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Text_PrettyPrint_Prettyprinter_Doc_unsafeTextWithoutNewLines(':'), a2: {h: 0}})), Text_PrettyPrint_Prettyprinter_Doc_align(Text_PrettyPrint_Prettyprinter_Doc_concatWith(a => b => Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29(Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29(Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29(a, Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Text_PrettyPrint_Prettyprinter_Doc_unsafeTextWithoutNewLines(','), a2: {h: 0}})), Text_PrettyPrint_Prettyprinter_Doc_softline()), b), Prelude_Types_List_mapAppend({h: 0}, $88 => Commands_Help_option($88), Data_Config_settablePropNames())))), a2: {h: 0}});
|
|
10771
|
-
case 'pr': return Commands_Help_subcommand($0, {a1: Commands_Help_argument(0, '--ready'), a2: {a1: Commands_Help_argument(0, '--draft'), a2: {a1: Commands_Help_argument(0, '-i/--into {<branch-name>}'), a2: {a1: Commands_Help_argument(0, '--print-result'), a2:
|
|
10908
|
+
case 'pr': return Commands_Help_subcommand($0, {a1: Commands_Help_argument(0, '--ready'), a2: {a1: Commands_Help_argument(0, '--draft'), a2: {a1: Commands_Help_argument(0, '-i/--into {<branch-name>}'), a2: {a1: Commands_Help_argument(0, '--print-result'), a2: csegen_521()}}}}, {a1: Text_PrettyPrint_Prettyprinter_Util_reflow('Identify an existing PR or create a new one for the current branch.'), a2: {a1: Text_PrettyPrint_Prettyprinter_Util_reflow('Optionally apply any number of labels by prefixing them with \'#\'.'), a2: {a1: Text_PrettyPrint_Prettyprinter_Util_reflow('Optionally mark a new or existing PR as a draft with the --draft flag.'), a2: {a1: Text_PrettyPrint_Prettyprinter_Util_reflow('Optionally mark an existing PR as ready for review with the --ready flag.'), a2: {a1: Text_PrettyPrint_Prettyprinter_Util_reflow('Optionally specify the branch to merge into with the --into option.'), a2: {a1: Text_PrettyPrint_Prettyprinter_Util_reflow('Optionally print a pr tree with the --print-tree flag.'), a2: {h: 0}}}}}}});
|
|
10772
10909
|
case 'contribute': return Commands_Help_subcommand($0, {a1: Commands_Help_argument(0, '-c/--checkout | -l/--list'), a2: {a1: Commands_Help_argument(0, '-<num>'), a2: {a1: Commands_Help_argument(0, '-i/--ignore {<uri>/<pr-number>}'), a2: {h: 0}}}}, {a1: Text_PrettyPrint_Prettyprinter_Util_reflow(Prelude_Types_foldMap_Foldable_List(csegen_86()(), $da => $da, {a1: 'Contribute to an open PR. Prints a URL. Prioritizes PRs you are\nrequested to review but will also return other PRs.', a2: {h: 0}})), a2: {a1: Text_PrettyPrint_Prettyprinter_Util_reflow(Prelude_Types_foldMap_Foldable_List(csegen_86()(), $e7 => $e7, {a1: 'Use dash followed by a number (e.g. \'-3\') to skip that number of\npotential PRs and return the next.', a2: {h: 0}})), a2: {a1: Text_PrettyPrint_Prettyprinter_Util_reflow(Prelude_Types_foldMap_Foldable_List(csegen_86()(), $f4 => $f4, {a1: 'Specify a PR to ignore (only affects the local Harmony config on\nthis machine) if you would like to more permanently skip a potential\nPR. Do this with the \'--ignore\' option followed by a GitHub URI or\nPull Request number.', a2: {h: 0}})), a2: {a1: Text_PrettyPrint_Prettyprinter_Util_reflow(Prelude_Types_foldMap_Foldable_List(csegen_86()(), $101 => $101, {a1: 'Use --list to list multiple PRs instead of just one. This option \nsupports skipping PRs but does not support the checkout option because\nthere is no single PR that should be checked out.', a2: {h: 0}})), a2: {h: 0}}}}});
|
|
10773
10910
|
case 'graph': return Commands_Help_subcommand($0, {a1: Commands_Help_argument(0, '-c/--completed'), a2: {a1: Commands_Help_argument(1, '<team-slug>'), a2: {h: 0}}}, {a1: Text_PrettyPrint_Prettyprinter_Util_reflow('Graph the relative review workload of the members of the given GitHub Team.'), a2: {h: 0}});
|
|
10774
10911
|
case 'help': return Commands_Help_subcommand($0, {a1: Commands_Help_argument(0, '<subcommand>'), a2: {h: 0}}, {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('Print help'), a2: {h: 0}});
|
|
10775
10912
|
case 'version': return Commands_Help_subcommand($0, {h: 0}, {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('Print version'), a2: {h: 0}});
|
|
10776
|
-
case 'quick': return Commands_Help_subcommand($0, {a1: Commands_Help_argument(0, '--bugfix'), a2: {a1: Commands_Help_argument(0, '<title> | #<issue-number>'), a2:
|
|
10913
|
+
case 'quick': return Commands_Help_subcommand($0, {a1: Commands_Help_argument(0, '--bugfix'), a2: {a1: Commands_Help_argument(0, '<title> | #<issue-number>'), a2: csegen_516()}}, {a1: Text_PrettyPrint_Prettyprinter_Doc_hcat({a1: Text_PrettyPrint_Prettyprinter_Util_reflow('Quickly spin up new work with a GitHub issue and associated feature branch. If you have harmony configured to parse GitHub issue numbers ('), a2: {a1: Commands_Help_shell('harmony config branchParsing github'), a2: {a1: Text_PrettyPrint_Prettyprinter_Util_reflow(') then any PR created from the new branch will automatically link to the new ticket in its description.'), a2: {h: 0}}}}), a2: {a1: Text_PrettyPrint_Prettyprinter_Util_reflow(Prelude_Types_foldMap_Foldable_List(csegen_86()(), $154 => $154, {a1: 'By default the branch will have the \'feature\' prefix. If the\n--bugfix flag is specified, the \'bugfix\' prefix will be used.', a2: {h: 0}})), a2: {a1: Text_PrettyPrint_Prettyprinter_Util_reflow(Prelude_Types_foldMap_Foldable_List(csegen_86()(), $161 => $161, {a1: 'If your only argument (possibly in addition to the bugfix flag) is\n#<issue-number> for an existing GitHub issue then the new branch will\npoint at that existing issue. Otherwise, all additional arguments other\nthan --bugfix will be used as the issue title. If you don\'t give any\narguments then you will be prompted to enter the issue title\ninteractively. You will also be prompted for the issue description.', a2: {h: 0}})), a2: {h: 0}}}});
|
|
10777
10914
|
case 'sync': return Commands_Help_subcommand($0, {h: 0}, {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('Synchronize local config with information from GitHub.'), a2: {h: 0}});
|
|
10778
10915
|
case 'branch': return Commands_Help_subcommand($0, {h: 0}, {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('Print the GitHub URI for the currently checked out branch.'), a2: {h: 0}});
|
|
10779
10916
|
case 'whoami': return Commands_Help_subcommand($0, {h: 0}, {a1: Text_PrettyPrint_Prettyprinter_Util_reflow('Print information about the configured and authenticated user.'), a2: {h: 0}});
|
|
@@ -10908,7 +11045,7 @@ function Commands_case__casex20blockx20inx20graph_22139($0, $1, $2, $3, $4, $5,
|
|
|
10908
11045
|
case 0: return Data_Promise_pure_Applicative_x28Promisex20x24ex29({h: 0}, $d, $e);
|
|
10909
11046
|
}
|
|
10910
11047
|
};
|
|
10911
|
-
return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($c, completedReviews => Util_renderIO($2, csegen_48()(), Commands_Graph_reviewsGraph($2, $2e => Commands_Graph_length_HasLength_String($2e),
|
|
11048
|
+
return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($c, completedReviews => Util_renderIO($2, csegen_48()(), Commands_Graph_reviewsGraph($2, $2e => Commands_Graph_length_HasLength_String($2e), csegen_409(), {a1: ann => $35 => Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String($35), a2: ann => $39 => $3a => Text_PrettyPrint_Prettyprinter_Doc_prettyPrec_Pretty_String($39, $3a)}, $7.a2, $7.a1, $5, completedReviews)), $8, $9);
|
|
10912
11049
|
};
|
|
10913
11050
|
}
|
|
10914
11051
|
|
|
@@ -10972,7 +11109,7 @@ function Commands_case__request_21563($0, $1, $2, $3, $4) {
|
|
|
10972
11109
|
case 1: /* Hypothetical */ return Data_Promise_reject('You cannot request review on a PR that has not been created yet and you cannot create the PR in this non-TTY shell', $2a, $2b);
|
|
10973
11110
|
}
|
|
10974
11111
|
};
|
|
10975
|
-
return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($15 => $16 => Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(
|
|
11112
|
+
return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($15 => $16 => Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(csegen_693(), $1b => $1c => $1d => Commands_PullRequest_identifyOrCreatePR($0, $1, 0, {h: 0}, $1b, $1c, $1d), $15, $16), $28, $6, $8);
|
|
10976
11113
|
}
|
|
10977
11114
|
}
|
|
10978
11115
|
};
|
|
@@ -10980,7 +11117,7 @@ function Commands_case__request_21563($0, $1, $2, $3, $4) {
|
|
|
10980
11117
|
|
|
10981
11118
|
/* Commands.case block in case block in request,partitionedArgs */
|
|
10982
11119
|
function Commands_case__casex20blockx20inx20requestx2cpartitionedArgs_21487($0, $1, $2, $3, $4, $5, $6) {
|
|
10983
|
-
const $8 = Prelude_Interfaces_mapHom(
|
|
11120
|
+
const $8 = Prelude_Interfaces_mapHom(csegen_707(), $e => Prelude_Types_List_mapAppend({h: 0}, $12 => Data_String_Extra_drop(1n, $12), $e))({a1: $4, a2: $6.a1});
|
|
10984
11121
|
return {a1: $8.a1, a2: {a1: $6.a2, a2: $8.a2}};
|
|
10985
11122
|
}
|
|
10986
11123
|
|
|
@@ -10989,30 +11126,30 @@ function Commands_case__requestx2cpartitionedArgs_21466($0, $1, $2, $3, $4) {
|
|
|
10989
11126
|
return Commands_case__casex20blockx20inx20requestx2cpartitionedArgs_21487($0, $1, $2, $3, $4.a1, $4.a2, Data_List_partition($10 => Util_String_isHashPrefix($10), $4.a2));
|
|
10990
11127
|
}
|
|
10991
11128
|
|
|
10992
|
-
/* Commands.
|
|
10993
|
-
function
|
|
11129
|
+
/* Commands.9186:20480:recombineIntoArgs */
|
|
11130
|
+
function Commands_n__9186_20480_recombineIntoArgs($0, $1) {
|
|
10994
11131
|
switch($1.h) {
|
|
10995
11132
|
case 0: /* nil */ return {a1: {h: 0}, a2: {h: 0}};
|
|
10996
11133
|
case undefined: /* cons */ {
|
|
10997
11134
|
switch($1.a1) {
|
|
10998
11135
|
case '-i': {
|
|
10999
11136
|
switch($1.a2.h) {
|
|
11000
|
-
case 0: /* nil */ return
|
|
11137
|
+
case 0: /* nil */ return csegen_711();
|
|
11001
11138
|
case undefined: /* cons */ {
|
|
11002
|
-
const $8 =
|
|
11139
|
+
const $8 = Commands_n__9186_20476_parseIntoOpt($0, $1.a2.a1);
|
|
11003
11140
|
switch($8.h) {
|
|
11004
11141
|
case undefined: /* just */ {
|
|
11005
|
-
const $c =
|
|
11142
|
+
const $c = Commands_n__9186_20480_recombineIntoArgs($0, $1.a2.a2);
|
|
11006
11143
|
return {a1: {a1: $8.a1, a2: $c.a1}, a2: $c.a2};
|
|
11007
11144
|
}
|
|
11008
11145
|
case 0: /* nothing */ {
|
|
11009
|
-
const $14 =
|
|
11146
|
+
const $14 = Commands_n__9186_20480_recombineIntoArgs($0, $1.a2.a2);
|
|
11010
11147
|
return {a1: $14.a1, a2: {a1: '-i', a2: {a1: $1.a2.a1, a2: $14.a2}}};
|
|
11011
11148
|
}
|
|
11012
11149
|
}
|
|
11013
11150
|
}
|
|
11014
11151
|
default: {
|
|
11015
|
-
const $1e =
|
|
11152
|
+
const $1e = Commands_n__9186_20480_recombineIntoArgs($0, $1.a2);
|
|
11016
11153
|
return {a1: $1e.a1, a2: {a1: $1.a1, a2: $1e.a2}};
|
|
11017
11154
|
}
|
|
11018
11155
|
}
|
|
@@ -11021,26 +11158,26 @@ function Commands_n__9168_20480_recombineIntoArgs($0, $1) {
|
|
|
11021
11158
|
switch($1.a2.h) {
|
|
11022
11159
|
case 0: /* nil */ return {a1: {h: 0}, a2: {a1: '--into', a2: {h: 0}}};
|
|
11023
11160
|
case undefined: /* cons */ {
|
|
11024
|
-
const $2b =
|
|
11161
|
+
const $2b = Commands_n__9186_20476_parseIntoOpt($0, $1.a2.a1);
|
|
11025
11162
|
switch($2b.h) {
|
|
11026
11163
|
case undefined: /* just */ {
|
|
11027
|
-
const $2f =
|
|
11164
|
+
const $2f = Commands_n__9186_20480_recombineIntoArgs($0, $1.a2.a2);
|
|
11028
11165
|
return {a1: {a1: $2b.a1, a2: $2f.a1}, a2: $2f.a2};
|
|
11029
11166
|
}
|
|
11030
11167
|
case 0: /* nothing */ {
|
|
11031
|
-
const $37 =
|
|
11168
|
+
const $37 = Commands_n__9186_20480_recombineIntoArgs($0, $1.a2.a2);
|
|
11032
11169
|
return {a1: $37.a1, a2: {a1: '--into', a2: {a1: $1.a2.a1, a2: $37.a2}}};
|
|
11033
11170
|
}
|
|
11034
11171
|
}
|
|
11035
11172
|
}
|
|
11036
11173
|
default: {
|
|
11037
|
-
const $41 =
|
|
11174
|
+
const $41 = Commands_n__9186_20480_recombineIntoArgs($0, $1.a2);
|
|
11038
11175
|
return {a1: $41.a1, a2: {a1: $1.a1, a2: $41.a2}};
|
|
11039
11176
|
}
|
|
11040
11177
|
}
|
|
11041
11178
|
}
|
|
11042
11179
|
default: {
|
|
11043
|
-
const $49 =
|
|
11180
|
+
const $49 = Commands_n__9186_20480_recombineIntoArgs($0, $1.a2);
|
|
11044
11181
|
return {a1: $49.a1, a2: {a1: $1.a1, a2: $49.a2}};
|
|
11045
11182
|
}
|
|
11046
11183
|
}
|
|
@@ -11048,30 +11185,30 @@ function Commands_n__9168_20480_recombineIntoArgs($0, $1) {
|
|
|
11048
11185
|
}
|
|
11049
11186
|
}
|
|
11050
11187
|
|
|
11051
|
-
/* Commands.
|
|
11052
|
-
function
|
|
11188
|
+
/* Commands.11178:22359:recombineIgnoreArgs */
|
|
11189
|
+
function Commands_n__11178_22359_recombineIgnoreArgs($0, $1) {
|
|
11053
11190
|
switch($1.h) {
|
|
11054
11191
|
case 0: /* nil */ return {a1: {h: 0}, a2: {h: 0}};
|
|
11055
11192
|
case undefined: /* cons */ {
|
|
11056
11193
|
switch($1.a1) {
|
|
11057
11194
|
case '-i': {
|
|
11058
11195
|
switch($1.a2.h) {
|
|
11059
|
-
case 0: /* nil */ return
|
|
11196
|
+
case 0: /* nil */ return csegen_711();
|
|
11060
11197
|
case undefined: /* cons */ {
|
|
11061
|
-
const $8 =
|
|
11198
|
+
const $8 = Commands_n__11178_22356_parseIgnoreOpt($0, $1.a2.a1);
|
|
11062
11199
|
switch($8.h) {
|
|
11063
11200
|
case undefined: /* just */ {
|
|
11064
|
-
const $c =
|
|
11201
|
+
const $c = Commands_n__11178_22359_recombineIgnoreArgs($0, $1.a2.a2);
|
|
11065
11202
|
return {a1: {a1: $8.a1, a2: $c.a1}, a2: $c.a2};
|
|
11066
11203
|
}
|
|
11067
11204
|
case 0: /* nothing */ {
|
|
11068
|
-
const $14 =
|
|
11205
|
+
const $14 = Commands_n__11178_22359_recombineIgnoreArgs($0, $1.a2.a2);
|
|
11069
11206
|
return {a1: $14.a1, a2: {a1: '-i', a2: {a1: $1.a2.a1, a2: $14.a2}}};
|
|
11070
11207
|
}
|
|
11071
11208
|
}
|
|
11072
11209
|
}
|
|
11073
11210
|
default: {
|
|
11074
|
-
const $1e =
|
|
11211
|
+
const $1e = Commands_n__11178_22359_recombineIgnoreArgs($0, $1.a2);
|
|
11075
11212
|
return {a1: $1e.a1, a2: {a1: $1.a1, a2: $1e.a2}};
|
|
11076
11213
|
}
|
|
11077
11214
|
}
|
|
@@ -11080,26 +11217,26 @@ function Commands_n__11160_22359_recombineIgnoreArgs($0, $1) {
|
|
|
11080
11217
|
switch($1.a2.h) {
|
|
11081
11218
|
case 0: /* nil */ return {a1: {h: 0}, a2: {a1: '--ignore', a2: {h: 0}}};
|
|
11082
11219
|
case undefined: /* cons */ {
|
|
11083
|
-
const $2b =
|
|
11220
|
+
const $2b = Commands_n__11178_22356_parseIgnoreOpt($0, $1.a2.a1);
|
|
11084
11221
|
switch($2b.h) {
|
|
11085
11222
|
case undefined: /* just */ {
|
|
11086
|
-
const $2f =
|
|
11223
|
+
const $2f = Commands_n__11178_22359_recombineIgnoreArgs($0, $1.a2.a2);
|
|
11087
11224
|
return {a1: {a1: $2b.a1, a2: $2f.a1}, a2: $2f.a2};
|
|
11088
11225
|
}
|
|
11089
11226
|
case 0: /* nothing */ {
|
|
11090
|
-
const $37 =
|
|
11227
|
+
const $37 = Commands_n__11178_22359_recombineIgnoreArgs($0, $1.a2.a2);
|
|
11091
11228
|
return {a1: $37.a1, a2: {a1: '--ignore', a2: {a1: $1.a2.a1, a2: $37.a2}}};
|
|
11092
11229
|
}
|
|
11093
11230
|
}
|
|
11094
11231
|
}
|
|
11095
11232
|
default: {
|
|
11096
|
-
const $41 =
|
|
11233
|
+
const $41 = Commands_n__11178_22359_recombineIgnoreArgs($0, $1.a2);
|
|
11097
11234
|
return {a1: $41.a1, a2: {a1: $1.a1, a2: $41.a2}};
|
|
11098
11235
|
}
|
|
11099
11236
|
}
|
|
11100
11237
|
}
|
|
11101
11238
|
default: {
|
|
11102
|
-
const $49 =
|
|
11239
|
+
const $49 = Commands_n__11178_22359_recombineIgnoreArgs($0, $1.a2);
|
|
11103
11240
|
return {a1: $49.a1, a2: {a1: $1.a1, a2: $49.a2}};
|
|
11104
11241
|
}
|
|
11105
11242
|
}
|
|
@@ -11107,23 +11244,23 @@ function Commands_n__11160_22359_recombineIgnoreArgs($0, $1) {
|
|
|
11107
11244
|
}
|
|
11108
11245
|
}
|
|
11109
11246
|
|
|
11110
|
-
/* Commands.
|
|
11111
|
-
function
|
|
11247
|
+
/* Commands.10585:21788:putNameLn */
|
|
11248
|
+
function Commands_n__10585_21788_putNameLn($0, $1, $2, $3) {
|
|
11112
11249
|
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}}}});
|
|
11113
11250
|
}
|
|
11114
11251
|
|
|
11115
|
-
/* Commands.
|
|
11116
|
-
function
|
|
11117
|
-
return Text_PrettyPrint_Prettyprinter_Doc_hcat(Data_List_intersperse(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(', '), Prelude_Types_List_mapAppend({h: 0}, $e =>
|
|
11252
|
+
/* Commands.8932:20218:putLabels */
|
|
11253
|
+
function Commands_n__8932_20218_putLabels($0, $1, $2, $3) {
|
|
11254
|
+
return Text_PrettyPrint_Prettyprinter_Doc_hcat(Data_List_intersperse(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(', '), Prelude_Types_List_mapAppend({h: 0}, $e => Commands_n__8932_20217_putLabel($0, $1, $2, $e), $3)));
|
|
11118
11255
|
}
|
|
11119
11256
|
|
|
11120
|
-
/* Commands.
|
|
11121
|
-
function
|
|
11257
|
+
/* Commands.8932:20217:putLabel */
|
|
11258
|
+
function Commands_n__8932_20217_putLabel($0, $1, $2, $3) {
|
|
11122
11259
|
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($3)));
|
|
11123
11260
|
}
|
|
11124
11261
|
|
|
11125
|
-
/* Commands.
|
|
11126
|
-
function
|
|
11262
|
+
/* Commands.9527:20828:printTree */
|
|
11263
|
+
function Commands_n__9527_20828_printTree($0, $1, $2) {
|
|
11127
11264
|
const $6 = $7 => {
|
|
11128
11265
|
switch($7.h) {
|
|
11129
11266
|
case 2: /* PrintTree */ return 1;
|
|
@@ -11134,8 +11271,8 @@ function Commands_n__9509_20828_printTree($0, $1, $2) {
|
|
|
11134
11271
|
return Data_Maybe_isJust($4);
|
|
11135
11272
|
}
|
|
11136
11273
|
|
|
11137
|
-
/* Commands.
|
|
11138
|
-
function
|
|
11274
|
+
/* Commands.9527:20827:printPrTree */
|
|
11275
|
+
function Commands_n__9527_20827_printPrTree($0, $1, $2, $3, $4, $5) {
|
|
11139
11276
|
const $10 = $11 => {
|
|
11140
11277
|
const $13 = Commands_PullRequest_prTree({h: 0}, {h: 0}, {a1: $3, a2: $11.a1}, $11.a2);
|
|
11141
11278
|
return $1b => $1c => $1d => Data_Promise_liftIO_HasIO_x28Promisex20x24ex29($20 => Prelude_IO_prim__putStr((Commands_PullRequest_renderPrTree($2, 1, $13)+'\n'), $20), $1b, $1c, $1d);
|
|
@@ -11143,8 +11280,8 @@ function Commands_n__9509_20827_printPrTree($0, $1, $2, $3, $4, $5) {
|
|
|
11143
11280
|
return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(Commands_PullRequest_prChain($2, $0, Data_Fuel_limit(10n), $3.a9), $10, $4, $5);
|
|
11144
11281
|
}
|
|
11145
11282
|
|
|
11146
|
-
/* Commands.
|
|
11147
|
-
function
|
|
11283
|
+
/* Commands.11530:22714:printDetails */
|
|
11284
|
+
function Commands_n__11530_22714_printDetails($0, $1, $2, $3) {
|
|
11148
11285
|
const $4 = Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_italic(), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String($3.a8));
|
|
11149
11286
|
const $c = Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(' \u{251c} title: '), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String($3.a2));
|
|
11150
11287
|
const $15 = Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(' \u{251c} created:'), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(Data_Date_show_Show_Date($3.a3)));
|
|
@@ -11153,8 +11290,8 @@ function Commands_n__11512_22714_printDetails($0, $1, $2, $3) {
|
|
|
11153
11290
|
return Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: $4, a2: {a1: $c, a2: {a1: $15, a2: {a1: $20, a2: {a1: $2e, a2: {h: 0}}}}}});
|
|
11154
11291
|
}
|
|
11155
11292
|
|
|
11156
|
-
/* Commands.
|
|
11157
|
-
function
|
|
11293
|
+
/* Commands.11530:22713:pickOne */
|
|
11294
|
+
function Commands_n__11530_22713_pickOne($0, $1, $2, $3, $4, $5, $6, $7) {
|
|
11158
11295
|
const $8 = Data_List_headx27(Data_List_drop($4, Prelude_Types_List_tailRecAppend($6, $7)));
|
|
11159
11296
|
return $11 => $12 => {
|
|
11160
11297
|
switch($8.h) {
|
|
@@ -11168,7 +11305,7 @@ function Commands_n__11512_22713_pickOne($0, $1, $2, $3, $4, $5, $6, $7) {
|
|
|
11168
11305
|
break;
|
|
11169
11306
|
}
|
|
11170
11307
|
case 0: /* nothing */ {
|
|
11171
|
-
$19 =
|
|
11308
|
+
$19 = csegen_717();
|
|
11172
11309
|
break;
|
|
11173
11310
|
}
|
|
11174
11311
|
}
|
|
@@ -11178,39 +11315,39 @@ function Commands_n__11512_22713_pickOne($0, $1, $2, $3, $4, $5, $6, $7) {
|
|
|
11178
11315
|
};
|
|
11179
11316
|
}
|
|
11180
11317
|
|
|
11181
|
-
/* Commands.
|
|
11182
|
-
function
|
|
11318
|
+
/* Commands.10215:21454:partitionedArgs */
|
|
11319
|
+
function Commands_n__10215_21454_partitionedArgs($0, $1, $2, $3) {
|
|
11183
11320
|
return Commands_case__requestx2cpartitionedArgs_21466($0, $1, $2, $3, Data_List_partition($c => Data_String_isPrefixOf('+', $c), $3));
|
|
11184
11321
|
}
|
|
11185
11322
|
|
|
11186
|
-
/* Commands.
|
|
11187
|
-
function
|
|
11323
|
+
/* Commands.10753:21976:parseTeamArg */
|
|
11324
|
+
function Commands_n__10753_21976_parseTeamArg($0, $1) {
|
|
11188
11325
|
return {a1: {a1: $1}};
|
|
11189
11326
|
}
|
|
11190
11327
|
|
|
11191
|
-
/* Commands.
|
|
11192
|
-
function
|
|
11328
|
+
/* Commands.11178:22358:parseSkipArg */
|
|
11329
|
+
function Commands_n__11178_22358_parseSkipArg($0, $1) {
|
|
11193
11330
|
return Commands_case__parseContributeArgsx2cparseSkipArg_22405($0, $1, Data_String_strM($1));
|
|
11194
11331
|
}
|
|
11195
11332
|
|
|
11196
|
-
/* Commands.
|
|
11197
|
-
function
|
|
11333
|
+
/* Commands.9186:20479:parseReadyFlag */
|
|
11334
|
+
function Commands_n__9186_20479_parseReadyFlag($0, $1) {
|
|
11198
11335
|
switch($1) {
|
|
11199
11336
|
case '--ready': return {a1: {h: 1 /* Ready */}};
|
|
11200
11337
|
default: return {h: 0};
|
|
11201
11338
|
}
|
|
11202
11339
|
}
|
|
11203
11340
|
|
|
11204
|
-
/* Commands.
|
|
11205
|
-
function
|
|
11341
|
+
/* Commands.9186:20478:parsePrintTreeFlag */
|
|
11342
|
+
function Commands_n__9186_20478_parsePrintTreeFlag($0, $1) {
|
|
11206
11343
|
switch($1) {
|
|
11207
11344
|
case '--print-tree': return {a1: {h: 2 /* PrintTree */}};
|
|
11208
11345
|
default: return {h: 0};
|
|
11209
11346
|
}
|
|
11210
11347
|
}
|
|
11211
11348
|
|
|
11212
|
-
/* Commands.
|
|
11213
|
-
function
|
|
11349
|
+
/* Commands.11178:22357:parseListFlag */
|
|
11350
|
+
function Commands_n__11178_22357_parseListFlag($0, $1) {
|
|
11214
11351
|
switch($1) {
|
|
11215
11352
|
case '-l': return {a1: {h: 0 /* List */}};
|
|
11216
11353
|
case '--list': return {a1: {h: 0 /* List */}};
|
|
@@ -11218,8 +11355,8 @@ function Commands_n__11160_22357_parseListFlag($0, $1) {
|
|
|
11218
11355
|
}
|
|
11219
11356
|
}
|
|
11220
11357
|
|
|
11221
|
-
/* Commands.
|
|
11222
|
-
function
|
|
11358
|
+
/* Commands.9186:20477:parseLabelArg */
|
|
11359
|
+
function Commands_n__9186_20477_parseLabelArg($0, $1) {
|
|
11223
11360
|
const $2 = Data_String_strM($1);
|
|
11224
11361
|
switch($2.h) {
|
|
11225
11362
|
case undefined: /* cons */ {
|
|
@@ -11232,29 +11369,29 @@ function Commands_n__9168_20477_parseLabelArg($0, $1) {
|
|
|
11232
11369
|
}
|
|
11233
11370
|
}
|
|
11234
11371
|
|
|
11235
|
-
/* Commands.
|
|
11236
|
-
function
|
|
11372
|
+
/* Commands.9186:20476:parseIntoOpt */
|
|
11373
|
+
function Commands_n__9186_20476_parseIntoOpt($0, $1) {
|
|
11237
11374
|
const $2 = Util_String_nonEmpty($1);
|
|
11238
11375
|
return Prelude_Types_map_Functor_Maybe($7 => $7, $2);
|
|
11239
11376
|
}
|
|
11240
11377
|
|
|
11241
|
-
/* Commands.
|
|
11242
|
-
function
|
|
11243
|
-
const $2 = Data_String_split(
|
|
11378
|
+
/* Commands.11178:22356:parseIgnoreOpt */
|
|
11379
|
+
function Commands_n__11178_22356_parseIgnoreOpt($0, $1) {
|
|
11380
|
+
const $2 = Data_String_split(csegen_449(), $1);
|
|
11244
11381
|
const $7 = Data_List1_last($2);
|
|
11245
11382
|
return Prelude_Types_map_Functor_Maybe($c => $c, Data_String_parsePositive(csegen_2(), $7));
|
|
11246
11383
|
}
|
|
11247
11384
|
|
|
11248
|
-
/* Commands.
|
|
11249
|
-
function
|
|
11385
|
+
/* Commands.9186:20475:parseDraftFlag */
|
|
11386
|
+
function Commands_n__9186_20475_parseDraftFlag($0, $1) {
|
|
11250
11387
|
switch($1) {
|
|
11251
11388
|
case '--draft': return {a1: {h: 0 /* Draft */}};
|
|
11252
11389
|
default: return {h: 0};
|
|
11253
11390
|
}
|
|
11254
11391
|
}
|
|
11255
11392
|
|
|
11256
|
-
/* Commands.
|
|
11257
|
-
function
|
|
11393
|
+
/* Commands.10753:21975:parseCompletedFlag */
|
|
11394
|
+
function Commands_n__10753_21975_parseCompletedFlag($0, $1) {
|
|
11258
11395
|
switch($1) {
|
|
11259
11396
|
case '-c': return {a1: {h: 0}};
|
|
11260
11397
|
case '--completed': return {a1: {h: 0}};
|
|
@@ -11262,8 +11399,8 @@ function Commands_n__10735_21975_parseCompletedFlag($0, $1) {
|
|
|
11262
11399
|
}
|
|
11263
11400
|
}
|
|
11264
11401
|
|
|
11265
|
-
/* Commands.
|
|
11266
|
-
function
|
|
11402
|
+
/* Commands.11178:22355:parseCheckoutFlag */
|
|
11403
|
+
function Commands_n__11178_22355_parseCheckoutFlag($0, $1) {
|
|
11267
11404
|
switch($1) {
|
|
11268
11405
|
case '-c': return {a1: {h: 1 /* Checkout */}};
|
|
11269
11406
|
case '--checkout': return {a1: {h: 1 /* Checkout */}};
|
|
@@ -11271,8 +11408,8 @@ function Commands_n__11160_22355_parseCheckoutFlag($0, $1) {
|
|
|
11271
11408
|
}
|
|
11272
11409
|
}
|
|
11273
11410
|
|
|
11274
|
-
/* Commands.
|
|
11275
|
-
function
|
|
11411
|
+
/* Commands.9527:20826:markAsReady */
|
|
11412
|
+
function Commands_n__9527_20826_markAsReady($0, $1, $2) {
|
|
11276
11413
|
const $6 = $7 => {
|
|
11277
11414
|
switch($7.h) {
|
|
11278
11415
|
case 1: /* Ready */ return 1;
|
|
@@ -11283,8 +11420,8 @@ function Commands_n__9509_20826_markAsReady($0, $1, $2) {
|
|
|
11283
11420
|
return Data_Maybe_isJust($4);
|
|
11284
11421
|
}
|
|
11285
11422
|
|
|
11286
|
-
/* Commands.
|
|
11287
|
-
function
|
|
11423
|
+
/* Commands.9527:20825:markAsDraft */
|
|
11424
|
+
function Commands_n__9527_20825_markAsDraft($0, $1, $2) {
|
|
11288
11425
|
const $6 = $7 => {
|
|
11289
11426
|
switch($7.h) {
|
|
11290
11427
|
case 0: /* Draft */ return 1;
|
|
@@ -11295,8 +11432,8 @@ function Commands_n__9509_20825_markAsDraft($0, $1, $2) {
|
|
|
11295
11432
|
return Data_Maybe_isJust($4);
|
|
11296
11433
|
}
|
|
11297
11434
|
|
|
11298
|
-
/* Commands.
|
|
11299
|
-
function
|
|
11435
|
+
/* Commands.11530:22712:listSome */
|
|
11436
|
+
function Commands_n__11530_22712_listSome($0, $1, $2, $3, $4, $5, $6, $7) {
|
|
11300
11437
|
const $13 = $14 => {
|
|
11301
11438
|
let $19;
|
|
11302
11439
|
switch(Prelude_Types_null_Foldable_List($5)) {
|
|
@@ -11309,13 +11446,13 @@ function Commands_n__11512_22712_listSome($0, $1, $2, $3, $4, $5, $6, $7) {
|
|
|
11309
11446
|
break;
|
|
11310
11447
|
}
|
|
11311
11448
|
}
|
|
11312
|
-
return Prelude_Interfaces_when(csegen_40()(), $19, () => $1e => $1f => Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(
|
|
11449
|
+
return Prelude_Interfaces_when(csegen_40()(), $19, () => $1e => $1f => Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(csegen_496()(), $25 => $26 => $27 => Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(Util_renderIO($2, csegen_48()(), Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_bold(), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('Your review not requested:'))), $37 => Commands_n__11530_22710_goListSome($0, $1, $2, 0, Data_List_take(5n, $5)), $26, $27), $1e, $1f));
|
|
11313
11450
|
};
|
|
11314
|
-
return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(
|
|
11451
|
+
return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(Commands_n__11530_22710_goListSome($0, $1, $2, 1, Data_List_drop($3, $4)), $13, $6, $7);
|
|
11315
11452
|
}
|
|
11316
11453
|
|
|
11317
|
-
/* Commands.
|
|
11318
|
-
function
|
|
11454
|
+
/* Commands.9527:20824:labelSlugs */
|
|
11455
|
+
function Commands_n__9527_20824_labelSlugs($0, $1, $2) {
|
|
11319
11456
|
const $4 = $5 => $6 => {
|
|
11320
11457
|
switch($5.h) {
|
|
11321
11458
|
case 4: /* Label */ return {a1: $5.a1, a2: $6};
|
|
@@ -11325,13 +11462,13 @@ function Commands_n__9509_20824_labelSlugs($0, $1, $2) {
|
|
|
11325
11462
|
return Prelude_Types_foldr_Foldable_List($4, {h: 0}, $1);
|
|
11326
11463
|
}
|
|
11327
11464
|
|
|
11328
|
-
/* Commands.
|
|
11329
|
-
function
|
|
11465
|
+
/* Commands.11530:22711:isNotIgnored */
|
|
11466
|
+
function Commands_n__11530_22711_isNotIgnored($0, $1, $2, $3, $4) {
|
|
11330
11467
|
return Data_Maybe_isNothing(Data_List_find($9 => Prelude_EqOrd_x3dx3d_Eq_Integer($9, $4.a1), $3.a15));
|
|
11331
11468
|
}
|
|
11332
11469
|
|
|
11333
|
-
/* Commands.
|
|
11334
|
-
function
|
|
11470
|
+
/* Commands.9527:20823:intoBranch */
|
|
11471
|
+
function Commands_n__9527_20823_intoBranch($0, $1, $2) {
|
|
11335
11472
|
const $c = $d => {
|
|
11336
11473
|
switch($d.h) {
|
|
11337
11474
|
case 3: /* Into */ return {a1: Util_String_value($d.a1)};
|
|
@@ -11341,11 +11478,11 @@ function Commands_n__9509_20823_intoBranch($0, $1, $2) {
|
|
|
11341
11478
|
return Prelude_Types_foldMap_Foldable_List({a1: $6 => $7 => Prelude_Types_x3cx2bx3e_Semigroup_x28Maybex20x24ax29($6, $7), a2: {h: 0}}, $c, $1);
|
|
11342
11479
|
}
|
|
11343
11480
|
|
|
11344
|
-
/* Commands.
|
|
11345
|
-
function
|
|
11481
|
+
/* Commands.11530:22710:goListSome */
|
|
11482
|
+
function Commands_n__11530_22710_goListSome($0, $1, $2, $3, $4) {
|
|
11346
11483
|
switch($4.h) {
|
|
11347
11484
|
case undefined: /* cons */ {
|
|
11348
|
-
const $6 =
|
|
11485
|
+
const $6 = Commands_n__11530_22714_printDetails($0, $1, $2, $4.a1);
|
|
11349
11486
|
let $13;
|
|
11350
11487
|
switch($3) {
|
|
11351
11488
|
case 1: {
|
|
@@ -11357,15 +11494,15 @@ function Commands_n__11512_22710_goListSome($0, $1, $2, $3, $4) {
|
|
|
11357
11494
|
break;
|
|
11358
11495
|
}
|
|
11359
11496
|
}
|
|
11360
|
-
const $11 = Text_PrettyPrint_Prettyprinter_Doc_indent($13, Prelude_Types_foldl_Foldable_List(acc => next => Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: acc, a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {a1:
|
|
11497
|
+
const $11 = Text_PrettyPrint_Prettyprinter_Doc_indent($13, Prelude_Types_foldl_Foldable_List(acc => next => Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: acc, a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {a1: Commands_n__11530_22714_printDetails($0, $1, $2, next), a2: {h: 0}}}}), $6, $4.a2));
|
|
11361
11498
|
return Util_renderIO($2, csegen_48()(), $11);
|
|
11362
11499
|
}
|
|
11363
|
-
case 0: /* nil */ return
|
|
11500
|
+
case 0: /* nil */ return csegen_717();
|
|
11364
11501
|
}
|
|
11365
11502
|
}
|
|
11366
11503
|
|
|
11367
|
-
/* Commands.
|
|
11368
|
-
function
|
|
11504
|
+
/* Commands.12514:23622:go */
|
|
11505
|
+
function Commands_n__12514_23622_go($0, $1) {
|
|
11369
11506
|
switch($1.h) {
|
|
11370
11507
|
case undefined: /* cons */ {
|
|
11371
11508
|
switch($1.a1.h) {
|
|
@@ -11387,8 +11524,8 @@ function Commands_n__12496_23622_go($0, $1) {
|
|
|
11387
11524
|
}
|
|
11388
11525
|
}
|
|
11389
11526
|
|
|
11390
|
-
/* Commands.
|
|
11391
|
-
function
|
|
11527
|
+
/* Commands.12462:23567:go */
|
|
11528
|
+
function Commands_n__12462_23567_go($0, $1) {
|
|
11392
11529
|
switch($1.h) {
|
|
11393
11530
|
case 0: /* nothing */ return $0;
|
|
11394
11531
|
default: {
|
|
@@ -11400,15 +11537,15 @@ function Commands_n__12444_23567_go($0, $1) {
|
|
|
11400
11537
|
}
|
|
11401
11538
|
}
|
|
11402
11539
|
|
|
11403
|
-
/* Commands.
|
|
11404
|
-
function
|
|
11540
|
+
/* Commands.10585:21787:forkedUser */
|
|
11541
|
+
function Commands_n__10585_21787_forkedUser($0, $1, $2, $3) {
|
|
11405
11542
|
return FFI_Concurrency_fork(csegen_48()(), ('user --json '+$3));
|
|
11406
11543
|
}
|
|
11407
11544
|
|
|
11408
|
-
/* Commands.
|
|
11409
|
-
function
|
|
11410
|
-
switch(
|
|
11411
|
-
case 1: return
|
|
11545
|
+
/* Commands.9527:20822:conflictingDraftReadyArgs */
|
|
11546
|
+
function Commands_n__9527_20822_conflictingDraftReadyArgs($0, $1, $2) {
|
|
11547
|
+
switch(Commands_n__9527_20825_markAsDraft($0, $1, $2)) {
|
|
11548
|
+
case 1: return Commands_n__9527_20826_markAsReady($0, $1, $2);
|
|
11412
11549
|
case 0: return 0;
|
|
11413
11550
|
}
|
|
11414
11551
|
}
|
|
@@ -11427,12 +11564,12 @@ function Commands_titleOrNumberArg($0) {
|
|
|
11427
11564
|
}
|
|
11428
11565
|
};
|
|
11429
11566
|
const $3 = Prelude_Types_List_filterAppend({h: 0}, $6, $0);
|
|
11430
|
-
return
|
|
11567
|
+
return Commands_n__12514_23622_go($0, $3);
|
|
11431
11568
|
}
|
|
11432
11569
|
|
|
11433
11570
|
/* Commands.titleArg : List QuickArg -> Maybe String */
|
|
11434
11571
|
function Commands_titleArg($0) {
|
|
11435
|
-
return Prelude_Types_foldl_Foldable_List($3 => $4 =>
|
|
11572
|
+
return Prelude_Types_foldl_Foldable_List($3 => $4 => Commands_n__12462_23567_go($3, $4), {h: 0}, $0);
|
|
11436
11573
|
}
|
|
11437
11574
|
|
|
11438
11575
|
/* Commands.teamNameArg : GraphArg -> Maybe String */
|
|
@@ -11458,7 +11595,7 @@ function Commands_skipArg($0) {
|
|
|
11458
11595
|
|
|
11459
11596
|
/* Commands.request : Config => Octokit => List String -> {default False _ : Bool} -> Promise' () */
|
|
11460
11597
|
function Commands_request($0, $1, $2, $3) {
|
|
11461
|
-
return Commands_case__request_21563($0, $1, $3, $2,
|
|
11598
|
+
return Commands_case__request_21563($0, $1, $3, $2, Commands_n__10215_21454_partitionedArgs($0, $1, $3, $2));
|
|
11462
11599
|
}
|
|
11463
11600
|
|
|
11464
11601
|
/* Commands.reflect : Config => Octokit => Promise' () */
|
|
@@ -11486,8 +11623,8 @@ function Commands_pr($0, $1, $2, $3, $4) {
|
|
|
11486
11623
|
switch($39.a1) {
|
|
11487
11624
|
case 0: {
|
|
11488
11625
|
$3e = $40 => {
|
|
11489
|
-
switch(
|
|
11490
|
-
case 1: return $46 =>
|
|
11626
|
+
switch(Commands_n__9527_20828_printTree($1, $2, $0)) {
|
|
11627
|
+
case 1: return $46 => Commands_n__9527_20827_printPrTree($1, $2, $0, $39.a2, $40, $46);
|
|
11491
11628
|
case 0: return $4e => $4f => Data_Promise_liftIO_HasIO_x28Promisex20x24ex29($52 => Prelude_IO_prim__putStr((Data_PullRequest_rf__webURI($0, $39.a2)+'\n'), $52), $40, $4e, $4f);
|
|
11492
11629
|
}
|
|
11493
11630
|
};
|
|
@@ -11495,8 +11632,8 @@ function Commands_pr($0, $1, $2, $3, $4) {
|
|
|
11495
11632
|
}
|
|
11496
11633
|
case 1: {
|
|
11497
11634
|
$3e = $5e => {
|
|
11498
|
-
switch(
|
|
11499
|
-
case 1: return $64 =>
|
|
11635
|
+
switch(Commands_n__9527_20828_printTree($1, $2, $0)) {
|
|
11636
|
+
case 1: return $64 => Commands_n__9527_20827_printPrTree($1, $2, $0, $39.a2, $5e, $64);
|
|
11500
11637
|
case 0: return $6c => Data_Promise_pure_Applicative_x28Promisex20x24ex29(undefined, $5e, $6c);
|
|
11501
11638
|
}
|
|
11502
11639
|
};
|
|
@@ -11505,7 +11642,7 @@ function Commands_pr($0, $1, $2, $3, $4) {
|
|
|
11505
11642
|
}
|
|
11506
11643
|
const $71 = $72 => $73 => $74 => {
|
|
11507
11644
|
let $7b;
|
|
11508
|
-
switch(Prelude_Types_null_Foldable_List(
|
|
11645
|
+
switch(Prelude_Types_null_Foldable_List(Commands_n__9527_20824_labelSlugs($1, $2, $0))) {
|
|
11509
11646
|
case 1: {
|
|
11510
11647
|
$7b = 0;
|
|
11511
11648
|
break;
|
|
@@ -11515,10 +11652,10 @@ function Commands_pr($0, $1, $2, $3, $4) {
|
|
|
11515
11652
|
break;
|
|
11516
11653
|
}
|
|
11517
11654
|
}
|
|
11518
|
-
const $76 = Prelude_Interfaces_when(csegen_40()(), $7b, () => $84 => $85 => Commands_label($0, $1,
|
|
11655
|
+
const $76 = Prelude_Interfaces_when(csegen_40()(), $7b, () => $84 => $85 => Commands_label($0, $1, Commands_n__9527_20824_labelSlugs($1, $2, $0), $84, $85));
|
|
11519
11656
|
const $90 = $91 => $92 => $93 => {
|
|
11520
11657
|
const $95 = $96 => {
|
|
11521
|
-
const $97 =
|
|
11658
|
+
const $97 = Commands_n__9527_20823_intoBranch($1, $2, $0);
|
|
11522
11659
|
switch($97.h) {
|
|
11523
11660
|
case undefined: /* just */ {
|
|
11524
11661
|
return $9c => {
|
|
@@ -11533,7 +11670,7 @@ function Commands_pr($0, $1, $2, $3, $4) {
|
|
|
11533
11670
|
};
|
|
11534
11671
|
const $bb = $bc => $bd => $be => {
|
|
11535
11672
|
let $c5;
|
|
11536
|
-
switch(
|
|
11673
|
+
switch(Commands_n__9527_20825_markAsDraft($1, $2, $0)) {
|
|
11537
11674
|
case 1: {
|
|
11538
11675
|
switch($39.a2.a4) {
|
|
11539
11676
|
case 1: {
|
|
@@ -11562,11 +11699,11 @@ function Commands_pr($0, $1, $2, $3, $4) {
|
|
|
11562
11699
|
};
|
|
11563
11700
|
return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(Util_Prompting_yesNoPrompt(csegen_48()(), 0, 'Are you sure you want to convert the existing PR for the current branch to a draft?'), $e0, $d6, $d7);
|
|
11564
11701
|
};
|
|
11565
|
-
return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(
|
|
11702
|
+
return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(csegen_496()(), $d4, $ce, $cf);
|
|
11566
11703
|
});
|
|
11567
11704
|
const $115 = $116 => {
|
|
11568
11705
|
let $11b;
|
|
11569
|
-
switch(
|
|
11706
|
+
switch(Commands_n__9527_20826_markAsReady($1, $2, $0)) {
|
|
11570
11707
|
case 1: {
|
|
11571
11708
|
$11b = $39.a2.a4;
|
|
11572
11709
|
break;
|
|
@@ -11586,7 +11723,7 @@ function Commands_pr($0, $1, $2, $3, $4) {
|
|
|
11586
11723
|
};
|
|
11587
11724
|
return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(Util_Prompting_yesNoPrompt(csegen_48()(), 0, 'Are you sure you want to mark the existing PR for the current branch ready for review?'), $135, $12b, $12c);
|
|
11588
11725
|
};
|
|
11589
|
-
return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(
|
|
11726
|
+
return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(csegen_496()(), $129, $123, $124);
|
|
11590
11727
|
});
|
|
11591
11728
|
};
|
|
11592
11729
|
return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($c0, $115, $bd, $be);
|
|
@@ -11600,9 +11737,9 @@ function Commands_pr($0, $1, $2, $3, $4) {
|
|
|
11600
11737
|
case 1: /* Hypothetical */ return $172 => Data_Promise_liftIO_HasIO_x28Promisex20x24ex29($175 => Prelude_IO_prim__putStr(($39.a1+'\n'), $175), $3a, $3b, $172);
|
|
11601
11738
|
}
|
|
11602
11739
|
};
|
|
11603
|
-
return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($1d => $1e => Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(
|
|
11740
|
+
return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($1d => $1e => Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(csegen_693(), $23 => $24 => $25 => Commands_PullRequest_identifyOrCreatePR($0, $1, Commands_n__9527_20825_markAsDraft($1, $2, $0), Commands_n__9527_20823_intoBranch($1, $2, $0), $23, $24, $25), $1d, $1e), $38, $19, $1a);
|
|
11604
11741
|
};
|
|
11605
|
-
return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(Prelude_Interfaces_when(csegen_40()(),
|
|
11742
|
+
return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(Prelude_Interfaces_when(csegen_40()(), Commands_n__9527_20822_conflictingDraftReadyArgs($1, $2, $0), () => $11 => $12 => Data_Promise_reject('You cannot set a PR as ready for review and mark it as a draft at the same time.', $11, $12)), $17, $3, $4);
|
|
11606
11743
|
}
|
|
11607
11744
|
|
|
11608
11745
|
/* Commands.parseQuickArgs : List String -> List QuickArg */
|
|
@@ -11623,9 +11760,9 @@ function Commands_parsePrArgs($0) {
|
|
|
11623
11760
|
switch($0.h) {
|
|
11624
11761
|
case 0: /* nil */ return {h: 1 /* Right */, a1: {h: 0}};
|
|
11625
11762
|
default: {
|
|
11626
|
-
const $3 =
|
|
11763
|
+
const $3 = Commands_n__9186_20480_recombineIntoArgs($0, $0);
|
|
11627
11764
|
const $7 = Prelude_Types_List_mapAppend({h: 0}, $b => ({h: 3 /* Into */, a1: $b}), $3.a1);
|
|
11628
|
-
const $e = Prelude_Types_traverse_Traversable_List(csegen_9(), $13 => Commands_x3cx7cx7cx3e(
|
|
11765
|
+
const $e = Prelude_Types_traverse_Traversable_List(csegen_9(), $13 => Commands_x3cx7cx7cx3e(csegen_741(), $18 => Commands_n__9186_20479_parseReadyFlag($0, $18), $1d => Commands_x3cx7cx7cx3e(csegen_741(), $22 => Commands_n__9186_20475_parseDraftFlag($0, $22), $27 => Commands_x3cx7cx7cx3e(csegen_741(), $2c => Commands_n__9186_20478_parsePrintTreeFlag($0, $2c), $31 => Commands_n__9186_20477_parseLabelArg($0, $31), $27), $1d), $13), $3.a2);
|
|
11629
11766
|
return Data_Either_maybeToEither(() => Commands_prUsageError(), Prelude_Types_map_Functor_Maybe($3f => Prelude_Types_List_tailRecAppend($7, $3f), $e));
|
|
11630
11767
|
}
|
|
11631
11768
|
}
|
|
@@ -11641,7 +11778,7 @@ function Commands_parseGraphArgs($0) {
|
|
|
11641
11778
|
switch($0.a2.a2.h) {
|
|
11642
11779
|
case undefined: /* cons */ return {h: 0 /* Left */, a1: 'graph accepts at most one team name and the --completed flag.'};
|
|
11643
11780
|
default: {
|
|
11644
|
-
const $6 = Prelude_Types_traverse_Traversable_List(csegen_9(), $b => Commands_x3cx7cx7cx3e(
|
|
11781
|
+
const $6 = Prelude_Types_traverse_Traversable_List(csegen_9(), $b => Commands_x3cx7cx7cx3e(csegen_741(), $10 => Commands_n__10753_21975_parseCompletedFlag($0, $10), $15 => Commands_n__10753_21976_parseTeamArg($0, $15), $b), $0);
|
|
11645
11782
|
switch($6.h) {
|
|
11646
11783
|
case undefined: /* just */ return {h: 1 /* Right */, a1: $6.a1};
|
|
11647
11784
|
case 0: /* nothing */ return {h: 0 /* Left */, a1: 'The graph command expects the name of a GitHub Team and optionally --completed as arguments.'};
|
|
@@ -11650,7 +11787,7 @@ function Commands_parseGraphArgs($0) {
|
|
|
11650
11787
|
}
|
|
11651
11788
|
}
|
|
11652
11789
|
default: {
|
|
11653
|
-
const $1d = Prelude_Types_traverse_Traversable_List(csegen_9(), $22 => Commands_x3cx7cx7cx3e(
|
|
11790
|
+
const $1d = Prelude_Types_traverse_Traversable_List(csegen_9(), $22 => Commands_x3cx7cx7cx3e(csegen_741(), $27 => Commands_n__10753_21975_parseCompletedFlag($0, $27), $2c => Commands_n__10753_21976_parseTeamArg($0, $2c), $22), $0);
|
|
11654
11791
|
switch($1d.h) {
|
|
11655
11792
|
case undefined: /* just */ return {h: 1 /* Right */, a1: $1d.a1};
|
|
11656
11793
|
case 0: /* nothing */ return {h: 0 /* Left */, a1: 'The graph command expects the name of a GitHub Team and optionally --completed as arguments.'};
|
|
@@ -11659,7 +11796,7 @@ function Commands_parseGraphArgs($0) {
|
|
|
11659
11796
|
}
|
|
11660
11797
|
}
|
|
11661
11798
|
default: {
|
|
11662
|
-
const $34 = Prelude_Types_traverse_Traversable_List(csegen_9(), $39 => Commands_x3cx7cx7cx3e(
|
|
11799
|
+
const $34 = Prelude_Types_traverse_Traversable_List(csegen_9(), $39 => Commands_x3cx7cx7cx3e(csegen_741(), $3e => Commands_n__10753_21975_parseCompletedFlag($0, $3e), $43 => Commands_n__10753_21976_parseTeamArg($0, $43), $39), $0);
|
|
11663
11800
|
switch($34.h) {
|
|
11664
11801
|
case undefined: /* just */ return {h: 1 /* Right */, a1: $34.a1};
|
|
11665
11802
|
case 0: /* nothing */ return {h: 0 /* Left */, a1: 'The graph command expects the name of a GitHub Team and optionally --completed as arguments.'};
|
|
@@ -11673,9 +11810,9 @@ function Commands_parseContributeArgs($0) {
|
|
|
11673
11810
|
switch($0.h) {
|
|
11674
11811
|
case 0: /* nil */ return {h: 1 /* Right */, a1: {h: 0}};
|
|
11675
11812
|
default: {
|
|
11676
|
-
const $3 =
|
|
11813
|
+
const $3 = Commands_n__11178_22359_recombineIgnoreArgs($0, $0);
|
|
11677
11814
|
const $7 = Prelude_Types_List_mapAppend({h: 0}, $b => ({h: 2 /* Ignore */, a1: $b}), $3.a1);
|
|
11678
|
-
const $e = Prelude_Types_traverse_Traversable_List(csegen_9(), $13 => Commands_x3cx7cx7cx3e(
|
|
11815
|
+
const $e = Prelude_Types_traverse_Traversable_List(csegen_9(), $13 => Commands_x3cx7cx7cx3e(csegen_741(), $18 => Commands_n__11178_22357_parseListFlag($0, $18), $1d => Commands_x3cx7cx7cx3e(csegen_741(), $22 => Commands_n__11178_22358_parseSkipArg($0, $22), $27 => Commands_n__11178_22355_parseCheckoutFlag($0, $27), $1d), $13), $3.a2);
|
|
11679
11816
|
return Data_Either_maybeToEither(() => Commands_contributeUsageError(), Prelude_Types_map_Functor_Maybe($34 => Prelude_Types_List_tailRecAppend($7, $34), $e));
|
|
11680
11817
|
}
|
|
11681
11818
|
}
|
|
@@ -11683,12 +11820,12 @@ function Commands_parseContributeArgs($0) {
|
|
|
11683
11820
|
|
|
11684
11821
|
/* Commands.listOrgTeams : Config => Octokit => Promise' () */
|
|
11685
11822
|
function Commands_listOrgTeams($0, $1, $2, $3) {
|
|
11686
|
-
return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($6 => $7 => Data_Promise_map_Functor_x28Promisex20x24ex29(
|
|
11823
|
+
return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($6 => $7 => Data_Promise_map_Functor_x28Promisex20x24ex29(csegen_742(), $c => $d => FFI_GitHub_forceListTeams($1, $0.a2, $c, $d), $6, $7), teamNames => Util_renderIO($0, csegen_48()(), Text_PrettyPrint_Prettyprinter_Doc_vsep(Prelude_Types_List_mapAppend({h: 0}, $22 => Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_italic(), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String($22)), teamNames))), $2, $3);
|
|
11687
11824
|
}
|
|
11688
11825
|
|
|
11689
11826
|
/* Commands.list : Config => Octokit => String -> Promise' () */
|
|
11690
11827
|
function Commands_list($0, $1, $2, $3, $4) {
|
|
11691
|
-
return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($7 => $8 => Data_Promise_map_Functor_x28Promisex20x24ex29(
|
|
11828
|
+
return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($7 => $8 => Data_Promise_map_Functor_x28Promisex20x24ex29(csegen_742(), $d => $e => FFI_GitHub_forceListTeamMembers($1, $0.a2, $2, $d, $e), $7, $8), teamMemberLogins => $19 => $1a => Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(Prelude_Basics_flip(csegen_41()(), csegen_744(), Prelude_Types_traverse_Traversable_List(csegen_40()(), $29 => Commands_n__10585_21787_forkedUser($1, $2, $0, $29), teamMemberLogins)), teamMembersJson => $31 => $32 => Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(Prelude_Types_traverse_Traversable_List(csegen_40()(), $3a => $3b => Data_Promise_either(Data_User_parseUser($3a), $3b), teamMembersJson), teamMembers => Util_renderIO($0, csegen_48()(), Text_PrettyPrint_Prettyprinter_Doc_vsep(Prelude_Types_List_mapAppend({h: 0}, $4e => Commands_n__10585_21788_putNameLn($1, $2, $0, $4e), teamMembers))), $31, $32), $19, $1a), $3, $4);
|
|
11692
11829
|
}
|
|
11693
11830
|
|
|
11694
11831
|
/* Commands.label : Config => Octokit => List String -> Promise' () */
|
|
@@ -11697,17 +11834,17 @@ function Commands_label($0, $1, $2, $3, $4) {
|
|
|
11697
11834
|
switch($1b.h) {
|
|
11698
11835
|
case 0: /* Actual */ {
|
|
11699
11836
|
const $1d = Prelude_Types_List_mapAppend({h: 0}, $21 => Commands_Label_unslugifyLabel($0.a13, $21), $2);
|
|
11700
|
-
return $27 => $28 => Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($2b => $2c => Commands_Label_addLabels($0, $1, $1b.a2, $1d, $2b, $2c), allLabels => Util_renderIO($0, csegen_48()(), Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('Added'), Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29(
|
|
11837
|
+
return $27 => $28 => Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($2b => $2c => Commands_Label_addLabels($0, $1, $1b.a2, $1d, $2b, $2c), allLabels => Util_renderIO($0, csegen_48()(), Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('Added'), Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29(Commands_n__8932_20218_putLabels($1, $2, $0, $1d), 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_86()(), $5c => $5c, {a1: 'All labels for PR of ', a2: {a1: $1b.a2.a8, a2: {a1: ':', a2: {h: 0}}}})), Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29(Commands_n__8932_20218_putLabels($1, $2, $0, allLabels), Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Text_PrettyPrint_Prettyprinter_Doc_unsafeTextWithoutNewLines('.'), a2: {h: 0}}))), a2: {h: 0}}})), $27, $28);
|
|
11701
11838
|
}
|
|
11702
11839
|
case 1: /* Hypothetical */ return $77 => $78 => Data_Promise_reject('You cannot label a PR that has not been created yet and you cannot create the PR in this non-TTY shell', $77, $78);
|
|
11703
11840
|
}
|
|
11704
11841
|
};
|
|
11705
|
-
return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($7 => $8 => Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(
|
|
11842
|
+
return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($7 => $8 => Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(csegen_693(), $d => $e => $f => Commands_PullRequest_identifyOrCreatePR($0, $1, 0, {h: 0}, $d, $e, $f), $7, $8), $1a, $3, $4);
|
|
11706
11843
|
}
|
|
11707
11844
|
|
|
11708
11845
|
/* Commands.issueCategory : List QuickArg -> IssueCategory */
|
|
11709
11846
|
function Commands_issueCategory($0) {
|
|
11710
|
-
return Prelude_Types_maybe(() => 1, () => $4 => 0, Data_List_find(
|
|
11847
|
+
return Prelude_Types_maybe(() => 1, () => $4 => 0, Data_List_find(csegen_751(), $0));
|
|
11711
11848
|
}
|
|
11712
11849
|
|
|
11713
11850
|
/* Commands.health : Config => Octokit => Promise' () */
|
|
@@ -11717,7 +11854,7 @@ function Commands_health($0, $1, $2, $3) {
|
|
|
11717
11854
|
|
|
11718
11855
|
/* Commands.graph : Config => Octokit => List GraphArg -> Promise' () */
|
|
11719
11856
|
function Commands_graph($0, $1, $2) {
|
|
11720
|
-
const $3 = Data_List_find(
|
|
11857
|
+
const $3 = Data_List_find(csegen_751(), $2);
|
|
11721
11858
|
return $8 => Commands_case__graph_22095($1, $2, $0, $3, Data_List_headx27(Prelude_Types_List_mapMaybeAppend({h: 0}, $14 => Commands_teamNameArg($14), $2)), $8);
|
|
11722
11859
|
}
|
|
11723
11860
|
|
|
@@ -11783,17 +11920,17 @@ function Commands_contribute($0, $1, $2, $3, $4) {
|
|
|
11783
11920
|
}
|
|
11784
11921
|
};
|
|
11785
11922
|
const $71 = Prelude_Types_List_filterAppend({h: 0}, $74, $12);
|
|
11786
|
-
const $7b = Prelude_Types_List_filterAppend({h: 0}, $7f =>
|
|
11923
|
+
const $7b = Prelude_Types_List_filterAppend({h: 0}, $7f => Commands_n__11530_22711_isNotIgnored($1, $2, $0, configx27, $7f), $71);
|
|
11787
11924
|
const $87 = Data_List_partition($8a => Data_PullRequest_isRequestedReviewer(myLogin, $8a), $7b);
|
|
11788
|
-
const $8f = Prelude_Interfaces_mapHom(
|
|
11925
|
+
const $8f = Prelude_Interfaces_mapHom(csegen_707(), $95 => Data_List_sortBy(csegen_758(), $95))($87);
|
|
11789
11926
|
let $70;
|
|
11790
11927
|
switch($53.h) {
|
|
11791
11928
|
case 0: /* nothing */ {
|
|
11792
|
-
$70 = () =>
|
|
11929
|
+
$70 = () => Commands_n__11530_22713_pickOne($1, $2, $0, configx27, $40, $4d, $8f.a1, $8f.a2);
|
|
11793
11930
|
break;
|
|
11794
11931
|
}
|
|
11795
11932
|
case undefined: /* just */ {
|
|
11796
|
-
$70 = () => $a5 => $a6 =>
|
|
11933
|
+
$70 = () => $a5 => $a6 => Commands_n__11530_22712_listSome($1, $2, $0, $40, $8f.a1, $8f.a2, $a5, $a6);
|
|
11797
11934
|
break;
|
|
11798
11935
|
}
|
|
11799
11936
|
}
|
|
@@ -11805,7 +11942,7 @@ function Commands_contribute($0, $1, $2, $3, $4) {
|
|
|
11805
11942
|
return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($30, $3f, $2d, $2e);
|
|
11806
11943
|
};
|
|
11807
11944
|
};
|
|
11808
|
-
return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($1e => $1f => Data_Promise_map_Functor_x28Promisex20x24ex29(
|
|
11945
|
+
return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($1e => $1f => Data_Promise_map_Functor_x28Promisex20x24ex29(csegen_455()(), FFI_GitHub_getSelf($1), $1e, $1f), $29, $1a, $1b);
|
|
11809
11946
|
};
|
|
11810
11947
|
};
|
|
11811
11948
|
return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(FFI_GitHub_listPullRequests($1, $0.a2, $0.a3, {a1: 0}, 100n, 0n), $11, $3, $4);
|
|
@@ -11819,7 +11956,7 @@ function Commands_branch($0, $1, $2) {
|
|
|
11819
11956
|
const $b = Prelude_Types_foldMap_Foldable_List(csegen_86()(), $11 => $11, {a1: 'https://github.com/', a2: {a1: $7, a2: {a1: '/', a2: {a1: $9, a2: {a1: '/tree/', a2: {a1: branch, a2: {h: 0}}}}}}});
|
|
11820
11957
|
return $1f => $20 => $21 => Data_Promise_liftIO_HasIO_x28Promisex20x24ex29($24 => Prelude_IO_prim__putStr(($b+'\n'), $24), $1f, $20, $21);
|
|
11821
11958
|
};
|
|
11822
|
-
return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(
|
|
11959
|
+
return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(csegen_693(), $6, $1, $2);
|
|
11823
11960
|
}
|
|
11824
11961
|
|
|
11825
11962
|
/* Commands.(<||>) : Alternative t => (a -> t b) -> (a -> t b) -> a -> t b */
|
|
@@ -12039,67 +12176,67 @@ function Data_SortedMap_Dependent_empty($0) {
|
|
|
12039
12176
|
|
|
12040
12177
|
/* Commands.User.Reflect.case block in case block in reflectOnSelf */
|
|
12041
12178
|
function Commands_User_Reflect_case__casex20blockx20inx20reflectOnSelf_1920($0, $1, $2, $3, $4, $5, $6, $7, $8, $9) {
|
|
12042
|
-
const $b = Prelude_Interfaces_mapHom(
|
|
12179
|
+
const $b = Prelude_Interfaces_mapHom(csegen_707(), $11 => Data_List_headx27(Data_List_sort({a1: {a1: $18 => $19 => Data_Date_x3dx3d_Eq_Date($18, $19), a2: $1e => $1f => Data_Date_x2fx3d_Eq_Date($1e, $1f)}, a2: $24 => $25 => Data_Date_compare_Ord_Date($24, $25), a3: $2a => $2b => Data_Date_x3c_Ord_Date($2a, $2b), a4: $30 => $31 => Data_Date_x3e_Ord_Date($30, $31), a5: $36 => $37 => Data_Date_x3cx3d_Ord_Date($36, $37), a6: $3c => $3d => Data_Date_x3ex3d_Ord_Date($3c, $3d), a7: $42 => $43 => Data_Date_max_Ord_Date($42, $43), a8: $48 => $49 => Data_Date_min_Ord_Date($48, $49)}, Prelude_Types_List_mapAppend({h: 0}, csegen_780(), $11))))({a1: $7, a2: $9.a1});
|
|
12043
12180
|
return Util_renderIO($0, csegen_48()(), Commands_User_Reflect_print(Prelude_Types_String_length(Commands_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, $0));
|
|
12044
12181
|
}
|
|
12045
12182
|
|
|
12046
|
-
/* Commands.User.Me.
|
|
12047
|
-
function
|
|
12183
|
+
/* Commands.User.Me.7792:2049:ul */
|
|
12184
|
+
function Commands_User_Me_n__7792_2049_ul($0, $1, $2, $3, $4) {
|
|
12048
12185
|
return Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_underline(), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String($4));
|
|
12049
12186
|
}
|
|
12050
12187
|
|
|
12051
|
-
/* Commands.User.Me.
|
|
12052
|
-
function
|
|
12053
|
-
return Text_PrettyPrint_Prettyprinter_Doc_vsep({a1:
|
|
12188
|
+
/* Commands.User.Me.7792:2048:teams */
|
|
12189
|
+
function Commands_User_Me_n__7792_2048_teams($0, $1, $2, $3) {
|
|
12190
|
+
return Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Commands_User_Me_n__7792_2049_ul($0, $1, $2, $3, 'GitHub Teams:'), a2: Prelude_Types_List_mapAppend({h: 0}, $11 => Commands_User_Me_n__7792_2046_it($0, $1, $2, $3, $11), $0)});
|
|
12054
12191
|
}
|
|
12055
12192
|
|
|
12056
|
-
/* Commands.User.Me.
|
|
12057
|
-
function
|
|
12058
|
-
return Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('GitHub Login:'),
|
|
12193
|
+
/* Commands.User.Me.7792:2047:login */
|
|
12194
|
+
function Commands_User_Me_n__7792_2047_login($0, $1, $2, $3) {
|
|
12195
|
+
return Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('GitHub Login:'), Commands_User_Me_n__7792_2043_dataVal($0, $1, $2, $3, $1.a1));
|
|
12059
12196
|
}
|
|
12060
12197
|
|
|
12061
|
-
/* Commands.User.Reflect.
|
|
12062
|
-
function
|
|
12198
|
+
/* Commands.User.Reflect.6847:1075:ital */
|
|
12199
|
+
function Commands_User_Reflect_n__6847_1075_ital($0, $1) {
|
|
12063
12200
|
return Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_italic(), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String($1));
|
|
12064
12201
|
}
|
|
12065
12202
|
|
|
12066
|
-
/* Commands.User.Me.
|
|
12067
|
-
function
|
|
12203
|
+
/* Commands.User.Me.7792:2046:it */
|
|
12204
|
+
function Commands_User_Me_n__7792_2046_it($0, $1, $2, $3, $4) {
|
|
12068
12205
|
return Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_italic(), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String($4));
|
|
12069
12206
|
}
|
|
12070
12207
|
|
|
12071
|
-
/* Commands.User.Me.
|
|
12072
|
-
function
|
|
12208
|
+
/* Commands.User.Me.7942:2196:handleUnsetEmail */
|
|
12209
|
+
function Commands_User_Me_n__7942_2196_handleUnsetEmail($0, $1, $2) {
|
|
12073
12210
|
switch($2) {
|
|
12074
12211
|
case '': return {h: 0};
|
|
12075
12212
|
default: return {a1: $2};
|
|
12076
12213
|
}
|
|
12077
12214
|
}
|
|
12078
12215
|
|
|
12079
|
-
/* Commands.User.Me.
|
|
12080
|
-
function
|
|
12081
|
-
return Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('GitHub Name:'),
|
|
12216
|
+
/* Commands.User.Me.7792:2045:fullName */
|
|
12217
|
+
function Commands_User_Me_n__7792_2045_fullName($0, $1, $2, $3) {
|
|
12218
|
+
return Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('GitHub Name:'), Commands_User_Me_n__7792_2043_dataVal($0, $1, $2, $3, $1.a2));
|
|
12082
12219
|
}
|
|
12083
12220
|
|
|
12084
|
-
/* Commands.User.Me.
|
|
12085
|
-
function
|
|
12221
|
+
/* Commands.User.Me.7792:2044:email */
|
|
12222
|
+
function Commands_User_Me_n__7792_2044_email($0, $1, $2, $3) {
|
|
12086
12223
|
let $8;
|
|
12087
12224
|
switch($2.h) {
|
|
12088
12225
|
case undefined: /* just */ {
|
|
12089
|
-
$8 =
|
|
12226
|
+
$8 = Commands_User_Me_n__7792_2043_dataVal($0, $1, $2, $3, $2.a1);
|
|
12090
12227
|
break;
|
|
12091
12228
|
}
|
|
12092
12229
|
case 0: /* nothing */ {
|
|
12093
|
-
$8 =
|
|
12230
|
+
$8 = Commands_User_Me_n__7792_2046_it($0, $1, $2, $3, 'Not set');
|
|
12094
12231
|
break;
|
|
12095
12232
|
}
|
|
12096
12233
|
}
|
|
12097
12234
|
return Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('Git Email:'), $8);
|
|
12098
12235
|
}
|
|
12099
12236
|
|
|
12100
|
-
/* Commands.User.Me.
|
|
12101
|
-
function
|
|
12102
|
-
return Theme_theme($3,
|
|
12237
|
+
/* Commands.User.Me.7792:2043:dataVal */
|
|
12238
|
+
function Commands_User_Me_n__7792_2043_dataVal($0, $1, $2, $3, $4) {
|
|
12239
|
+
return Theme_theme($3, csegen_783(), csegen_784(), 8)(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String($4));
|
|
12103
12240
|
}
|
|
12104
12241
|
|
|
12105
12242
|
/* Commands.User.Reflect.rightTitle : String */
|
|
@@ -12122,20 +12259,20 @@ function Commands_User_Reflect_reflectOnSelf($0, $1, $2, $3) {
|
|
|
12122
12259
|
const $c = prs => $d => $e => {
|
|
12123
12260
|
const $1c = myLogin => $1d => $1e => {
|
|
12124
12261
|
const $3a = reviews => {
|
|
12125
|
-
const $3b = Prelude_Types_map_Functor_Maybe(
|
|
12126
|
-
const $4e = Prelude_Interfaces_mapHom(
|
|
12127
|
-
return Commands_User_Reflect_case__casex20blockx20inx20reflectOnSelf_1920($0, $1, prs, myLogin, reviews, $3b, prs, $4e.a1, $4e.a2, Prelude_Interfaces_mapHom(
|
|
12262
|
+
const $3b = Prelude_Types_map_Functor_Maybe(csegen_786(), Data_List_headx27(Data_List_sortBy($44 => $45 => Prelude_Basics_on(csegen_756(), csegen_786(), $44, $45), reviews)));
|
|
12263
|
+
const $4e = Prelude_Interfaces_mapHom(csegen_707(), $54 => Prelude_Types_List_filterAppend({h: 0}, $58 => Prelude_EqOrd_x3dx3d_Eq_String($58.a5, myLogin), $54))(prs);
|
|
12264
|
+
return Commands_User_Reflect_case__casex20blockx20inx20reflectOnSelf_1920($0, $1, prs, myLogin, reviews, $3b, prs, $4e.a1, $4e.a2, Prelude_Interfaces_mapHom(csegen_707(), $6f => Prelude_Types_List_filterAppend({h: 0}, $73 => Prelude_Types_foldMap_Foldable_List(csegen_115(), $78 => Prelude_EqOrd_x3dx3d_Eq_String($78, myLogin), $73.a7), $6f))(prs));
|
|
12128
12265
|
};
|
|
12129
|
-
return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(Commands_PullRequest_reviewsByUser($0, $1, myLogin, Data_List_take(Commands_User_Reflect_reviewDetailsCount(), Prelude_Types_List_reverse(Data_List_sortBy($2e => $2f => Prelude_Basics_on(
|
|
12266
|
+
return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(Commands_PullRequest_reviewsByUser($0, $1, myLogin, Data_List_take(Commands_User_Reflect_reviewDetailsCount(), Prelude_Types_List_reverse(Data_List_sortBy($2e => $2f => Prelude_Basics_on(csegen_756(), csegen_780(), $2e, $2f), Commands_PullRequest_combined(prs))))), $3a, $1d, $1e);
|
|
12130
12267
|
};
|
|
12131
|
-
return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($11 => $12 => Data_Promise_map_Functor_x28Promisex20x24ex29(
|
|
12268
|
+
return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($11 => $12 => Data_Promise_map_Functor_x28Promisex20x24ex29(csegen_455()(), FFI_GitHub_getSelf($1), $11, $12), $1c, $d, $e);
|
|
12132
12269
|
};
|
|
12133
12270
|
return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(Commands_PullRequest_listPartitionedPRs($0, $1, 4n, Commands_User_Reflect_prCount()), $c, $2, $3);
|
|
12134
12271
|
}
|
|
12135
12272
|
|
|
12136
12273
|
/* Commands.User.Me.printInfoOnSelf : Config => Octokit => Promise' () */
|
|
12137
12274
|
function Commands_User_Me_printInfoOnSelf($0, $1, $2, $3) {
|
|
12138
|
-
return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($6 => $7 => Data_Promise_map_Functor_x28Promisex20x24ex29($a =>
|
|
12275
|
+
return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($6 => $7 => Data_Promise_map_Functor_x28Promisex20x24ex29($a => Commands_User_Me_n__7942_2196_handleUnsetEmail($1, $0, $a), $10 => $11 => System_Git_userEmail($10, $11), $6, $7), gitEmail => $18 => $19 => Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(FFI_GitHub_getSelf($1), githubUser => $1f => $20 => Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($23 => $24 => Data_Promise_map_Functor_x28Promisex20x24ex29(csegen_742(), $29 => $2a => FFI_GitHub_listMyTeams($1, $29, $2a), $23, $24), githubTeams => Util_renderIO($0, csegen_48()(), Commands_User_Me_print($0, gitEmail, githubUser, githubTeams)), $1f, $20), $18, $19), $2, $3);
|
|
12139
12276
|
}
|
|
12140
12277
|
|
|
12141
12278
|
/* Commands.User.Reflect.print : Nat -> Nat -> Nat -> Nat -> Nat -> Nat -> Maybe Date -> Maybe Date -> Maybe Date -> Config =>
|
|
@@ -12146,7 +12283,7 @@ function Commands_User_Reflect_print($0, $1, $2, $3, $4, $5, $6, $7, $8, $9) {
|
|
|
12146
12283
|
|
|
12147
12284
|
/* Commands.User.Me.print : Config -> Maybe String -> User -> List String -> Doc AnsiStyle */
|
|
12148
12285
|
function Commands_User_Me_print($0, $1, $2, $3) {
|
|
12149
|
-
return Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {a1:
|
|
12286
|
+
return Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {a1: Commands_User_Me_n__7792_2044_email($3, $2, $1, $0), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {a1: Commands_User_Me_n__7792_2045_fullName($3, $2, $1, $0), a2: {a1: Commands_User_Me_n__7792_2047_login($3, $2, $1, $0), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {a1: Commands_User_Me_n__7792_2048_teams($3, $2, $1, $0), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {h: 0}}}}}}}}});
|
|
12150
12287
|
}
|
|
12151
12288
|
|
|
12152
12289
|
/* Commands.User.Reflect.prCount : Fin 101 */
|
|
@@ -12166,7 +12303,7 @@ const Commands_User_Reflect_intro = __lazy(function () {
|
|
|
12166
12303
|
|
|
12167
12304
|
/* Commands.User.Reflect.header : Nat -> Doc AnsiStyle */
|
|
12168
12305
|
function Commands_User_Reflect_header($0) {
|
|
12169
|
-
return Text_PrettyPrint_Prettyprinter_Doc_indent(Number(_truncBigInt32($0)), Text_PrettyPrint_Prettyprinter_Doc_hsep({a1:
|
|
12306
|
+
return Text_PrettyPrint_Prettyprinter_Doc_indent(Number(_truncBigInt32($0)), Text_PrettyPrint_Prettyprinter_Doc_hsep({a1: Commands_User_Reflect_n__6847_1075_ital($0, Commands_User_Reflect_leftTitle()), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(' '), a2: {a1: Commands_User_Reflect_n__6847_1075_ital($0, Commands_User_Reflect_rightTitle()), a2: {h: 0}}}}));
|
|
12170
12307
|
}
|
|
12171
12308
|
|
|
12172
12309
|
/* Commands.User.Reflect.graph : Nat -> Nat -> Nat -> Nat -> Nat -> Nat -> Config => Doc AnsiStyle */
|
|
@@ -12184,35 +12321,35 @@ function Commands_User_Reflect_graph($0, $1, $2, $3, $4, $5, $6) {
|
|
|
12184
12321
|
|
|
12185
12322
|
/* Commands.User.Reflect.details : Nat -> Nat -> Nat -> Nat -> Nat -> Nat -> Maybe Date -> Maybe Date -> Maybe Date -> Doc AnsiStyle */
|
|
12186
12323
|
function Commands_User_Reflect_details($0, $1, $2, $3, $4, $5, $6, $7, $8) {
|
|
12187
|
-
return Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(Commands_User_Reflect_intro()), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_underline(), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('Requested Reviews:')), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_indent(2, Text_PrettyPrint_Prettyprinter_Doc_vsep(Data_List_catMaybes({a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('unreviewed:')}, a2: {a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_indent(2, Text_PrettyPrint_Prettyprinter_Doc_vsep(Data_List_catMaybes({a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_hsep({a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('open:'), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_color(3), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_Nat($2)), a2: {h: 0}}})}, a2: {a1: Prelude_Types_map_Functor_Maybe(
|
|
12324
|
+
return Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(Commands_User_Reflect_intro()), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_underline(), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('Requested Reviews:')), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_indent(2, Text_PrettyPrint_Prettyprinter_Doc_vsep(Data_List_catMaybes({a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('unreviewed:')}, a2: {a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_indent(2, Text_PrettyPrint_Prettyprinter_Doc_vsep(Data_List_catMaybes({a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_hsep({a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('open:'), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_color(3), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_Nat($2)), a2: {h: 0}}})}, a2: {a1: Prelude_Types_map_Functor_Maybe(csegen_793(), $8), a2: {a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_hsep({a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('closed:'), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_color(1), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_Nat($3)), a2: {h: 0}}})}, a2: {h: 0}}}})))}, a2: {a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_hsep({a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('reviews*:'), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_color(2), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_Nat($1)), a2: {h: 0}}})}, a2: {a1: Prelude_Types_map_Functor_Maybe(date => Text_PrettyPrint_Prettyprinter_Doc_indent(2, Text_PrettyPrint_Prettyprinter_Doc_hsep({a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('most recent:'), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(Data_Date_show_Show_Date(date)), a2: {h: 0}}})), $6), a2: {h: 0}}}}}))), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_underline(), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('Authored Pulls:')), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_indent(2, Text_PrettyPrint_Prettyprinter_Doc_vsep(Data_List_catMaybes({a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_hsep({a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('open:'), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_color(3), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_Nat($5)), a2: {h: 0}}})}, a2: {a1: Prelude_Types_map_Functor_Maybe(csegen_793(), $7), a2: {a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_hsep({a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('closed:'), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_color(2), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_Nat($4)), a2: {h: 0}}})}, a2: {h: 0}}}}))), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_italic(), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(Prelude_Types_foldMap_Foldable_List(csegen_86()(), $d0 => $d0, {a1: '*review count (not PR count) of most recent ', a2: {a1: Data_Fin_show_Show_x28Finx20x24nx29(Commands_User_Reflect_reviewDetailsCount()), a2: {a1: ' PRs.', a2: {h: 0}}}}))), a2: {h: 0}}}}}}}}}});
|
|
12188
12325
|
}
|
|
12189
12326
|
|
|
12190
12327
|
/* Commands.User.Reflect.chart : Nat -> Nat -> Nat -> Nat -> Nat -> Nat -> Config => Nat -> Doc AnsiStyle */
|
|
12191
12328
|
function Commands_User_Reflect_chart($0, $1, $2, $3, $4, $5, $6, $7) {
|
|
12192
|
-
return Text_PrettyPrint_Prettyprinter_Doc_indent(Number(_truncBigInt32($7)), Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29(Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29(Commands_User_replicatex27($6,
|
|
12329
|
+
return Text_PrettyPrint_Prettyprinter_Doc_indent(Number(_truncBigInt32($7)), Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29(Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29(Commands_User_replicatex27($6, csegen_783(), csegen_803(), 4, $1, '\u{b7}'), Commands_User_replicatex27($6, csegen_804(), csegen_804(), 7, $3, '\u{25e6}')), Commands_User_replicatex27($6, csegen_805(), csegen_805(), 5, $2, '<')), Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('|'), Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29(Commands_User_replicatex27($6, csegen_805(), csegen_805(), 5, $5, '>'), Commands_User_replicatex27($6, csegen_783(), csegen_803(), 4, $4, '\u{b7}')))));
|
|
12193
12330
|
}
|
|
12194
12331
|
|
|
12195
|
-
/* Theme.
|
|
12196
|
-
function
|
|
12332
|
+
/* Theme.4553:1352:maybeAnnotate */
|
|
12333
|
+
function Theme_n__4553_1352_maybeAnnotate($0, $1, $2, $3, $4) {
|
|
12197
12334
|
return Prelude_Types_maybe(() => $7 => $7, () => $9 => $a => Text_PrettyPrint_Prettyprinter_Doc_annotate($3($9), $a), $4);
|
|
12198
12335
|
}
|
|
12199
12336
|
|
|
12200
|
-
/* Theme.
|
|
12201
|
-
function
|
|
12337
|
+
/* Theme.4553:1351:go */
|
|
12338
|
+
function Theme_n__4553_1351_go($0, $1, $2, $3, $4, $5, $6) {
|
|
12202
12339
|
switch($3) {
|
|
12203
|
-
case 1: return $8 =>
|
|
12204
|
-
case 0: return $f =>
|
|
12340
|
+
case 1: return $8 => Theme_n__4553_1350_colorsAnn($0, $1, $2, $4, $8);
|
|
12341
|
+
case 0: return $f => Theme_n__4553_1350_colorsAnn($0, $1, $2, $5, $f);
|
|
12205
12342
|
}
|
|
12206
12343
|
}
|
|
12207
12344
|
|
|
12208
|
-
/* Theme.
|
|
12209
|
-
function
|
|
12210
|
-
return
|
|
12345
|
+
/* Theme.4553:1350:colorsAnn */
|
|
12346
|
+
function Theme_n__4553_1350_colorsAnn($0, $1, $2, $3, $4) {
|
|
12347
|
+
return Theme_n__4553_1352_maybeAnnotate($0, $1, $2, $c => Text_PrettyPrint_Prettyprinter_Render_Terminal_color($c), $3.a1)(Theme_n__4553_1352_maybeAnnotate($0, $1, $2, $17 => Text_PrettyPrint_Prettyprinter_Render_Terminal_bgColor($17), $3.a2)($4));
|
|
12211
12348
|
}
|
|
12212
12349
|
|
|
12213
12350
|
/* Theme.theme : Config => SemanticColor d l -> Doc AnsiStyle -> Doc AnsiStyle */
|
|
12214
12351
|
function Theme_theme($0, $1, $2, $3) {
|
|
12215
|
-
return
|
|
12352
|
+
return Theme_n__4553_1351_go($1, $2, $0.a18, $0.a18, $1, $2, $3);
|
|
12216
12353
|
}
|
|
12217
12354
|
|
|
12218
12355
|
/* Theme.cs : (colors : List Color) -> Either (length colors = 1) (length colors = 2) =>
|
|
@@ -12275,70 +12412,70 @@ function Commands_PullRequest_case__githubInferredBranchInfo_3775($0, $1, $2, $3
|
|
|
12275
12412
|
return $6 => {
|
|
12276
12413
|
switch($4.h) {
|
|
12277
12414
|
case 0: /* nothing */ return Data_Promise_pure_Applicative_x28Promisex20x24ex29(Commands_PullRequest_noInferredData(), $5, $6);
|
|
12278
|
-
case undefined: /* just */ return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(FFI_GitHub_getIssue($0, $3.a2, $3.a3, $4.a1), issue => $17 => $18 => Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($1b => $1c =>
|
|
12415
|
+
case undefined: /* just */ return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(FFI_GitHub_getIssue($0, $3.a2, $3.a3, $4.a1), issue => $17 => $18 => Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($1b => $1c => Commands_PullRequest_n__11924_3543_issueDescriptionPrefix($0, $1, $2, $3, issue, $1b, $1c), $26 => $27 => $28 => Data_Promise_pure_Applicative_x28Promisex20x24ex29({a1: {h: 0}, a2: {a1: ($26+('\n\n'+Commands_PullRequest_n__11924_3546_relatedToPrefix($0, $1, $2, $3, $4.a1)))}, a3: {a1: (Commands_PullRequest_n__11924_3547_titlePrefix($0, $1, $2, $3)+issue.a2)}}, $27, $28), $17, $18), $5, $6);
|
|
12279
12416
|
}
|
|
12280
12417
|
};
|
|
12281
12418
|
}
|
|
12282
12419
|
|
|
12283
|
-
/* Commands.PullRequest.
|
|
12284
|
-
function
|
|
12420
|
+
/* Commands.PullRequest.10295:1999:userNotice */
|
|
12421
|
+
function Commands_PullRequest_n__10295_1999_userNotice($0, $1, $2, $3, $4, $5, $6) {
|
|
12285
12422
|
switch($6.h) {
|
|
12286
12423
|
case 0: /* nothing */ {
|
|
12287
12424
|
switch($2.h) {
|
|
12288
12425
|
case 0: /* nil */ return 'no users';
|
|
12289
|
-
default: return Prelude_Types_foldMap_Foldable_List(csegen_86()(), $e => $e, {a1:
|
|
12426
|
+
default: return Prelude_Types_foldMap_Foldable_List(csegen_86()(), $e => $e, {a1: Commands_PullRequest_n__10295_1994_csv($0, $1, $2, $3, $4, $5, $2), a2: {h: 0}});
|
|
12290
12427
|
}
|
|
12291
12428
|
}
|
|
12292
|
-
case undefined: /* just */ return Prelude_Types_foldMap_Foldable_List(csegen_86()(), $1f => $1f, {a1:
|
|
12429
|
+
case undefined: /* just */ return Prelude_Types_foldMap_Foldable_List(csegen_86()(), $1f => $1f, {a1: Commands_PullRequest_n__10295_1994_csv($0, $1, $2, $3, $4, $5, {a1: $6.a1, a2: $2}), a2: {h: 0}});
|
|
12293
12430
|
}
|
|
12294
12431
|
}
|
|
12295
12432
|
|
|
12296
|
-
/* Commands.PullRequest.
|
|
12297
|
-
function
|
|
12433
|
+
/* Commands.PullRequest.11924:3547:titlePrefix */
|
|
12434
|
+
function Commands_PullRequest_n__11924_3547_titlePrefix($0, $1, $2, $3) {
|
|
12298
12435
|
switch(Util_Github_isBugfixBranch($2)) {
|
|
12299
12436
|
case 1: return Prelude_Types_maybe(() => '', () => $a => ($a+' '), $3.a10);
|
|
12300
12437
|
case 0: return '';
|
|
12301
12438
|
}
|
|
12302
12439
|
}
|
|
12303
12440
|
|
|
12304
|
-
/* Commands.PullRequest.
|
|
12305
|
-
function
|
|
12441
|
+
/* Commands.PullRequest.11453:3083:terminus */
|
|
12442
|
+
function Commands_PullRequest_n__11453_3083_terminus($0, $1, $2, $3) {
|
|
12306
12443
|
return '\u{2a00}';
|
|
12307
12444
|
}
|
|
12308
12445
|
|
|
12309
|
-
/* Commands.PullRequest.
|
|
12310
|
-
function
|
|
12446
|
+
/* Commands.PullRequest.10295:1998:teamNotice */
|
|
12447
|
+
function Commands_PullRequest_n__10295_1998_teamNotice($0, $1, $2, $3, $4, $5, $6) {
|
|
12311
12448
|
switch($6.h) {
|
|
12312
12449
|
case 0: /* nil */ return '';
|
|
12313
12450
|
case undefined: /* cons */ {
|
|
12314
12451
|
switch($6.a2.h) {
|
|
12315
|
-
case 0: /* nil */ return Prelude_Types_foldMap_Foldable_List(csegen_86()(), $e => $e, {a1: ' and team ', a2: {a1:
|
|
12316
|
-
default: return Prelude_Types_foldMap_Foldable_List(csegen_86()(), $23 => $23, {a1: ' and teams ', a2: {a1:
|
|
12452
|
+
case 0: /* nil */ return Prelude_Types_foldMap_Foldable_List(csegen_86()(), $e => $e, {a1: ' and team ', a2: {a1: Commands_PullRequest_n__10295_1994_csv($0, $1, $2, $3, $4, $5, {a1: $6.a1, a2: {h: 0}}), a2: {h: 0}}});
|
|
12453
|
+
default: return Prelude_Types_foldMap_Foldable_List(csegen_86()(), $23 => $23, {a1: ' and teams ', a2: {a1: Commands_PullRequest_n__10295_1994_csv($0, $1, $2, $3, $4, $5, $6), a2: {h: 0}}});
|
|
12317
12454
|
}
|
|
12318
12455
|
}
|
|
12319
|
-
default: return Prelude_Types_foldMap_Foldable_List(csegen_86()(), $36 => $36, {a1: ' and teams ', a2: {a1:
|
|
12456
|
+
default: return Prelude_Types_foldMap_Foldable_List(csegen_86()(), $36 => $36, {a1: ' and teams ', a2: {a1: Commands_PullRequest_n__10295_1994_csv($0, $1, $2, $3, $4, $5, $6), a2: {h: 0}}});
|
|
12320
12457
|
}
|
|
12321
12458
|
}
|
|
12322
12459
|
|
|
12323
|
-
/* Commands.PullRequest.
|
|
12324
|
-
function
|
|
12460
|
+
/* Commands.PullRequest.11531:3151:shellIndent */
|
|
12461
|
+
function Commands_PullRequest_n__11531_3151_shellIndent($0, $1, $2, $3) {
|
|
12325
12462
|
return Text_PrettyPrint_Prettyprinter_Doc_indent(Number(_truncBigInt32((($2*4n)+1n))), $3);
|
|
12326
12463
|
}
|
|
12327
12464
|
|
|
12328
|
-
/* Commands.PullRequest.
|
|
12329
|
-
function
|
|
12465
|
+
/* Commands.PullRequest.11531:3150:renderNode */
|
|
12466
|
+
function Commands_PullRequest_n__11531_3150_renderNode($0, $1, $2, $3) {
|
|
12330
12467
|
switch($3.h) {
|
|
12331
12468
|
case 0: /* Branch */ {
|
|
12332
|
-
const $6 = Prelude_Types_maybe(() => '', () => t => ('\n'+
|
|
12469
|
+
const $6 = Prelude_Types_maybe(() => '', () => t => ('\n'+Commands_PullRequest_n__11531_3149_mdIndent($0, $1, $2.a1, Prelude_Types_foldMap_Foldable_List(csegen_86()(), $16 => $16, {a1: '**', a2: {a1: t, a2: {a1: '**', a2: {h: 0}}}}))), $3.a3);
|
|
12333
12470
|
const $1f = str => ({a1: ($2.a1+1n), a2: ($2.a2+(str+'\n'))});
|
|
12334
12471
|
let $29;
|
|
12335
12472
|
switch($0) {
|
|
12336
12473
|
case 0: {
|
|
12337
|
-
$29 =
|
|
12474
|
+
$29 = Commands_PullRequest_n__11531_3149_mdIndent($0, $1, $2.a1, Prelude_Types_foldMap_Foldable_List(csegen_86()(), $35 => $35, {a1: $3.a1, a2: {a1: ' `', a2: {a1: $3.a2, a2: {a1: '`', a2: {a1: $6, a2: {h: 0}}}}}}));
|
|
12338
12475
|
break;
|
|
12339
12476
|
}
|
|
12340
12477
|
case 1: {
|
|
12341
|
-
$29 = Util_renderString($1,
|
|
12478
|
+
$29 = Util_renderString($1, Commands_PullRequest_n__11531_3151_shellIndent($0, $1, $2.a1, Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String($3.a1), Theme_n__4553_1351_go(csegen_807(), csegen_807(), 0, 0, csegen_807(), csegen_807(), 9)(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(Data_Maybe_fromMaybe(() => $3.a2, $3.a3))))));
|
|
12342
12479
|
break;
|
|
12343
12480
|
}
|
|
12344
12481
|
}
|
|
@@ -12350,11 +12487,11 @@ function Commands_PullRequest_n__11513_3150_renderNode($0, $1, $2, $3) {
|
|
|
12350
12487
|
let $72;
|
|
12351
12488
|
switch($0) {
|
|
12352
12489
|
case 0: {
|
|
12353
|
-
$72 = (
|
|
12490
|
+
$72 = (Commands_PullRequest_n__11531_3149_mdIndent($0, $1, $2.a1, Prelude_Types_foldMap_Foldable_List(csegen_86()(), $7f => $7f, {a1: $3.a1, a2: {a1: ' `', a2: {a1: $3.a2.a8, a2: {a1: '` (', a2: {a1: $6a, a2: {a1: ')', a2: {h: 0}}}}}}}))+('\n'+Commands_PullRequest_n__11531_3149_mdIndent($0, $1, $2.a1, Prelude_Types_foldMap_Foldable_List(csegen_86()(), $9b => $9b, {a1: '**', a2: {a1: $3.a2.a2, a2: {a1: '**', a2: {h: 0}}}}))));
|
|
12354
12491
|
break;
|
|
12355
12492
|
}
|
|
12356
12493
|
case 1: {
|
|
12357
|
-
$72 = Util_renderString($1,
|
|
12494
|
+
$72 = Util_renderString($1, Commands_PullRequest_n__11531_3151_shellIndent($0, $1, $2.a1, Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String($3.a1), Theme_n__4553_1351_go(csegen_783(), csegen_784(), 0, 0, csegen_783(), csegen_784(), 8)(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String($3.a2.a2))), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_indent(2, Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('\u{2514}'), Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_italic(), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String($6a)))), a2: {h: 0}}})));
|
|
12358
12495
|
break;
|
|
12359
12496
|
}
|
|
12360
12497
|
}
|
|
@@ -12363,46 +12500,46 @@ function Commands_PullRequest_n__11513_3150_renderNode($0, $1, $2, $3) {
|
|
|
12363
12500
|
}
|
|
12364
12501
|
}
|
|
12365
12502
|
|
|
12366
|
-
/* Commands.PullRequest.
|
|
12367
|
-
function
|
|
12503
|
+
/* Commands.PullRequest.11924:3546:relatedToPrefix */
|
|
12504
|
+
function Commands_PullRequest_n__11924_3546_relatedToPrefix($0, $1, $2, $3, $4) {
|
|
12368
12505
|
return Prelude_Types_foldMap_Foldable_List(csegen_86()(), $a => $a, {a1: 'Related to #', a2: {a1: $4, a2: {h: 0}}});
|
|
12369
12506
|
}
|
|
12370
12507
|
|
|
12371
|
-
/* Commands.PullRequest.
|
|
12372
|
-
function
|
|
12373
|
-
return Util_Prompting_offerRetry(csegen_48()(), 'PR title cannot be an empty string.', Prelude_Types_foldMap_Foldable_List(csegen_86()(), $11 => $11, {a1: 'Did not find a non-empty value for a PR title. Will use \'', a2: {a1: 'New PR', a2: {a1: '\'', a2: {h: 0}}}}), () => 'New PR', $1b => $1c => Data_Promise_map_Functor_x28Promisex20x24ex29($1f =>
|
|
12508
|
+
/* Commands.PullRequest.12429:4029:prTitlePrompt */
|
|
12509
|
+
function Commands_PullRequest_n__12429_4029_prTitlePrompt($0, $1, $2, $3, $4, $5) {
|
|
12510
|
+
return Util_Prompting_offerRetry(csegen_48()(), 'PR title cannot be an empty string.', Prelude_Types_foldMap_Foldable_List(csegen_86()(), $11 => $11, {a1: 'Did not find a non-empty value for a PR title. Will use \'', a2: {a1: 'New PR', a2: {a1: '\'', a2: {h: 0}}}}), () => 'New PR', $1b => $1c => Data_Promise_map_Functor_x28Promisex20x24ex29($1f => Commands_PullRequest_n__12429_4028_notEmptyString($0, $1, $2, $3, $4, $1f), Util_Prompting_getLineEnterForDefault(csegen_48()(), 'What would you like the title to be?', $5), $1b, $1c));
|
|
12374
12511
|
}
|
|
12375
12512
|
|
|
12376
|
-
/* Commands.PullRequest.
|
|
12377
|
-
function
|
|
12513
|
+
/* Commands.PullRequest.10295:1997:prComment */
|
|
12514
|
+
function Commands_PullRequest_n__10295_1997_prComment($0, $1, $2, $3, $4, $5, $6) {
|
|
12378
12515
|
return Prelude_Types_foldMap_Foldable_List(csegen_86()(), $c => $c, {a1: ':musical_note: Harmoniously requested review from ', a2: {a1: $6, a2: {a1: '.', a2: {h: 0}}}});
|
|
12379
12516
|
}
|
|
12380
12517
|
|
|
12381
|
-
/* Commands.PullRequest.
|
|
12382
|
-
function
|
|
12518
|
+
/* Commands.PullRequest.12429:4028:notEmptyString */
|
|
12519
|
+
function Commands_PullRequest_n__12429_4028_notEmptyString($0, $1, $2, $3, $4, $5) {
|
|
12383
12520
|
switch($5) {
|
|
12384
12521
|
case '': return {h: 0};
|
|
12385
12522
|
default: return {a1: $5};
|
|
12386
12523
|
}
|
|
12387
12524
|
}
|
|
12388
12525
|
|
|
12389
|
-
/* Commands.PullRequest.
|
|
12390
|
-
function
|
|
12391
|
-
return
|
|
12526
|
+
/* Commands.PullRequest.10295:1996:namePrComment */
|
|
12527
|
+
function Commands_PullRequest_n__10295_1996_namePrComment($0, $1, $2, $3, $4, $5, $6) {
|
|
12528
|
+
return Commands_PullRequest_n__10295_1997_prComment($0, $1, $2, $3, $4, $5, Prelude_Types_foldMap_Foldable_List(csegen_86()(), $14 => $14, {a1: $6.a2, a2: {h: 0}}));
|
|
12392
12529
|
}
|
|
12393
12530
|
|
|
12394
|
-
/* Commands.PullRequest.
|
|
12395
|
-
function
|
|
12396
|
-
return
|
|
12531
|
+
/* Commands.PullRequest.10295:1995:mentionPrComment */
|
|
12532
|
+
function Commands_PullRequest_n__10295_1995_mentionPrComment($0, $1, $2, $3, $4, $5, $6) {
|
|
12533
|
+
return Commands_PullRequest_n__10295_1997_prComment($0, $1, $2, $3, $4, $5, Prelude_Types_foldMap_Foldable_List(csegen_86()(), $14 => $14, {a1: '@', a2: {a1: $6, a2: {h: 0}}}));
|
|
12397
12534
|
}
|
|
12398
12535
|
|
|
12399
|
-
/* Commands.PullRequest.
|
|
12400
|
-
function
|
|
12536
|
+
/* Commands.PullRequest.11531:3149:mdIndent */
|
|
12537
|
+
function Commands_PullRequest_n__11531_3149_mdIndent($0, $1, $2, $3) {
|
|
12401
12538
|
return ((Data_String_replicate(($2+1n), '>')+' ')+$3);
|
|
12402
12539
|
}
|
|
12403
12540
|
|
|
12404
|
-
/* Commands.PullRequest.
|
|
12405
|
-
function
|
|
12541
|
+
/* Commands.PullRequest.11924:3545:maybePrTree */
|
|
12542
|
+
function Commands_PullRequest_n__11924_3545_maybePrTree($0, $1, $2, $3, $4, $5) {
|
|
12406
12543
|
return $6 => {
|
|
12407
12544
|
let $7;
|
|
12408
12545
|
switch($3.a11) {
|
|
@@ -12429,57 +12566,57 @@ function Commands_PullRequest_n__11906_3545_maybePrTree($0, $1, $2, $3, $4, $5)
|
|
|
12429
12566
|
};
|
|
12430
12567
|
}
|
|
12431
12568
|
|
|
12432
|
-
/* Commands.PullRequest.
|
|
12433
|
-
function
|
|
12569
|
+
/* Commands.PullRequest.11924:3544:issueNumber */
|
|
12570
|
+
function Commands_PullRequest_n__11924_3544_issueNumber($0, $1, $2, $3) {
|
|
12434
12571
|
return Util_Github_parseGithubIssueNumber($2);
|
|
12435
12572
|
}
|
|
12436
12573
|
|
|
12437
|
-
/* Commands.PullRequest.
|
|
12438
|
-
function
|
|
12439
|
-
return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($9 =>
|
|
12574
|
+
/* Commands.PullRequest.11924:3543:issueDescriptionPrefix */
|
|
12575
|
+
function Commands_PullRequest_n__11924_3543_issueDescriptionPrefix($0, $1, $2, $3, $4, $5, $6) {
|
|
12576
|
+
return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($9 => Commands_PullRequest_n__11924_3545_maybePrTree($0, $1, $2, $3, $4, $9), maybeTree => $12 => $13 => Data_Promise_pure_Applicative_x28Promisex20x24ex29(Prelude_Types_foldMap_Foldable_List(csegen_86()(), $1b => $1b, {a1: '<!--\n', a2: {a1: maybeTree, a2: {a1: '\n## GitHub Issue\n', a2: {a1: $4.a2, a2: {a1: '\n--\n', a2: {a1: $4.a3, a2: {a1: '\n-->', a2: {h: 0}}}}}}}}), $12, $13), $5, $6);
|
|
12440
12577
|
}
|
|
12441
12578
|
|
|
12442
|
-
/* Commands.PullRequest.
|
|
12443
|
-
function
|
|
12579
|
+
/* Commands.PullRequest.12322:3915:into */
|
|
12580
|
+
function Commands_PullRequest_n__12322_3915_into($0, $1, $2, $3) {
|
|
12444
12581
|
switch($0.h) {
|
|
12445
12582
|
case undefined: /* just */ return Prelude_Types_foldMap_Foldable_List(csegen_86()(), $a => $a, {a1: $0.a1, a2: {a1: '...', a2: {h: 0}}});
|
|
12446
12583
|
case 0: /* nothing */ return '';
|
|
12447
12584
|
}
|
|
12448
12585
|
}
|
|
12449
12586
|
|
|
12450
|
-
/* Commands.PullRequest.
|
|
12451
|
-
function
|
|
12587
|
+
/* Commands.PullRequest.12429:4027:inlineDescriptionPrompt */
|
|
12588
|
+
function Commands_PullRequest_n__12429_4027_inlineDescriptionPrompt($0, $1, $2, $3, $4) {
|
|
12452
12589
|
return 'What would you like the description to be (two blank lines to finish)?';
|
|
12453
12590
|
}
|
|
12454
12591
|
|
|
12455
|
-
/* Commands.PullRequest.
|
|
12456
|
-
function
|
|
12592
|
+
/* Commands.PullRequest.11453:3082:go */
|
|
12593
|
+
function Commands_PullRequest_n__11453_3082_go($0, $1, $2, $3, $4) {
|
|
12457
12594
|
switch($4.h) {
|
|
12458
12595
|
case 0: /* nil */ {
|
|
12459
12596
|
switch($3.h) {
|
|
12460
|
-
case undefined: /* just */ return {a1: {h: 0 /* Branch */, a1:
|
|
12597
|
+
case undefined: /* just */ return {a1: {h: 0 /* Branch */, a1: Commands_PullRequest_n__11453_3081_arrow($0, $1, $2, $3), a2: $3.a1, a3: $2}, a2: {h: 0}};
|
|
12461
12598
|
case 0: /* nothing */ return {h: 0};
|
|
12462
12599
|
}
|
|
12463
12600
|
}
|
|
12464
|
-
case undefined: /* cons */ return {a1: {h: 1 /* PR */, a1:
|
|
12601
|
+
case undefined: /* cons */ return {a1: {h: 1 /* PR */, a1: Commands_PullRequest_n__11453_3081_arrow($0, $1, $2, $3), a2: $4.a1}, a2: Commands_PullRequest_n__11453_3082_go($0, $1, $2, $3, $4.a2)};
|
|
12465
12602
|
}
|
|
12466
12603
|
}
|
|
12467
12604
|
|
|
12468
|
-
/* Commands.PullRequest.
|
|
12469
|
-
function
|
|
12605
|
+
/* Commands.PullRequest.12429:4026:getBaseBranch */
|
|
12606
|
+
function Commands_PullRequest_n__12429_4026_getBaseBranch($0, $1, $2, $3, $4, $5, $6) {
|
|
12470
12607
|
switch($2.h) {
|
|
12471
12608
|
case undefined: /* just */ return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($a => $b => $c => Data_Promise_liftIO_HasIO_x28Promisex20x24ex29($f => Prelude_IO_prim__putStr((Prelude_Types_foldMap_Foldable_List(csegen_86()(), $18 => $18, {a1: 'Will merge into ', a2: {a1: $2.a1, a2: {a1: '.', a2: {h: 0}}}})+'\n'), $f), $a, $b, $c), $26 => $27 => $28 => Data_Promise_pure_Applicative_x28Promisex20x24ex29($2.a1, $27, $28), $5, $6);
|
|
12472
|
-
case 0: /* nothing */ return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($31 => $32 => $33 => Data_Promise_liftIO_HasIO_x28Promisex20x24ex29($36 => Prelude_IO_prim__putStr((Prelude_Types_foldMap_Foldable_List(csegen_86()(), $3f => $3f, {a1: 'What branch are you merging into (ENTER for default: ', a2: {a1: $4.a5, a2: {a1: ')?', a2: {h: 0}}}})+'\n'), $36), $31, $32, $33), $4e => $4f => $50 => Data_Promise_map_Functor_x28Promisex20x24ex29($53 => Util_Prompting_orIfEmpty({a1: $4.a5}, Data_String_trim($53)),
|
|
12609
|
+
case 0: /* nothing */ return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($31 => $32 => $33 => Data_Promise_liftIO_HasIO_x28Promisex20x24ex29($36 => Prelude_IO_prim__putStr((Prelude_Types_foldMap_Foldable_List(csegen_86()(), $3f => $3f, {a1: 'What branch are you merging into (ENTER for default: ', a2: {a1: $4.a5, a2: {a1: ')?', a2: {h: 0}}}})+'\n'), $36), $31, $32, $33), $4e => $4f => $50 => Data_Promise_map_Functor_x28Promisex20x24ex29($53 => Util_Prompting_orIfEmpty({a1: $4.a5}, Data_String_trim($53)), csegen_498()(), $4f, $50), $5, $6);
|
|
12473
12610
|
}
|
|
12474
12611
|
}
|
|
12475
12612
|
|
|
12476
|
-
/* Commands.PullRequest.
|
|
12477
|
-
function
|
|
12613
|
+
/* Commands.PullRequest.10057:1725:forkedReviews */
|
|
12614
|
+
function Commands_PullRequest_n__10057_1725_forkedReviews($0, $1, $2, $3) {
|
|
12478
12615
|
return FFI_Concurrency_fork(csegen_48()(), ('reviews --json '+Prelude_Show_show_Show_Integer($3.a1)));
|
|
12479
12616
|
}
|
|
12480
12617
|
|
|
12481
|
-
/* Commands.PullRequest.
|
|
12482
|
-
function
|
|
12618
|
+
/* Commands.PullRequest.9480:1180:filterString */
|
|
12619
|
+
function Commands_PullRequest_n__9480_1180_filterString($0, $1, $2, $3, $4) {
|
|
12483
12620
|
switch($4.h) {
|
|
12484
12621
|
case 0: /* nothing */ return 'none';
|
|
12485
12622
|
case undefined: /* just */ {
|
|
@@ -12491,13 +12628,13 @@ function Commands_PullRequest_n__9462_1180_filterString($0, $1, $2, $3, $4) {
|
|
|
12491
12628
|
}
|
|
12492
12629
|
}
|
|
12493
12630
|
|
|
12494
|
-
/* Commands.PullRequest.
|
|
12495
|
-
function
|
|
12631
|
+
/* Commands.PullRequest.10295:1994:csv */
|
|
12632
|
+
function Commands_PullRequest_n__10295_1994_csv($0, $1, $2, $3, $4, $5, $6) {
|
|
12496
12633
|
return Util_renderString($5, Text_PrettyPrint_Prettyprinter_Doc_encloseSep(Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(', '), Prelude_Types_List_mapAppend({h: 0}, $16 => Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_color(2), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String($16)), $6)));
|
|
12497
12634
|
}
|
|
12498
12635
|
|
|
12499
|
-
/* Commands.PullRequest.
|
|
12500
|
-
function
|
|
12636
|
+
/* Commands.PullRequest.12429:4025:createPR */
|
|
12637
|
+
function Commands_PullRequest_n__12429_4025_createPR($0, $1, $2, $3, $4, $5, $6) {
|
|
12501
12638
|
const $38 = $39 => $3a => $3b => {
|
|
12502
12639
|
const $48 = $49 => $4a => $4b => {
|
|
12503
12640
|
switch($49) {
|
|
@@ -12527,11 +12664,11 @@ function Commands_PullRequest_n__12411_4025_createPR($0, $1, $2, $3, $4, $5, $6)
|
|
|
12527
12664
|
let $133;
|
|
12528
12665
|
switch($134.h) {
|
|
12529
12666
|
case 0: /* nothing */ {
|
|
12530
|
-
$133 = Util_Prompting_inlineDescription(csegen_48()(),
|
|
12667
|
+
$133 = Util_Prompting_inlineDescription(csegen_48()(), Commands_PullRequest_n__12429_4027_inlineDescriptionPrompt($0, $1, $2, $3, $4), $109);
|
|
12531
12668
|
break;
|
|
12532
12669
|
}
|
|
12533
12670
|
case undefined: /* just */ {
|
|
12534
|
-
$133 = $143 => $144 => Data_Promise_map_Functor_x28Promisex20x24ex29(
|
|
12671
|
+
$133 = $143 => $144 => Data_Promise_map_Functor_x28Promisex20x24ex29(csegen_832(), Util_Prompting_editorDescription(csegen_48()(), $134.a1, {a1: templateFilePath}, $109), $143, $144);
|
|
12535
12672
|
break;
|
|
12536
12673
|
}
|
|
12537
12674
|
}
|
|
@@ -12539,12 +12676,12 @@ function Commands_PullRequest_n__12411_4025_createPR($0, $1, $2, $3, $4, $5, $6)
|
|
|
12539
12676
|
};
|
|
12540
12677
|
return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($129 => $12a => Util_relativeToRoot('.github/PULL_REQUEST_TEMPLATE.md', $129, $12a), $12f, $125, $126);
|
|
12541
12678
|
};
|
|
12542
|
-
return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($112 => $113 => Data_Promise_map_Functor_x28Promisex20x24ex29($116 => ($104+$116),
|
|
12679
|
+
return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($112 => $113 => Data_Promise_map_Functor_x28Promisex20x24ex29($116 => ($104+$116), Commands_PullRequest_n__12429_4029_prTitlePrompt($0, $1, $2, $3, $4, inferredBranchInfo.a3), $112, $113), $124, $10e, $10f);
|
|
12543
12680
|
};
|
|
12544
12681
|
};
|
|
12545
12682
|
return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(Commands_PullRequest_getInferredBranchInfo($4, $0, $1, baseBranch), $103, $fa, $fb);
|
|
12546
12683
|
};
|
|
12547
|
-
return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($ef => $f0 =>
|
|
12684
|
+
return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($ef => $f0 => Commands_PullRequest_n__12429_4026_getBaseBranch($0, $1, $2, $3, $4, $ef, $f0), $f9, $eb, $ec);
|
|
12548
12685
|
};
|
|
12549
12686
|
return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($ce => $cf => $d0 => Data_Promise_liftIO_HasIO_x28Promisex20x24ex29($d3 => Prelude_IO_prim__putStr((Prelude_Types_foldMap_Foldable_List(csegen_86()(), $dc => $dc, {a1: 'Creating a new PR for the current branch (', a2: {a1: $1, a2: {a1: ').', a2: {h: 0}}}})+'\n'), $d3), $ce, $cf, $d0), $e9, $ca, $cb);
|
|
12550
12687
|
};
|
|
@@ -12553,51 +12690,51 @@ function Commands_PullRequest_n__12411_4025_createPR($0, $1, $2, $3, $4, $5, $6)
|
|
|
12553
12690
|
case 0: return Data_Promise_reject('Not creating a PR (for now)...', $5b, $5c);
|
|
12554
12691
|
}
|
|
12555
12692
|
};
|
|
12556
|
-
return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($4f => $50 =>
|
|
12693
|
+
return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($4f => $50 => Commands_PullRequest_n__12429_4023_continueGivenStagedChanges($0, $1, $2, $3, $4, $4f, $50), $59, $4a, $4b);
|
|
12557
12694
|
}
|
|
12558
12695
|
case 0: return Data_Promise_reject('Not creating a PR (for now)...', $4a, $4b);
|
|
12559
12696
|
}
|
|
12560
12697
|
};
|
|
12561
|
-
return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($3e => $3f =>
|
|
12698
|
+
return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($3e => $3f => Commands_PullRequest_n__12429_4024_continueGivenUncommittedChanges($0, $1, $2, $3, $4, $3e, $3f), $48, $3a, $3b);
|
|
12562
12699
|
};
|
|
12563
12700
|
return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($9 => $a => Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($d => $e => System_Git_remoteTrackingBranch($d, $e), $13 => Util_whenNothing(csegen_40()(), $13, $1a => $1b => Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($1e => $1f => $20 => Data_Promise_liftIO_HasIO_x28Promisex20x24ex29($23 => Prelude_IO_prim__putStr('Creating a new remote branch...\n', $23), $1e, $1f, $20), $2b => $2c => $2d => System_Git_pushNewBranch($4.a4, $1, $2c, $2d), $1a, $1b)), $9, $a), $38, $5, $6);
|
|
12564
12701
|
}
|
|
12565
12702
|
|
|
12566
|
-
/* Commands.PullRequest.
|
|
12567
|
-
function
|
|
12703
|
+
/* Commands.PullRequest.12429:4024:continueGivenUncommittedChanges */
|
|
12704
|
+
function Commands_PullRequest_n__12429_4024_continueGivenUncommittedChanges($0, $1, $2, $3, $4, $5, $6) {
|
|
12568
12705
|
const $e = $f => $10 => $11 => {
|
|
12569
12706
|
switch($f.h) {
|
|
12570
|
-
case undefined: /* just */ return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($15 => $16 => $17 => Data_Promise_liftIO_HasIO_x28Promisex20x24ex29($1a => Prelude_IO_prim__putStr('The following files have uncommitted changes:\n', $1a), $15, $16, $17), $22 => $23 => $24 => Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($27 => $28 => $29 => Data_Promise_liftIO_HasIO_x28Promisex20x24ex29($2c => Prelude_IO_prim__putStr(($f.a1+'\n'), $2c), $27, $28, $29),
|
|
12707
|
+
case undefined: /* just */ return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($15 => $16 => $17 => Data_Promise_liftIO_HasIO_x28Promisex20x24ex29($1a => Prelude_IO_prim__putStr('The following files have uncommitted changes:\n', $1a), $15, $16, $17), $22 => $23 => $24 => Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($27 => $28 => $29 => Data_Promise_liftIO_HasIO_x28Promisex20x24ex29($2c => Prelude_IO_prim__putStr(($f.a1+'\n'), $2c), $27, $28, $29), csegen_839(), $23, $24), $10, $11);
|
|
12571
12708
|
case 0: /* nothing */ return Data_Promise_pure_Applicative_x28Promisex20x24ex29(1, $10, $11);
|
|
12572
12709
|
}
|
|
12573
12710
|
};
|
|
12574
12711
|
return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($9 => $a => System_Git_uncommittedChanges($9, $a), $e, $5, $6);
|
|
12575
12712
|
}
|
|
12576
12713
|
|
|
12577
|
-
/* Commands.PullRequest.
|
|
12578
|
-
function
|
|
12714
|
+
/* Commands.PullRequest.12429:4023:continueGivenStagedChanges */
|
|
12715
|
+
function Commands_PullRequest_n__12429_4023_continueGivenStagedChanges($0, $1, $2, $3, $4, $5, $6) {
|
|
12579
12716
|
const $e = $f => $10 => $11 => {
|
|
12580
12717
|
switch($f.h) {
|
|
12581
|
-
case undefined: /* just */ return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($15 => $16 => $17 => Data_Promise_liftIO_HasIO_x28Promisex20x24ex29($1a => Prelude_IO_prim__putStr('The following files have staged but uncommitted changes:\n', $1a), $15, $16, $17), $22 => $23 => $24 => Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($27 => $28 => $29 => Data_Promise_liftIO_HasIO_x28Promisex20x24ex29($2c => Prelude_IO_prim__putStr(($f.a1+'\n'), $2c), $27, $28, $29),
|
|
12718
|
+
case undefined: /* just */ return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($15 => $16 => $17 => Data_Promise_liftIO_HasIO_x28Promisex20x24ex29($1a => Prelude_IO_prim__putStr('The following files have staged but uncommitted changes:\n', $1a), $15, $16, $17), $22 => $23 => $24 => Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($27 => $28 => $29 => Data_Promise_liftIO_HasIO_x28Promisex20x24ex29($2c => Prelude_IO_prim__putStr(($f.a1+'\n'), $2c), $27, $28, $29), csegen_839(), $23, $24), $10, $11);
|
|
12582
12719
|
case 0: /* nothing */ return Data_Promise_pure_Applicative_x28Promisex20x24ex29(1, $10, $11);
|
|
12583
12720
|
}
|
|
12584
12721
|
};
|
|
12585
12722
|
return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($9 => $a => System_Git_stagedChanges($9, $a), $e, $5, $6);
|
|
12586
12723
|
}
|
|
12587
12724
|
|
|
12588
|
-
/* Commands.PullRequest.
|
|
12589
|
-
function
|
|
12725
|
+
/* Commands.PullRequest.11453:3081:arrow */
|
|
12726
|
+
function Commands_PullRequest_n__11453_3081_arrow($0, $1, $2, $3) {
|
|
12590
12727
|
return '\u{2196}';
|
|
12591
12728
|
}
|
|
12592
12729
|
|
|
12593
12730
|
/* Commands.PullRequest.(.allReviewers) : PRHistory -> (List String, List String) */
|
|
12594
12731
|
function Commands_PullRequest_rf__allReviewers($0) {
|
|
12595
|
-
return Prelude_Interfaces_mapHom(
|
|
12732
|
+
return Prelude_Interfaces_mapHom(csegen_707(), $6 => Prelude_Types_join_Monad_List(Prelude_Types_List_mapAppend({h: 0}, $c => $c.a7, $6)))($0);
|
|
12596
12733
|
}
|
|
12597
12734
|
|
|
12598
12735
|
/* Commands.PullRequest.reviewsForPrs : Config => Octokit => List PullRequest -> Promise' (List Review) */
|
|
12599
12736
|
function Commands_PullRequest_reviewsForPrs($0, $1, $2, $3, $4) {
|
|
12600
|
-
return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(Prelude_Basics_flip(csegen_41()(),
|
|
12737
|
+
return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(Prelude_Basics_flip(csegen_41()(), csegen_744(), Prelude_Types_traverse_Traversable_List(csegen_40()(), $13 => Commands_PullRequest_n__10057_1725_forkedReviews($0, $1, $2, $13), $2)), reviewsJson => $1b => $1c => Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($1f => Data_Promise_either(Prelude_Types_traverse_Traversable_List(csegen_236(), $26 => Language_JSON_Accessors_array($29 => Data_Review_parseReview($29), $26), reviewsJson), $1f), reviews => $30 => $31 => Data_Promise_pure_Applicative_x28Promisex20x24ex29(Prelude_Types_join_Monad_List(reviews), $30, $31), $1b, $1c), $3, $4);
|
|
12601
12738
|
}
|
|
12602
12739
|
|
|
12603
12740
|
/* Commands.PullRequest.reviewsByUser : Config => Octokit => String -> List PullRequest -> Promise' (List Review) */
|
|
@@ -12627,9 +12764,9 @@ function Commands_PullRequest_reviewsByUser($0, $1, $2, $3) {
|
|
|
12627
12764
|
List PullRequest -> Promise' (SortedMap String (List Review)) */
|
|
12628
12765
|
function Commands_PullRequest_reviewsByEachUser($0, $1, $2, $3, $4) {
|
|
12629
12766
|
const $f = reviews => {
|
|
12630
|
-
const $10 = Data_List_groupAllWith(
|
|
12767
|
+
const $10 = Data_List_groupAllWith(csegen_409(), $15 => $15.a2, reviews);
|
|
12631
12768
|
const $18 = Prelude_Types_List_mapAppend({h: 0}, rs => ({a1: rs.a1.a2, a2: rs}), $10);
|
|
12632
|
-
return $21 => $22 => Data_Promise_pure_Applicative_x28Promisex20x24ex29(Data_SortedMap_fromList(
|
|
12769
|
+
return $21 => $22 => Data_Promise_pure_Applicative_x28Promisex20x24ex29(Data_SortedMap_fromList(csegen_409(), $18), $21, $22);
|
|
12633
12770
|
};
|
|
12634
12771
|
return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($7 => $8 => Commands_PullRequest_reviewsForPrs($0, $1, $2, $7, $8), $f, $3, $4);
|
|
12635
12772
|
}
|
|
@@ -12643,12 +12780,12 @@ function Commands_PullRequest_requestReviewers($0, $1, $2, $3, $4, $5, $6, $7) {
|
|
|
12643
12780
|
let $38;
|
|
12644
12781
|
switch($0.a7) {
|
|
12645
12782
|
case 1: {
|
|
12646
|
-
const $3b = Commands_Reviewer_chooseReviewers(
|
|
12783
|
+
const $3b = Commands_Reviewer_chooseReviewers(csegen_409(), $14.a2, $14.a1, teamMembers, {h: 0}, $2.a5);
|
|
12647
12784
|
$38 = Commands_Reviewer_randomReviewer(csegen_48()(), $3b);
|
|
12648
12785
|
break;
|
|
12649
12786
|
}
|
|
12650
12787
|
case 0: {
|
|
12651
|
-
$38 =
|
|
12788
|
+
$38 = csegen_502()();
|
|
12652
12789
|
break;
|
|
12653
12790
|
}
|
|
12654
12791
|
}
|
|
@@ -12684,8 +12821,8 @@ function Commands_PullRequest_requestReviewers($0, $1, $2, $3, $4, $5, $6, $7) {
|
|
|
12684
12821
|
return $7f => {
|
|
12685
12822
|
switch($0.a8) {
|
|
12686
12823
|
case 0: return Data_Promise_pure_Applicative_x28Promisex20x24ex29(undefined, $7d, $7f);
|
|
12687
|
-
case 2: return FFI_GitHub_createComment($1, $0.a2, $0.a3, $2.a1,
|
|
12688
|
-
case 1: return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(FFI_GitHub_getUser($1, chosenUser.a1), user => $9f => $a0 => FFI_GitHub_createComment($1, $0.a2, $0.a3, $2.a1,
|
|
12824
|
+
case 2: return FFI_GitHub_createComment($1, $0.a2, $0.a3, $2.a1, Commands_PullRequest_n__10295_1995_mentionPrComment($1, $5, $4, $3, $2, $0, chosenUser.a1), $7d, $7f);
|
|
12825
|
+
case 1: return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(FFI_GitHub_getUser($1, chosenUser.a1), user => $9f => $a0 => FFI_GitHub_createComment($1, $0.a2, $0.a3, $2.a1, Commands_PullRequest_n__10295_1996_namePrComment($1, $5, $4, $3, $2, $0, user), $9f, $a0), $7d, $7f);
|
|
12689
12826
|
}
|
|
12690
12827
|
};
|
|
12691
12828
|
}
|
|
@@ -12709,11 +12846,11 @@ function Commands_PullRequest_requestReviewers($0, $1, $2, $3, $4, $5, $6, $7) {
|
|
|
12709
12846
|
let $bf;
|
|
12710
12847
|
switch($c0) {
|
|
12711
12848
|
case 1: {
|
|
12712
|
-
$bf = () => $c5 => $c6 => $c7 => Data_Promise_liftIO_HasIO_x28Promisex20x24ex29($ca => Prelude_IO_prim__putStr((Util_renderString($0, Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_color(3), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('Could not pick a user from the given Team ')), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('(perhaps the only option was the author of the pull request?).'), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(Prelude_Types_foldMap_Foldable_List(csegen_86()(), $e8 => $e8, {a1: 'Requested review from ', a2: {a1:
|
|
12849
|
+
$bf = () => $c5 => $c6 => $c7 => Data_Promise_liftIO_HasIO_x28Promisex20x24ex29($ca => Prelude_IO_prim__putStr((Util_renderString($0, Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_color(3), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('Could not pick a user from the given Team ')), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('(perhaps the only option was the author of the pull request?).'), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(Prelude_Types_foldMap_Foldable_List(csegen_86()(), $e8 => $e8, {a1: 'Requested review from ', a2: {a1: Commands_PullRequest_n__10295_1998_teamNotice($1, $5, $4, $3, $2, $0, $53), a2: {a1: ' for the open PR ', a2: {h: 0}}}})), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(Prelude_Types_foldMap_Foldable_List(csegen_86()(), $101 => $101, {a1: 'for the current branch (', a2: {a1: Data_PullRequest_rf__webURI($0, $2), a2: {a1: ').', a2: {h: 0}}}})), a2: {h: 0}}}}}))+'\n'), $ca), $c5, $c6, $c7);
|
|
12713
12850
|
break;
|
|
12714
12851
|
}
|
|
12715
12852
|
case 0: {
|
|
12716
|
-
$bf = () => $112 => $113 => $114 => Data_Promise_liftIO_HasIO_x28Promisex20x24ex29($117 => 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_86()(), $128 => $128, {a1: 'Requested review from ', a2: {a1:
|
|
12853
|
+
$bf = () => $112 => $113 => $114 => Data_Promise_liftIO_HasIO_x28Promisex20x24ex29($117 => 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_86()(), $128 => $128, {a1: 'Requested review from ', a2: {a1: Commands_PullRequest_n__10295_1999_userNotice($1, $5, $4, $3, $2, $0, chosenUser), a2: {a1: Commands_PullRequest_n__10295_1998_teamNotice($1, $5, $4, $3, $2, $0, $53), a2: {a1: ' for the open PR ', a2: {h: 0}}}}})), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(Prelude_Types_foldMap_Foldable_List(csegen_86()(), $14b => $14b, {a1: 'for the current branch (', a2: {a1: Data_PullRequest_rf__webURI($0, $2), a2: {a1: ').', a2: {h: 0}}}})), a2: {h: 0}}}))+'\n'), $117), $112, $113, $114);
|
|
12717
12854
|
break;
|
|
12718
12855
|
}
|
|
12719
12856
|
}
|
|
@@ -12731,17 +12868,17 @@ function Commands_PullRequest_requestReviewers($0, $1, $2, $3, $4, $5, $6, $7) {
|
|
|
12731
12868
|
|
|
12732
12869
|
/* Commands.PullRequest.renderPrTree : Config => RenderFormat -> List PrTreeNode -> String */
|
|
12733
12870
|
function Commands_PullRequest_renderPrTree($0, $1, $2) {
|
|
12734
|
-
return Builtin_snd(Prelude_Types_foldl_Foldable_List($7 => $8 =>
|
|
12871
|
+
return Builtin_snd(Prelude_Types_foldl_Foldable_List($7 => $8 => Commands_PullRequest_n__11531_3150_renderNode($1, $0, $7, $8), {a1: 0n, a2: ''}, $2));
|
|
12735
12872
|
}
|
|
12736
12873
|
|
|
12737
12874
|
/* Commands.PullRequest.prTree : Maybe String -> Maybe String -> List PullRequest -> String -> List PrTreeNode */
|
|
12738
12875
|
function Commands_PullRequest_prTree($0, $1, $2, $3) {
|
|
12739
|
-
return {a1: {h: 0 /* Branch */, a1:
|
|
12876
|
+
return {a1: {h: 0 /* Branch */, a1: Commands_PullRequest_n__11453_3083_terminus($3, $2, $1, $0), a2: $3, a3: {h: 0}}, a2: Commands_PullRequest_n__11453_3082_go($3, $2, $1, $0, Prelude_Types_List_reverse($2))};
|
|
12740
12877
|
}
|
|
12741
12878
|
|
|
12742
12879
|
/* Commands.PullRequest.prCreationUrl : String -> String -> String -> Maybe String -> String */
|
|
12743
12880
|
function Commands_PullRequest_prCreationUrl($0, $1, $2, $3) {
|
|
12744
|
-
return Prelude_Types_foldMap_Foldable_List(csegen_86()(), $9 => $9, {a1: 'https://github.com/', a2: {a1: $0, a2: {a1: '/', a2: {a1: $1, a2: {a1: '/compare/', a2: {a1:
|
|
12881
|
+
return Prelude_Types_foldMap_Foldable_List(csegen_86()(), $9 => $9, {a1: 'https://github.com/', a2: {a1: $0, a2: {a1: '/', a2: {a1: $1, a2: {a1: '/compare/', a2: {a1: Commands_PullRequest_n__12322_3915_into($3, $2, $1, $0), a2: {a1: $2, a2: {a1: '?expand=1', a2: {h: 0}}}}}}}}});
|
|
12745
12882
|
}
|
|
12746
12883
|
|
|
12747
12884
|
/* Commands.PullRequest.prChain : Config => Octokit => Fuel -> String -> Promise' (List PullRequest, String) */
|
|
@@ -12823,7 +12960,7 @@ function Commands_PullRequest_identifyOrCreatePR($0, $1, $2, $3, $4, $5, $6) {
|
|
|
12823
12960
|
return $20 => {
|
|
12824
12961
|
const $29 = $2a => $2b => $2c => {
|
|
12825
12962
|
switch($2a) {
|
|
12826
|
-
case 1: return Data_Promise_map_Functor_x28Promisex20x24ex29($30 => ({h: 0 /* Actual */, a1: 1, a2: $30}), $34 => $35 =>
|
|
12963
|
+
case 1: return Data_Promise_map_Functor_x28Promisex20x24ex29($30 => ({h: 0 /* Actual */, a1: 1, a2: $30}), $34 => $35 => Commands_PullRequest_n__12429_4025_createPR($1, $4, $3, $2, $0, $34, $35), $2b, $2c);
|
|
12827
12964
|
case 0: return Data_Promise_pure_Applicative_x28Promisex20x24ex29({h: 1 /* Hypothetical */, a1: Commands_PullRequest_prCreationUrl($0.a2, $0.a3, $4, $3)}, $2b, $2c);
|
|
12828
12965
|
}
|
|
12829
12966
|
};
|
|
@@ -12838,7 +12975,7 @@ function Commands_PullRequest_identifyOrCreatePR($0, $1, $2, $3, $4, $5, $6) {
|
|
|
12838
12975
|
|
|
12839
12976
|
/* Commands.PullRequest.githubInferredBranchInfo : Config => Octokit => String -> String -> Promise' BranchInferredData */
|
|
12840
12977
|
function Commands_PullRequest_githubInferredBranchInfo($0, $1, $2, $3) {
|
|
12841
|
-
return $4 => Commands_PullRequest_case__githubInferredBranchInfo_3775($1, $3, $2, $0,
|
|
12978
|
+
return $4 => Commands_PullRequest_case__githubInferredBranchInfo_3775($1, $3, $2, $0, Commands_PullRequest_n__11924_3544_issueNumber($1, $3, $2, $0), $4);
|
|
12842
12979
|
}
|
|
12843
12980
|
|
|
12844
12981
|
/* Commands.PullRequest.getInferredBranchInfo : Config => Octokit => String -> String -> Promise' BranchInferredData */
|
|
@@ -12852,7 +12989,7 @@ function Commands_PullRequest_getInferredBranchInfo($0, $1, $2, $3) {
|
|
|
12852
12989
|
|
|
12853
12990
|
/* Commands.PullRequest.forkedPRs : Maybe GitHubPRState -> Nat -> Nat -> Nat -> () -> Promise' Future */
|
|
12854
12991
|
function Commands_PullRequest_forkedPRs($0, $1, $2, $3, $4) {
|
|
12855
|
-
return FFI_Concurrency_fork(csegen_48()(), Prelude_Types_foldMap_Foldable_List(csegen_86()(), $f => $f, {a1: 'pulls --json ', a2: {a1:
|
|
12992
|
+
return FFI_Concurrency_fork(csegen_48()(), Prelude_Types_foldMap_Foldable_List(csegen_86()(), $f => $f, {a1: 'pulls --json ', a2: {a1: Commands_PullRequest_n__9480_1180_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}}}}}}}));
|
|
12856
12993
|
}
|
|
12857
12994
|
|
|
12858
12995
|
/* Commands.PullRequest.empty : PRHistory */
|
|
@@ -12937,7 +13074,7 @@ function Util_Jira_n__2629_818_go($0, $1) {
|
|
|
12937
13074
|
|
|
12938
13075
|
/* Util.Jira.parseJiraSlug : String -> Maybe String */
|
|
12939
13076
|
function Util_Jira_parseJiraSlug($0) {
|
|
12940
|
-
return Prelude_Types_map_Functor_Maybe(
|
|
13077
|
+
return Prelude_Types_map_Functor_Maybe(csegen_878(), Util_Jira_n__2629_819_guardSuccess(Prelude_Types_foldl_Foldable_List($9 => $a => Util_Jira_n__2629_818_go($9, $a), Util_Jira_n__2629_820_startOver(), Prelude_Types_fastUnpack($0))));
|
|
12941
13078
|
}
|
|
12942
13079
|
|
|
12943
13080
|
/* Util.Github.3729:2547:startOver */
|
|
@@ -13039,7 +13176,7 @@ function Util_Github_n__3729_2544_go($0, $1) {
|
|
|
13039
13176
|
|
|
13040
13177
|
/* Util.Github.parseGithubIssueNumber : String -> Maybe String */
|
|
13041
13178
|
function Util_Github_parseGithubIssueNumber($0) {
|
|
13042
|
-
return Prelude_Types_map_Functor_Maybe(
|
|
13179
|
+
return Prelude_Types_map_Functor_Maybe(csegen_878(), Util_Github_n__3729_2546_guardSuccess(Prelude_Types_foldl_Foldable_List($9 => $a => Util_Github_n__3729_2544_go($9, $a), {a1: {h: 0 /* 3729:2542:Start */}, a2: {h: 0}}, Prelude_Types_fastUnpack($0))));
|
|
13043
13180
|
}
|
|
13044
13181
|
|
|
13045
13182
|
/* Util.Github.isBugfixBranch : String -> Bool */
|
|
@@ -13313,13 +13450,13 @@ function Data_List_DeleteBy_deleteByx27($0, $1, $2) {
|
|
|
13313
13450
|
}
|
|
13314
13451
|
}
|
|
13315
13452
|
|
|
13316
|
-
/* Commands.Quick.
|
|
13317
|
-
function
|
|
13453
|
+
/* Commands.Quick.6025:5655:issuePrompt */
|
|
13454
|
+
function Commands_Quick_n__6025_5655_issuePrompt($0, $1, $2) {
|
|
13318
13455
|
return 'What would you like the issue description to be (two blank lines to finish)?';
|
|
13319
13456
|
}
|
|
13320
13457
|
|
|
13321
|
-
/* Commands.Quick.
|
|
13322
|
-
function
|
|
13458
|
+
/* Commands.Quick.6191:5820:branchPrefix */
|
|
13459
|
+
function Commands_Quick_n__6191_5820_branchPrefix($0, $1, $2, $3) {
|
|
13323
13460
|
return Data_String_toLower(Commands_Quick_show_Show_IssueCategory($2));
|
|
13324
13461
|
}
|
|
13325
13462
|
|
|
@@ -13349,10 +13486,10 @@ function Commands_Quick_quickStartNewWork($0, $1, $2, $3, $4, $5) {
|
|
|
13349
13486
|
}
|
|
13350
13487
|
}
|
|
13351
13488
|
const $21 = issue => {
|
|
13352
|
-
const $22 = Prelude_Types_foldMap_Foldable_List(csegen_86()(), $28 => $28, {a1:
|
|
13489
|
+
const $22 = Prelude_Types_foldMap_Foldable_List(csegen_86()(), $28 => $28, {a1: Commands_Quick_n__6191_5820_branchPrefix($1, $3, $2, $0), a2: {a1: '/', a2: {a1: Prelude_Show_show_Show_Integer(issue.a1), a2: {a1: '/', a2: {h: 0}}}}});
|
|
13353
13490
|
const $3a = Commands_Quick_branchNameSuggestion(issue.a2);
|
|
13354
13491
|
const $3e = ($22+$3a);
|
|
13355
|
-
return $41 => $42 => Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($45 => $46 => $47 => Data_Promise_liftIO_HasIO_x28Promisex20x24ex29($4a => Prelude_IO_prim__putStr((Prelude_Types_foldMap_Foldable_List(csegen_86()(), $53 => $53, {a1: 'What would you like the branch to be named? ', a2: {a1: Util_Prompting_enterForDefaultStr($3e), a2: {h: 0}}})+'\n'), $4a), $45, $46, $47), $61 => $62 => $63 => Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($66 => $67 => $68 => Data_Promise_liftIO_HasIO_x28Promisex20x24ex29($6b => Prelude_IO_prim__putStr($22, $6b), $66, $67, $68), $73 => $74 => $75 => Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($78 => $79 => Data_Promise_map_Functor_x28Promisex20x24ex29($7c => Util_Prompting_orIfEmpty({a1: $3a}, Data_String_trim($7c)),
|
|
13492
|
+
return $41 => $42 => Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($45 => $46 => $47 => Data_Promise_liftIO_HasIO_x28Promisex20x24ex29($4a => Prelude_IO_prim__putStr((Prelude_Types_foldMap_Foldable_List(csegen_86()(), $53 => $53, {a1: 'What would you like the branch to be named? ', a2: {a1: Util_Prompting_enterForDefaultStr($3e), a2: {h: 0}}})+'\n'), $4a), $45, $46, $47), $61 => $62 => $63 => Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($66 => $67 => $68 => Data_Promise_liftIO_HasIO_x28Promisex20x24ex29($6b => Prelude_IO_prim__putStr($22, $6b), $66, $67, $68), $73 => $74 => $75 => Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($78 => $79 => Data_Promise_map_Functor_x28Promisex20x24ex29($7c => Util_Prompting_orIfEmpty({a1: $3a}, Data_String_trim($7c)), csegen_498()(), $78, $79), branchSlug => System_Git_checkoutBranch(1, Prelude_Types_foldMap_Foldable_List(csegen_86()(), $91 => $91, {a1: $22, a2: {a1: branchSlug, a2: {h: 0}}})), $74, $75), $62, $63), $41, $42);
|
|
13356
13493
|
};
|
|
13357
13494
|
return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($7, $21, $4, $5);
|
|
13358
13495
|
}
|
|
@@ -13369,7 +13506,7 @@ function Commands_Quick_createNewIssue($0, $1, $2, $3, $4) {
|
|
|
13369
13506
|
const $20 = $21 => $22 => {
|
|
13370
13507
|
switch($2.h) {
|
|
13371
13508
|
case undefined: /* just */ return Data_Promise_pure_Applicative_x28Promisex20x24ex29($2.a1, $21, $22);
|
|
13372
|
-
case 0: /* nothing */ return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($2a => $2b => $2c => Data_Promise_liftIO_HasIO_x28Promisex20x24ex29($2f => Prelude_IO_prim__putStr('What would you like the issue title to be?\n', $2f), $2a, $2b, $2c), $37 => $38 => $39 => Data_Promise_map_Functor_x28Promisex20x24ex29($3c => Data_String_trim($3c),
|
|
13509
|
+
case 0: /* nothing */ return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($2a => $2b => $2c => Data_Promise_liftIO_HasIO_x28Promisex20x24ex29($2f => Prelude_IO_prim__putStr('What would you like the issue title to be?\n', $2f), $2a, $2b, $2c), $37 => $38 => $39 => Data_Promise_map_Functor_x28Promisex20x24ex29($3c => Data_String_trim($3c), csegen_498()(), $38, $39), $21, $22);
|
|
13373
13510
|
}
|
|
13374
13511
|
};
|
|
13375
13512
|
const $46 = issueTitle => $47 => $48 => {
|
|
@@ -13377,11 +13514,11 @@ function Commands_Quick_createNewIssue($0, $1, $2, $3, $4) {
|
|
|
13377
13514
|
let $4a;
|
|
13378
13515
|
switch($4b.h) {
|
|
13379
13516
|
case 0: /* nothing */ {
|
|
13380
|
-
$4a = Util_Prompting_inlineDescription(csegen_48()(),
|
|
13517
|
+
$4a = Util_Prompting_inlineDescription(csegen_48()(), Commands_Quick_n__6025_5655_issuePrompt($1, $2, $0), '');
|
|
13381
13518
|
break;
|
|
13382
13519
|
}
|
|
13383
13520
|
case undefined: /* just */ {
|
|
13384
|
-
$4a = $58 => $59 => Data_Promise_map_Functor_x28Promisex20x24ex29(
|
|
13521
|
+
$4a = $58 => $59 => Data_Promise_map_Functor_x28Promisex20x24ex29(csegen_832(), Util_Prompting_editorDescription(csegen_48()(), $4b.a1, {h: 0}, ''), $58, $59);
|
|
13385
13522
|
break;
|
|
13386
13523
|
}
|
|
13387
13524
|
}
|
|
@@ -13389,7 +13526,7 @@ function Commands_Quick_createNewIssue($0, $1, $2, $3, $4) {
|
|
|
13389
13526
|
};
|
|
13390
13527
|
return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($20, $46, $1d, $1e);
|
|
13391
13528
|
};
|
|
13392
|
-
return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(
|
|
13529
|
+
return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(csegen_496()(), $1b, $15, $16);
|
|
13393
13530
|
};
|
|
13394
13531
|
return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($7 => $8 => $9 => Data_Promise_liftIO_HasIO_x28Promisex20x24ex29($c => Prelude_IO_prim__putStr('Creating a new GitHub issue and branch.\n', $c), $7, $8, $9), $13, $3, $4);
|
|
13395
13532
|
}
|
|
@@ -13413,36 +13550,36 @@ function Commands_Label_addLabels($0, $1, $2, $3, $4, $5) {
|
|
|
13413
13550
|
return FFI_GitHub_addPullLabels($1, $0.a2, $0.a3, $2.a1, $3, $4, $5);
|
|
13414
13551
|
}
|
|
13415
13552
|
|
|
13416
|
-
/* Commands.Graph.
|
|
13417
|
-
function
|
|
13418
|
-
return Theme_theme($7,
|
|
13553
|
+
/* Commands.Graph.7857:7016:pendingDot */
|
|
13554
|
+
function Commands_Graph_n__7857_7016_pendingDot($0, $1, $2, $3, $4, $5, $6, $7) {
|
|
13555
|
+
return Theme_theme($7, csegen_805(), csegen_803(), 6)(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('\u{b7}'));
|
|
13419
13556
|
}
|
|
13420
13557
|
|
|
13421
|
-
/* Commands.Graph.
|
|
13422
|
-
function
|
|
13558
|
+
/* Commands.Graph.7857:7015:note */
|
|
13559
|
+
function Commands_Graph_n__7857_7015_note($0, $1, $2, $3, $4, $5, $6, $7, $8) {
|
|
13423
13560
|
return Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_bold(), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('Note:')), $8);
|
|
13424
13561
|
}
|
|
13425
13562
|
|
|
13426
|
-
/* Commands.Graph.
|
|
13427
|
-
function
|
|
13428
|
-
return Theme_theme($7,
|
|
13563
|
+
/* Commands.Graph.7857:7014:missedDot */
|
|
13564
|
+
function Commands_Graph_n__7857_7014_missedDot($0, $1, $2, $3, $4, $5, $6, $7) {
|
|
13565
|
+
return Theme_theme($7, csegen_804(), csegen_804(), 7)(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('\u{25e6}'));
|
|
13429
13566
|
}
|
|
13430
13567
|
|
|
13431
|
-
/* Commands.Graph.
|
|
13432
|
-
function
|
|
13568
|
+
/* Commands.Graph.7857:7013:maxValue */
|
|
13569
|
+
function Commands_Graph_n__7857_7013_maxValue($0, $1, $2, $3, $4, $5, $6, $7, $8) {
|
|
13433
13570
|
switch($8.h) {
|
|
13434
13571
|
case 0: /* nil */ return 0n;
|
|
13435
|
-
case undefined: /* cons */ return Prelude_Types_max_Ord_Nat($8.a1.a2,
|
|
13572
|
+
case undefined: /* cons */ return Prelude_Types_max_Ord_Nat($8.a1.a2, Commands_Graph_n__7857_7013_maxValue($0, $1, $2, $3, $4, $5, $6, $7, $8.a2));
|
|
13436
13573
|
}
|
|
13437
13574
|
}
|
|
13438
13575
|
|
|
13439
|
-
/* Commands.Graph.
|
|
13440
|
-
function
|
|
13576
|
+
/* Commands.Graph.7454:6605:link */
|
|
13577
|
+
function Commands_Graph_n__7454_6605_link($0, $1, $2, $3) {
|
|
13441
13578
|
return Prelude_Types_foldMap_Foldable_List(csegen_86()(), $9 => $9, {a1: 'https://github.com/', a2: {a1: $1, a2: {a1: '/', a2: {a1: $0, a2: {a1: '/pulls?q=is%3Apr+is%3Aopen+sort%3Acreated-asc', a2: {h: 0}}}}}});
|
|
13442
13579
|
}
|
|
13443
13580
|
|
|
13444
|
-
/* Commands.Graph.
|
|
13445
|
-
function
|
|
13581
|
+
/* Commands.Graph.7857:7012:header */
|
|
13582
|
+
function Commands_Graph_n__7857_7012_header($0, $1, $2, $3, $4, $5, $6, $7) {
|
|
13446
13583
|
let $3b;
|
|
13447
13584
|
switch(Prelude_Types_null_Foldable_Maybe($3)) {
|
|
13448
13585
|
case 1: {
|
|
@@ -13450,58 +13587,58 @@ function Commands_Graph_n__7839_7012_header($0, $1, $2, $3, $4, $5, $6, $7) {
|
|
|
13450
13587
|
break;
|
|
13451
13588
|
}
|
|
13452
13589
|
case 0: {
|
|
13453
|
-
$3b = {a1: Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('1x the number of completed reviews'), Text_PrettyPrint_Prettyprinter_Symbols_parens(
|
|
13590
|
+
$3b = {a1: Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('1x the number of completed reviews'), Text_PrettyPrint_Prettyprinter_Symbols_parens(Commands_Graph_n__7857_7010_completedBox($0, $1, $2, $3, $4, $5, $6, $7)))};
|
|
13454
13591
|
break;
|
|
13455
13592
|
}
|
|
13456
13593
|
}
|
|
13457
|
-
const $3a = {a1: $3b, a2: {a1: {a1: Text_PrettyPrint_Prettyprinter_Symbols_parens(Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(
|
|
13458
|
-
const $27 = {a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('1x the number of closed PRs with unanswered review requests'), Text_PrettyPrint_Prettyprinter_Symbols_parens(
|
|
13459
|
-
const $14 = {a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('4x the number of open review requests'), Text_PrettyPrint_Prettyprinter_Symbols_parens(
|
|
13594
|
+
const $3a = {a1: $3b, a2: {a1: {a1: Text_PrettyPrint_Prettyprinter_Symbols_parens(Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Commands_Graph_n__7857_7014_missedDot($0, $1, $2, $3, $4, $5, $6, $7), Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('overlayed on'), Commands_Graph_n__7857_7016_pendingDot($0, $1, $2, $3, $4, $5, $6, $7))))}, a2: csegen_893()}};
|
|
13595
|
+
const $27 = {a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('1x the number of closed PRs with unanswered review requests'), Text_PrettyPrint_Prettyprinter_Symbols_parens(Commands_Graph_n__7857_7014_missedDot($0, $1, $2, $3, $4, $5, $6, $7)))}, a2: $3a};
|
|
13596
|
+
const $14 = {a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('4x the number of open review requests'), Text_PrettyPrint_Prettyprinter_Symbols_parens(Commands_Graph_n__7857_7016_pendingDot($0, $1, $2, $3, $4, $5, $6, $7)))}, a2: $27};
|
|
13460
13597
|
const $f = {a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('Weighted review workload.')}, a2: $14};
|
|
13461
13598
|
const $b = {a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc()}, a2: $f};
|
|
13462
13599
|
const $9 = Data_List_catMaybes($b);
|
|
13463
13600
|
return Text_PrettyPrint_Prettyprinter_Doc_vsep($9);
|
|
13464
13601
|
}
|
|
13465
13602
|
|
|
13466
|
-
/* Commands.Graph.
|
|
13467
|
-
function
|
|
13468
|
-
return Text_PrettyPrint_Prettyprinter_Doc_vsep(Data_List_catMaybes({a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc()}, a2: {a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('Open Pull Requests grouped by month created.')}, a2: {a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc()}, a2:
|
|
13603
|
+
/* Commands.Graph.7454:6604:header */
|
|
13604
|
+
function Commands_Graph_n__7454_6604_header($0, $1, $2, $3) {
|
|
13605
|
+
return Text_PrettyPrint_Prettyprinter_Doc_vsep(Data_List_catMaybes({a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc()}, a2: {a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('Open Pull Requests grouped by month created.')}, a2: {a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc()}, a2: csegen_893()}}}));
|
|
13469
13606
|
}
|
|
13470
13607
|
|
|
13471
|
-
/* Commands.Graph.
|
|
13472
|
-
function
|
|
13608
|
+
/* Commands.Graph.7454:6603:graphable */
|
|
13609
|
+
function Commands_Graph_n__7454_6603_graphable($0, $1, $2, $3, $4) {
|
|
13473
13610
|
return {a1: $4.a1.a3, a2: (Prelude_Types_List_lengthTR($4.a2)+1n)};
|
|
13474
13611
|
}
|
|
13475
13612
|
|
|
13476
|
-
/* Commands.Graph.
|
|
13477
|
-
function
|
|
13478
|
-
return Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {a1:
|
|
13613
|
+
/* Commands.Graph.7857:7011:footer */
|
|
13614
|
+
function Commands_Graph_n__7857_7011_footer($0, $1, $2, $3, $4, $5, $6, $7) {
|
|
13615
|
+
return Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {a1: Commands_Graph_n__7857_7015_note($0, $1, $2, $3, $4, $5, $6, $7, Text_PrettyPrint_Prettyprinter_Util_reflow(Prelude_Types_foldMap_Foldable_List(csegen_86()(), $1f => $1f, {a1: 'It is a strongly held opinion of Harmony that the above graph is not a measure of each developers\' productivity.\nIt is a proxy for each developers\' existing PR review workload that may help to understand how Harmony is\nchoosing reviewers or similarly help one developer decide which other developers have capacity to help review\ntheir work.', a2: {h: 0}}))), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {h: 0}}}});
|
|
13479
13616
|
}
|
|
13480
13617
|
|
|
13481
|
-
/* Commands.Graph.
|
|
13482
|
-
function
|
|
13618
|
+
/* Commands.Graph.6887:6183:countInParens */
|
|
13619
|
+
function Commands_Graph_n__6887_6183_countInParens($0, $1, $2, $3, $4) {
|
|
13483
13620
|
switch(Prelude_Types_x3e_Ord_Nat($4.a2, 4n)) {
|
|
13484
13621
|
case 1: return Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_italic(), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(Commands_Graph_rf__countStr($4)));
|
|
13485
13622
|
case 0: return Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('');
|
|
13486
13623
|
}
|
|
13487
13624
|
}
|
|
13488
13625
|
|
|
13489
|
-
/* Commands.Graph.
|
|
13490
|
-
function
|
|
13491
|
-
return Theme_theme($7,
|
|
13626
|
+
/* Commands.Graph.7857:7010:completedBox */
|
|
13627
|
+
function Commands_Graph_n__7857_7010_completedBox($0, $1, $2, $3, $4, $5, $6, $7) {
|
|
13628
|
+
return Theme_theme($7, csegen_783(), csegen_783(), 3)(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('\u{25aa}'));
|
|
13492
13629
|
}
|
|
13493
13630
|
|
|
13494
|
-
/* Commands.Graph.
|
|
13495
|
-
function
|
|
13631
|
+
/* Commands.Graph.6887:6182:coloredLabel */
|
|
13632
|
+
function Commands_Graph_n__6887_6182_coloredLabel($0, $1, $2, $3, $4) {
|
|
13496
13633
|
switch((($4.a2===0n)?1:0)) {
|
|
13497
|
-
case 1: return Theme_theme($0,
|
|
13634
|
+
case 1: return Theme_theme($0, csegen_783(), csegen_783(), 0)($2.a1(undefined)($4.a1));
|
|
13498
13635
|
case 0: {
|
|
13499
13636
|
switch(Prelude_Types_x3c_Ord_Nat($4.a2, 2n)) {
|
|
13500
13637
|
case 1: return $2.a1(undefined)($4.a1);
|
|
13501
13638
|
case 0: {
|
|
13502
13639
|
switch(Prelude_Types_x3c_Ord_Nat($4.a2, 6n)) {
|
|
13503
|
-
case 1: return Theme_theme($0,
|
|
13504
|
-
case 0: return Theme_theme($0,
|
|
13640
|
+
case 1: return Theme_theme($0, csegen_805(), csegen_803(), 1)($2.a1(undefined)($4.a1));
|
|
13641
|
+
case 0: return Theme_theme($0, csegen_804(), csegen_804(), 2)($2.a1(undefined)($4.a1));
|
|
13505
13642
|
}
|
|
13506
13643
|
}
|
|
13507
13644
|
}
|
|
@@ -13509,8 +13646,8 @@ function Commands_Graph_n__6869_6182_coloredLabel($0, $1, $2, $3, $4) {
|
|
|
13509
13646
|
}
|
|
13510
13647
|
}
|
|
13511
13648
|
|
|
13512
|
-
/* Commands.Graph.
|
|
13513
|
-
function
|
|
13649
|
+
/* Commands.Graph.7857:7009:augment */
|
|
13650
|
+
function Commands_Graph_n__7857_7009_augment($0, $1, $2, $3, $4, $5, $6, $7, $8, $9) {
|
|
13514
13651
|
return {a1: $9, a2: Prelude_Types_maybe(() => 0n, () => $f => $f, Data_SortedMap_lookup($9.a1, $8))};
|
|
13515
13652
|
}
|
|
13516
13653
|
|
|
@@ -13556,7 +13693,7 @@ function Commands_Graph_length_HasLength_Date($0) {
|
|
|
13556
13693
|
|
|
13557
13694
|
/* Commands.Graph.label */
|
|
13558
13695
|
function Commands_Graph_label_Graphable_x28PRsOnDatex20x24dateTyx29($0, $1, $2, $3, $4) {
|
|
13559
|
-
return Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(
|
|
13696
|
+
return Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Commands_Graph_n__6887_6182_coloredLabel($0, $1, $2, $4, $3), Commands_Graph_n__6887_6183_countInParens($0, $1, $2, $4, $3));
|
|
13560
13697
|
}
|
|
13561
13698
|
|
|
13562
13699
|
/* Commands.Graph.label */
|
|
@@ -13610,11 +13747,11 @@ function Commands_Graph_reviewsGraph($0, $1, $2, $3, $4, $5, $6, $7) {
|
|
|
13610
13747
|
break;
|
|
13611
13748
|
}
|
|
13612
13749
|
case undefined: /* just */ {
|
|
13613
|
-
$17 = Prelude_Types_List_mapAppend({h: 0}, $26 =>
|
|
13750
|
+
$17 = Prelude_Types_List_mapAppend({h: 0}, $26 => Commands_Graph_n__7857_7009_augment($1, $2, $3, $7, $6, $5, $4, $0, $7.a1, $26), $8);
|
|
13614
13751
|
break;
|
|
13615
13752
|
}
|
|
13616
13753
|
}
|
|
13617
|
-
const $33 = Prelude_Types_maybe(() => 0n, () => $37 => $37, Prelude_Types_map_Functor_Maybe($3b =>
|
|
13754
|
+
const $33 = Prelude_Types_maybe(() => 0n, () => $37 => $37, Prelude_Types_map_Functor_Maybe($3b => Commands_Graph_n__7857_7013_maxValue($1, $2, $3, $7, $6, $5, $4, $0, Data_SortedMap_toList($3b)), $7));
|
|
13618
13755
|
const $49 = Prelude_Types_foldr_Foldable_List($4c => $4d => Data_Nat_maximum(Commands_Graph_labelLength_Graphable_x28AugmentedReviewScorex20x24loginx29($1, $3, $4c), $4d), 0n, $17);
|
|
13619
13756
|
switch($8.h) {
|
|
13620
13757
|
case 0: /* nil */ return Text_PrettyPrint_Prettyprinter_Doc_emptyDoc();
|
|
@@ -13632,8 +13769,8 @@ function Commands_Graph_reviewsGraph($0, $1, $2, $3, $4, $5, $6, $7) {
|
|
|
13632
13769
|
}
|
|
13633
13770
|
}
|
|
13634
13771
|
const $6e = Commands_Graph_graph($0, {a1: $73 => Commands_Graph_totalWidth_Graphable_x28AugmentedReviewScorex20x24loginx29($1, $3, $73), a2: $79 => maxLabelLength => Commands_Graph_label_Graphable_x28AugmentedReviewScorex20x24loginx29($1, $3, $79, maxLabelLength), a3: $80 => Commands_Graph_labelLength_Graphable_x28AugmentedReviewScorex20x24loginx29($1, $3, $80), a4: $86 => Commands_Graph_score_Graphable_x28AugmentedReviewScorex20x24loginx29($1, $3, $86), a5: $8c => Commands_Graph_detractor_Graphable_x28AugmentedReviewScorex20x24loginx29($1, $3, $8c), a6: $92 => Commands_Graph_bonus_Graphable_x28AugmentedReviewScorex20x24loginx29($1, $3, $92)}, $97, $33, $49, $17);
|
|
13635
|
-
const $6d = {a1: $6e, a2: {a1:
|
|
13636
|
-
const $62 = {a1:
|
|
13772
|
+
const $6d = {a1: $6e, a2: {a1: Commands_Graph_n__7857_7011_footer($1, $2, $3, $7, $6, $5, $4, $0), a2: {h: 0}}};
|
|
13773
|
+
const $62 = {a1: Commands_Graph_n__7857_7012_header($1, $2, $3, $7, $6, $5, $4, $0), a2: $6d};
|
|
13637
13774
|
return Text_PrettyPrint_Prettyprinter_Doc_vsep($62);
|
|
13638
13775
|
}
|
|
13639
13776
|
}
|
|
@@ -13641,9 +13778,9 @@ function Commands_Graph_reviewsGraph($0, $1, $2, $3, $4, $5, $6, $7) {
|
|
|
13641
13778
|
|
|
13642
13779
|
/* Commands.Graph.healthGraph : Config => List PullRequest -> String -> String -> Doc AnsiStyle */
|
|
13643
13780
|
function Commands_Graph_healthGraph($0, $1, $2, $3) {
|
|
13644
|
-
const $4 = Data_List_groupBy($7 => $8 => Prelude_Basics_on($b => $c => Prelude_Basics_on(csegen_295(), $11 => $11.a2, $b, $c),
|
|
13781
|
+
const $4 = Data_List_groupBy($7 => $8 => Prelude_Basics_on($b => $c => Prelude_Basics_on(csegen_295(), $11 => $11.a2, $b, $c), csegen_757(), $7, $8), Data_List_sortBy(csegen_758(), $1));
|
|
13645
13782
|
const $1e = Prelude_Types_foldr_Foldable_List(xs => m => Prelude_Types_max_Ord_Nat(Data_List1_length(xs), m), 1n, $4);
|
|
13646
|
-
return Text_PrettyPrint_Prettyprinter_Doc_vsep({a1:
|
|
13783
|
+
return Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Commands_Graph_n__7454_6604_header($3, $2, $1, $0), a2: {a1: Commands_Graph_graph($0, {a1: $36 => Commands_Graph_totalWidth_Graphable_x28PRsOnDatex20x24dateTyx29($0, $3a => Commands_Graph_length_HasLength_Date($3a), csegen_909(), $36), a2: $41 => maxLabelLength => Commands_Graph_label_Graphable_x28PRsOnDatex20x24dateTyx29($0, $45 => Commands_Graph_length_HasLength_Date($45), csegen_909(), $41, maxLabelLength), a3: $4d => Commands_Graph_labelLength_Graphable_x28PRsOnDatex20x24dateTyx29($0, $51 => Commands_Graph_length_HasLength_Date($51), csegen_909(), $4d), a4: $58 => Commands_Graph_score_Graphable_x28PRsOnDatex20x24dateTyx29($0, $5c => Commands_Graph_length_HasLength_Date($5c), csegen_909(), $58), a5: $63 => Commands_Graph_detractor_Graphable_x28PRsOnDatex20x24dateTyx29($0, $67 => Commands_Graph_length_HasLength_Date($67), csegen_909(), $63), a6: $6e => Commands_Graph_bonus_Graphable_x28PRsOnDatex20x24dateTyx29($0, $72 => Commands_Graph_length_HasLength_Date($72), csegen_909(), $6e)}, $1e, 0n, 0n, Commands_Graph_n__7454_6606_unfoldGraph($3, $2, $1, $0, Data_Fuel_limit(48n), $4, {h: 0})), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(Commands_Graph_n__7454_6605_link($3, $2, $1, $0)), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {h: 0}}}}}});
|
|
13647
13784
|
}
|
|
13648
13785
|
|
|
13649
13786
|
/* Commands.Graph.graphOne : Config -> Graphable g => Nat -> Nat -> Nat -> g -> Doc AnsiStyle */
|
|
@@ -13666,7 +13803,7 @@ function Commands_Graph_countPadRight($0, $1, $2) {
|
|
|
13666
13803
|
|
|
13667
13804
|
/* Commands.Graph.bar : Config -> Nat -> Nat -> Nat -> Nat -> Doc AnsiStyle */
|
|
13668
13805
|
function Commands_Graph_bar($0, $1, $2, $3, $4) {
|
|
13669
|
-
return Text_PrettyPrint_Prettyprinter_Doc_indent(Number(_truncBigInt32($1)), Text_PrettyPrint_Prettyprinter_Doc_hcat({a1: Theme_theme($0,
|
|
13806
|
+
return Text_PrettyPrint_Prettyprinter_Doc_indent(Number(_truncBigInt32($1)), Text_PrettyPrint_Prettyprinter_Doc_hcat({a1: Theme_theme($0, csegen_804(), csegen_804(), 7)(Text_PrettyPrint_Prettyprinter_Doc_hcat(Data_List_replicateTR({h: 0}, $3, Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_Char('\u{25e6}')))), a2: {a1: Theme_theme($0, csegen_805(), csegen_803(), 6)(Text_PrettyPrint_Prettyprinter_Doc_hcat(Data_List_replicateTR({h: 0}, $2, Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_Char('\u{b7}')))), a2: {a1: Theme_theme($0, csegen_783(), csegen_783(), 3)(Text_PrettyPrint_Prettyprinter_Doc_hcat(Data_List_replicateTR({h: 0}, $4, Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_Char('\u{25aa}')))), a2: {h: 0}}}}));
|
|
13670
13807
|
}
|
|
13671
13808
|
|
|
13672
13809
|
|