[svn:qpsmtpd] r895 - trunk/lib/Apache

[msergeant]

Author: msergeant
Date: Fri May  9 11:17:38 2008
New Revision: 895

Modified:
   trunk/lib/Apache/Qpsmtpd.pm

Log:
Support original_string in Apache


Modified: trunk/lib/Apache/Qpsmtpd.pm
==============================================================================
--- trunk/lib/Apache/Qpsmtpd.pm (original)
+++ trunk/lib/Apache/Qpsmtpd.pm Fri May  9 11:17:38 2008
@@ -119,6 +119,7 @@
 
     while (defined(my $data = $self->getline)) {
         $data =~ s/\r?\n$//s; # advanced chomp
+        $self->connection->notes('original_string', $data);
         $self->log(LOGDEBUG, "dispatching $data");
         defined $self->dispatch(split / +/, $data, 2)
             or $self->respond(502, "command unrecognized: '$data'");