- few fixes for last commits

alecpl

2009-07-11 5f571eb1dba01a5f257c52978f30cd53d773d15c

 program/lib/imap.inc

@@ -2338,9 +2338,9 @@
            echo $result;
         } else
            return $result; // substr($result, 0, strlen($result)-1);
          }
          
      return true;
          }
   }
    
   return false;
@@ -2480,12 +2480,11 @@
         do {
            $line = iil_ReadLine($fp, 5000);
            $line = iil_MultLine($fp, $line);
            list(, $index, $cmd, $rest) = explode(' ', $line);
            if ($cmd != 'FETCH' || $index == $id || preg_match("/^$key/", $line))
            if (!preg_match("/^$key/", $line))
               $result .= $line;
         } while (!preg_match("/^$key/", $line));

         $result = trim(substr($result, strpos($result, 'BODYSTRUCTURE')+13, -(strlen($result)-strrpos($result, $key)+1)));
         $result = trim(substr($result, strpos($result, 'BODYSTRUCTURE')+13, -1));
      }
   }
   return $result;