Fix lower-casing email address on replies (#1488598)

Aleksander Machniak

2012-08-15 b7c84a1bb82a8446241517577875afd5f9c3a26c

 program/include/rcube_shared.inc

@@ -82,9 +82,11 @@
function in_array_nocase($needle, $haystack)
{
  $needle = mb_strtolower($needle);
  foreach ($haystack as $value)
    if ($needle===mb_strtolower($value))
      return true;
  foreach ((array)$haystack as $value) {
    if ($needle === mb_strtolower($value)) {
       return true;
    }
  }

  return false;
}
@@ -468,6 +470,29 @@


/**
 * Format e-mail address
 *
 * @param string $email E-mail address
 *
 * @return string Formatted e-mail address
 */
function format_email($email)
{
    $email = trim($email);
    $parts = explode('@', $email);
    $count = count($parts);

    if ($count > 1) {
        $parts[$count-1] = mb_strtolower($parts[$count-1]);

        $email = implode('@', $parts);
    }

    return $email;
}


/**
 * mbstring replacement functions
 */