--- ./index.php-dist	2003-01-03 14:57:44.000000000 +0200
+++ ./index.php	2004-05-17 18:01:29.000000000 +0300
@@ -27,6 +27,8 @@
     } else {
         $main_page = Horde::applicationUrl('login.php');
     }
+    if (isset($HTTP_GET_VARS['module']))
+        $main_page = $main_page . "?module=" . $HTTP_GET_VARS['module'];
     if ($browser->hasFeature('wml')) {
         include HORDE_TEMPLATES . '/index/wap.inc';
     } elseif ($conf['menu']['floating_bar'] && (!$browser->hasQuirk('avoid_popup_windows'))) {
--- ./login.php-dist	2003-01-19 00:57:20.000000000 +0200
+++ ./login.php	2004-05-17 19:07:43.000000000 +0300
@@ -62,6 +62,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')) {
@@ -91,7 +99,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");