From: Phil Pennock <pdp@exim.org>
Date: Fri, 7 Oct 2011 20:37:32 +0000 (-0400)
Subject: exiqgrep: handle queue line size output too small for K
X-Git-Tag: exim-4_77~7
X-Git-Url: https://vcs.fsf.org/?a=commitdiff_plain;h=196f5966a092d873df256956f6f88d4b5d3cb803;p=exim.git

exiqgrep: handle queue line size output too small for K
---

diff --git a/src/src/exiqgrep.src b/src/src/exiqgrep.src
index da63c9980..75265a2bb 100644
--- a/src/src/exiqgrep.src
+++ b/src/src/exiqgrep.src
@@ -87,7 +87,7 @@ sub collect() {
 		chomp();
 		my $line = $_;
 		#Should be 1st line of record, if not error.
-		if ($line =~ /^\s*(\w+)\s+((?:\d+(?:\.\d+)?[A-Z])?)\s*(\w{6}-\w{6}-\w{2})\s+(<.*?>)/) {
+		if ($line =~ /^\s*(\w+)\s+((?:\d+(?:\.\d+)?[A-Z]?)?)\s*(\w{6}-\w{6}-\w{2})\s+(<.*?>)/) {
 			my $msg = $3;
 			$id{$msg}{age} = $1;
 			$id{$msg}{size} = $2;