X-Git-Url: https://vcs.fsf.org/?a=blobdiff_plain;f=index.php;h=e01ff86cd3b677239f8ac980c5b1c85b9636f045;hb=2d367c687f9813a45a3d2f1911036cfc0425fdd0;hp=cf5ba7655d81a1287c3147171e4dd2cd0e5defb9;hpb=7051c4300d4be70543edab7d42272d92b0070870;p=squirrelmail.git

diff --git a/index.php b/index.php
index cf5ba765..e01ff86c 100644
--- a/index.php
+++ b/index.php
@@ -1,27 +1,19 @@
 <?php
-   /** This redirects to the login script **/
 
-   // Get the path
-   $path = substr($PHP_SELF, 0, strrpos($PHP_SELF, '/'));
+   /**
+    **  index.php -- Displays the main frameset
+    **
+    **  Copyright (c) 1999-2000 The SquirrelMail development team
+    **  Licensed under the GNU GPL. For full terms see the file COPYING.
+    **
+    **  Redirects to the login page.
+    **
+    **  $Id$
+    **/
 
-   // Check if this is a HTTPS or regular HTTP request
-   $proto = "http://";
-   if(isset($HTTPS) && $HTTPS == 'on' ) {
-     $proto = "https://";
-   }
+   require_once('./functions/strings.php');
 
-   // Get the hostname from the Host header or server config.
-   // Fallback is to omit the server name and use a relative URI,
-   // although this is not RFC 2616 compliant.
-   if(isset($HTTP_HOST) && !empty($HTTP_HOST)) {
-     $location = $proto . $HTTP_HOST . $path;
-   } else if(isset($SERVER_NAME) && !empty($SERVER_NAME)) {
-     $location = $proto . $SERVER_NAME . $path;
-   } else {
-     $location = $path;
-   }
-
-   // Redirect
+   $location = get_location();
    header("Location: $location/src/login.php\n\n");
    exit();
-?>
+?>
\ No newline at end of file