From f619dedc5aa2020eeffa01e05feacedb043ccb66 Mon Sep 17 00:00:00 2001 From: thomascube Date: Sat, 22 Oct 2005 14:17:25 +0000 Subject: Patches for 20051021 release --- program/include/main.inc | 18 +++++++++--------- 1 file changed, 9 insertions(+), 9 deletions(-) (limited to 'program/include/main.inc') diff --git a/program/include/main.inc b/program/include/main.inc index f0df4ef65..7955aa870 100644 --- a/program/include/main.inc +++ b/program/include/main.inc @@ -253,6 +253,15 @@ function rcmail_login($user, $pass, $host=NULL) if (!$host) $host = $CONFIG['default_host']; + // parse $host URL + $a_host = parse_url($host); + if ($a_host['host']) + { + $host = $a_host['host']; + $imap_ssl = (isset($a_host['scheme']) && in_array($a_host['scheme'], array('ssl','imaps','tls'))) ? TRUE : FALSE; + $imap_port = isset($a_host['port']) ? $a_host['port'] : ($imap_ssl ? 993 : $CONFIG['default_port']); + } + // query if user already registered $sql_result = $DB->query(sprintf("SELECT user_id, username, language, preferences FROM %s @@ -269,15 +278,6 @@ function rcmail_login($user, $pass, $host=NULL) $user = $sql_arr['username']; } - // parse $host URL - $a_host = parse_url($host); - if ($a_host['host']) - { - $host = $a_host['host']; - $imap_ssl = (isset($a_host['scheme']) && in_array($a_host['scheme'], array('ssl','imaps','tls'))) ? TRUE : FALSE; - $imap_port = isset($a_host['port']) ? $a_host['port'] : ($imap_ssl ? 993 : $CONFIG['default_port']); - } - // exit if IMAP login failed if (!($imap_login = $IMAP->connect($host, $user, $pass, $imap_port, $imap_ssl))) return FALSE; -- cgit v1.2.3