cvs commit: qpsmtpd/lib Qpsmtpd.pm

[email protected] (Ask "Bj?rn" Hansen)
Newsgroups perl.cvs.qpsmtpd
Message-ID <[email protected]>
cvsuser     04/07/18 04:02:08

  Modified:    lib      Qpsmtpd.pm
  Log:
  fix the CDB support so we can work without it (but with a big warning)
  
  Revision  Changes    Path
  1.35      +3 -1      qpsmtpd/lib/Qpsmtpd.pm
  
  Index: Qpsmtpd.pm
  ===================================================================
  RCS file: /cvs/public/qpsmtpd/lib/Qpsmtpd.pm,v
  retrieving revision 1.34
  retrieving revision 1.35
  diff -u -w -r1.34 -r1.35
  --- Qpsmtpd.pm	11 Jun 2004 20:01:17 -0000	1.34
  +++ Qpsmtpd.pm	18 Jul 2004 11:02:08 -0000	1.35
  @@ -83,8 +83,10 @@
       eval { require CDB_File };
   
       if ($@) {
  -      $self->log(LOGERROR, "No $configfile.cdb support, could not load CDB_File module: $@");
  +      $self->log(LOGERROR, "No CDB Support! Did NOT read $configfile.cdb, could not load CDB_File module: $@");
  +      return +{};
       }
  +
       my %h;
       unless (tie(%h, 'CDB_File', "$configfile.cdb")) {
         $self->log(LOGERROR, "tie of $configfile.cdb failed: $!");
lmpx.com only provides a reader for public news (NNTP) servers. It is not affiliated with the servers or forums shown here and is not responsible for the content of articles, which is written by their respective authors.