--- ./login.php-dist	2002-06-08 07:15:55.000000000 +0300
+++ ./login.php	2003-05-02 12:06:34.000000000 +0300
@@ -61,6 +61,14 @@
                  'failed'  => _("Login failed for some reason. Most likely your username or password was entered incorrectly."));
 
 if (Auth::getAuth()) {
+// patch for autoredirect to any module after authentification
+    if (isset($HTTP_GET_VARS['module'])) {
+	$module = $HTTP_GET_VARS['module'];
+	foreach ($registry->applications as $app => $info) {
+	    if ($module == $app) header("location: ".$registry->getParam('webroot', $app));
+        }
+    }
+// end of patch
     $title = _("My Summary");
     $js_onLoad = null;
     if ($prefs->getValue('summary_refresh_time')) {
@@ -84,7 +92,11 @@
     }
 } elseif ($registry->hasMethod('auth/login')) {
     $url = Horde::getFormData('url', Horde::selfURL());
-    header('Location: ' . Horde::url($registry->link('auth/login', array('url' => Horde::url($url, true))), true));
+//    header('Location: ' . Horde::url($registry->link('auth/login', array('url' => Horde::url($url, true))), true));
+// patch for autoredirect to mail module IMP
+    $module = 'imp';
+    header('Location: ' . Horde::url($registry->link('auth/login', array('url' => Horde::url($url, true))), true).(isset($module) ? "%3Fmodule%3D".$module : ''));
+// end of patch
     exit;
 } else {
     $title = _("Horde Login");
--- ./lib/Lang.php-dist	2002-04-14 19:24:37.000000000 +0300
+++ ./lib/Lang.php	2003-03-05 16:24:09.000000000 +0200
@@ -34,8 +34,8 @@
 
         /* Try browser-accepted languages, then default. */
         } elseif (isset($HTTP_SERVER_VARS['HTTP_ACCEPT_LANGUAGE'])) {
-
             /* The browser supplies a list, so return the first valid one. */
+/*
             $browser_langs = explode(',', $HTTP_SERVER_VARS['HTTP_ACCEPT_LANGUAGE']);
             foreach ($browser_langs as $lang) {
                 $lang = Lang::_map(trim($lang));
@@ -47,6 +47,7 @@
                     break;
                 }
             }
+*/
         }
 
         /* No dice auto-detecting, so give them the server default. */