cvs commit: qpsmtpd/lib/Qpsmtpd SMTP.pm

cvsuser     04/08/31 22:56:52

  Modified:    lib/Qpsmtpd SMTP.pm
  Log:
  Pass extra "stuff" to HELO/EHLO callbacks
  
  Revision  Changes    Path
  1.37      +2 -2      qpsmtpd/lib/Qpsmtpd/SMTP.pm
  
  Index: SMTP.pm
  ===================================================================
  RCS file: /cvs/public/qpsmtpd/lib/Qpsmtpd/SMTP.pm,v
  retrieving revision 1.36
  retrieving revision 1.37
  diff -u -w -r1.36 -r1.37
  --- SMTP.pm	31 Aug 2004 01:58:57 -0000	1.36
  +++ SMTP.pm	1 Sep 2004 05:56:52 -0000	1.37
  @@ -131,7 +131,7 @@
     my $conn = $self->connection;
     return $self->respond (503, "but you already said HELO ...") if $conn->hello;
   
  -  my ($rc, $msg) = $self->run_hooks("helo", $hello_host);
  +  my ($rc, $msg) = $self->run_hooks("helo", $hello_host, @stuff);
     if ($rc == DONE) {
       # do nothing
     } elsif ($rc == DENY) {
  @@ -151,7 +151,7 @@
     my $conn = $self->connection;
     return $self->respond (503, "but you already said HELO ...") if $conn->hello;
   
  -  my ($rc, $msg) = $self->run_hooks("ehlo", $hello_host);
  +  my ($rc, $msg) = $self->run_hooks("ehlo", $hello_host, @stuff);
     if ($rc == DONE) {
       # do nothing
     } elsif ($rc == DENY) {