- fix FETCH reply parsing (#1485891)

alecpl

2009-06-02 07f0b943380210a6366c62728927314ec10fcfb6

 program/lib/imap.inc

@@ -1629,7 +1629,7 @@
            }

            // the rest of the result
            preg_match('/ BODY\[HEADER.FIELDS \(.*\)\]\s*(.*)/s', $line, $m);
            preg_match('/ BODY\[HEADER.FIELDS \(.*?\)\]\s*(.*)$/s', $line, $m);
            $reslines = explode("\n", trim($m[1], '"'));
            // re-parse (see below)
            foreach ($reslines as $line) {
@@ -1686,7 +1686,7 @@
                  $headers[$k] = '';
               }
            }
	

            // create array with header field:data
            while ( list($lines_key, $str) = each($lines) ) {
               list($field, $string) = iil_SplitHeaderLine($str);