PATCH: Hide version, if config('smtpgreeting') exists

[Gordon Rowell]

If config('smtpgreeting') exists:
- Display it in the connect response
- Don't display the version in the 'help' response

Thanks,

Gordon

--- SMTP.pm.orig	2005-07-07 14:25:53.000000000 +1000
+++ SMTP.pm	2005-07-07 15:03:57.000000000 +1000
@@ -104,8 +104,9 @@
       return $rc;
     }
     elsif ($rc != DONE) {
-      $self->respond(220, $self->config('me') ." ESMTP qpsmtpd "
-          . $self->version ." ready; send us your mail, but not your spam.");
+      $self->respond(220, $self->config('smtpgreeting') ||
+       ($self->config('me') ." ESMTP qpsmtpd " . $self->version .
+        " ready; send us your mail, but not your spam."));
       return DONE;
     }
 }
@@ -334,7 +335,8 @@
 sub help {
   my $self = shift;
   $self->respond(214, 
-          "This is qpsmtpd " . $self->version,
+          "This is qpsmtpd " . 
+          $self->config('smtpgreeting') ? '' : $self->version,
           "See http://smtpd.develooper.com/";,
           'To report bugs or send comments, mail to <[EMAIL PROTECTED]>.');
 }