changeset 6 | 75e15810eb67 |
parent 5 | adfce511f604 |
child 7 | bc20f10e81e1 |
--- a/log.pl Wed Aug 02 07:49:51 2006 +0000 +++ b/log.pl Wed Aug 02 08:06:25 2006 +0000 @@ -80,7 +80,11 @@ } elsif ($opt_message =~ /^apt(?::(.*))?\@(\S+)/) { open(I, $2) or die "Can't open $2: $!\n"; $opt_message = ($1 ? "APT: $1\n" : "APT: upgrade\n") - . join "", map { /^(?:\d|Inst|Conf|Remv)/ ? "- $_" : () } <I>; + . join "", map { + if (/^\d/) { ($_) } + elsif ( /^(?:Inst|Conf|Remv)/ ) { ("- $_") } + else { () } + } <I>; } if ($opt_message =~ /\n/) {