diff -Nru procmail-3.11pre7/src/misc.c procmail-3.11pre7+ulmo/src/misc.c
--- procmail-3.11pre7/src/misc.c	Sun Apr 27 20:27:46 1997
+++ procmail-3.11pre7+ulmo/src/misc.c	Mon Aug  4 14:30:07 1997
@@ -31,7 +31,8 @@
 struct varval strenvvar[]={{"LOCKSLEEP",DEFlocksleep},
  {"LOCKTIMEOUT",DEFlocktimeout},{"SUSPEND",DEFsuspend},
  {"NORESRETRY",DEFnoresretry},{"TIMEOUT",DEFtimeout},{"VERBOSE",DEFverbose},
- {"LOGABSTRACT",DEFlogabstract}};
+ {"LOGABSTRACT",DEFlogabstract},
+ {"VERBOSEMATCH",DEFverbosematch},{"VERBOSEMATCHONLY",DEFverbosematchonly}};
 struct varstr strenstr[]={{"SHELLMETAS",DEFshellmetas},{"LOCKEXT",DEFlockext},
  {"MSGPREFIX",DEFmsgprefix},{"COMSAT",""},{"TRAP",""},
  {"SHELLFLAGS",DEFshellflags},{"DEFAULT",DEFdefault},{"SENDMAIL",DEFsendmail},
@@ -948,7 +949,7 @@
 plusinfty:  score=MAX32;
 	 if(score<=MIN32)		       /* chop off at minus infinity */
 mininfty:   score=MIN32,i=0;
-	 if(verbose)
+         if((i&&verbosematch) || (verbose && (!i==!verbosematchonly)))
 	  { if(scoreany)	     /* not entirely correct, but it will do */
 	     { charNUM(num,long);
 	       nlog("Score: ");ltstr(7,(long)(score-lscore),num);
diff -Nru procmail-3.11pre7/src/procmail.c procmail-3.11pre7+ulmo/src/procmail.c
--- procmail-3.11pre7/src/procmail.c	Sun Apr 27 20:27:48 1997
+++ procmail-3.11pre7+ulmo/src/procmail.c	Mon Aug  4 13:50:54 1997
@@ -505,6 +505,7 @@
 #if !DEFverbose
 	   if(rcstate!=rc_NORMAL)
 	      verbose=0;		    /* no peeking in /etc/procmailrc */
+           /* need something here for verbosematch? */
 #endif
 	   goto startrc;
 	 }
diff -Nru procmail-3.11pre7/src/procmail.h procmail-3.11pre7+ulmo/src/procmail.h
--- procmail-3.11pre7/src/procmail.h	Tue Apr  1 22:15:45 1997
+++ procmail-3.11pre7+ulmo/src/procmail.h	Mon Aug  4 13:45:55 1997
@@ -7,6 +7,8 @@
 #else
 #define DEFverbose 0
 #endif
+#define DEFverbosematch 0
+#define DEFverbosematchonly 0
 
 #ifndef DEFsendmail
 #define DEFsendmail SENDMAIL
@@ -54,6 +56,8 @@
 #define noresretry	(strenvvar[3].val)
 #define timeoutv	(strenvvar[4].val)
 #define verbose		(*(volatile long*)&strenvvar[5].val)
+#define verbosematch	(*(volatile long*)&strenvvar[7].val)
+#define verbosematchonly (*(volatile long*)&strenvvar[8].val)
 #define lgabstract	(strenvvar[6].val)
 
 extern struct varstr{const char*const sname,*sval;}strenstr[];