diff options
| author | Philip Hazel <ph10@hermes.cam.ac.uk> | 2004-12-21 11:28:38 +0000 |
|---|---|---|
| committer | Philip Hazel <ph10@hermes.cam.ac.uk> | 2004-12-21 11:28:38 +0000 |
| commit | 55ee9ee384af22d5e7aa995868d0d90c4d7026ad (patch) | |
| tree | 5f1bd76058ada70f48d85e70bb8732817daeb332 /src | |
| parent | 1c5466b9794d96f5cbb5b899587c38bdb0995f01 (diff) | |
Fix exigrep for "Completed" lines that have additional data (as a result
of +queue_time_overall).
Diffstat (limited to 'src')
| -rw-r--r-- | src/src/exigrep.src | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/src/exigrep.src b/src/src/exigrep.src index bcd359735..e824bb41c 100644 --- a/src/src/exigrep.src +++ b/src/src/exigrep.src @@ -1,5 +1,5 @@ #! PERL_COMMAND -w -# $Cambridge: exim/src/src/exigrep.src,v 1.1 2004/10/07 10:39:01 ph10 Exp $ +# $Cambridge: exim/src/src/exigrep.src,v 1.2 2004/12/21 11:28:38 ph10 Exp $ use strict; @@ -81,7 +81,7 @@ if (my($id) = $entry =~ /^(\w{6}\-\w{6}\-\w{2})/) # print it, but in any event, throw away what was saved. if ($entry =~ - /(?:Completed$|rejected (?:by local_scan|by non-SMTP ACL|after DATA))/) + /(?:Completed|rejected (?:by local_scan|by non-SMTP ACL|after DATA))/) { if ($saved{$id} =~ /^(\d{4}-\d\d-\d\d \d\d:\d\d:\d\d ([+-]\d{4} )?)(\w{6}\-\w{6}\-\w{2})/) { |