--- a/log.pl	Wed Aug 02 08:06:25 2006 +0000
+++ b/log.pl	Thu Aug 03 07:19:20 2006 +0000
@@ -82,7 +82,7 @@
 	$opt_message = ($1 ? "APT: $1\n" : "APT: upgrade\n")
 	    . join "", map { 
 		if (/^\d/) { ($_) }
-		elsif ( /^(?:Inst|Conf|Remv)/ ) { ("- $_") }
+		elsif ( /^(?:Inst|Conf|Remv|Purg)/ ) { ("- $_") }
 		else { () } 
 	    } <I>;
     }