mpick: add -v flag

Closes: #137 [via git-merge-pr]

man/mpick.1

@@ -7,6 +7,7 @@
 .Sh SYNOPSIS
 .Nm
 .Op Fl T
+.Op Fl v
 .Op Fl t Ar test
 .Op Ar msglist\ ...
 .Sh DESCRIPTION
@@ -29,6 +30,8 @@ Only show messages matching the expression
 .Ar test ,
 see
 .Sx TESTS .
+.It Fl v
+Print how many messages were tested and picked to standard error.
 .El
 .Sh MSGLISTS
 .Nm

mpick.c

@@ -1142,15 +1142,18 @@ main(int argc, char *argv[])
 {
 	long i;
 	int c;
+	int vflag;
 
 	argv0 = argv[0];
 	now = time(0);
 	num = 1;
+	vflag = 0;
 
-	while ((c = getopt(argc, argv, "Tt:")) != -1)
+	while ((c = getopt(argc, argv, "Tt:v")) != -1)
 		switch (c) {
 		case 'T': Tflag = need_thr = 1; break;
 		case 't': expr = chain(expr, EXPR_AND, parse_expr(optarg)); break;
+		case 'v': vflag = 1; break;
 		default:
 			fprintf(stderr, "Usage: %s [-T] [-t test] [msglist ...]\n", argv0);
 			exit(1);
@@ -1169,6 +1172,7 @@ main(int argc, char *argv[])
 	if (Tflag && thr)
 		do_thr();
 
+	if (vflag)
 		fprintf(stderr, "%ld mails tested, %ld picked.\n", i, kept);
 	return 0;
 }