Commit b1291364 authored by jani@hynda.mysql.fi's avatar jani@hynda.mysql.fi
Browse files

Fixed a bug in mail_to_db.pl

parent 1a4ac20b

tests/mail_to_db.pl

+3 −3
Original line number Diff line number Diff line
@@ -17,7 +17,7 @@ use DBI; 
use Getopt::Long;



$| = 1;

$VER = "2.3";

$VER = "2.4";



$opt_help          = 0;

$opt_version       = 0;
@@ -213,10 +213,10 @@ sub process_mail_file 
  %values = ();

  $type = "";

  $check = 0;



  while (<FILE>)

  {

    chop;

    chop if (substr($_, -1, 1) eq "\r");

    if ($type ne "message")

    { 

      if (/^Reply-To: (.*)/i)