fix NOOP

git-svn-id: https://svn.perl.org/qpsmtpd/trunk@88 958fd67b-6ff1-0310-b445-bb7760255be9

Changes

@@ -1,10 +1,12 @@
 0.12-dev
- 
-  Use /usr/bin/perl instead of the non-standard /home/perl/bin/perl
+
+  Fix NOOP command with perl 5.6.
 
   Better installation instructions and error message when no plugin
   allowed or denied relaying (thanks to Lars Rander
   <lrNOSPAM@rander.dk>).
+ 
+  Use /usr/bin/perl instead of the non-standard /home/perl/bin/perl
 
 
 0.11 - 2002/10/09

lib/Qpsmtpd/SMTP.pm

@@ -231,9 +231,7 @@ sub help {
 
 sub noop {
   my $self = shift;
-  warn Data::Dumper->Dump([\$self], [qw(self)]);
   $self->respond(250, "OK");
-
 }
 
 sub vrfy {