--- /root/v4/mailscanner/mailscanner/bin/MailScanner/MessageBatch.pm	Wed Jan 29 19:12:43 2003
+++ MessageBatch.pm	Fri Feb 21 17:26:26 2003
@@ -707,5 +707,19 @@
   }
 }
 
+
+# This simply evaluates a known configuration parameter for every message
+# in the batch, whether it has been deleted or not. This solely exists so
+# that the lookup can be a Custom Function that has "side-effects" such
+# as logging data about the message.
+sub LastLookup {
+  my $this = shift;
+
+  my($id, $message);
+  while(($id, $message) = each %{$this->{messages}}) {
+    MailScanner::Config::Value('lastlookup', $message));
+  }
+}
+
 1;
 