X-Git-Url: https://vcs.fsf.org/?a=blobdiff_plain;ds=sidebyside;f=index.php;h=92f94cd419036789e74616071f130aae1960d9a3;hb=0f5292858e4e085fd16d5d86431597d61ce8684d;hp=0914d2fa92fd4ba2711db48f9a1aad92a7982776;hpb=445903f6a81ee82088a9374ce440c0881d428cec;p=squirrelmail.git

diff --git a/index.php b/index.php
index 0914d2fa..92f94cd4 100644
--- a/index.php
+++ b/index.php
@@ -1,25 +1,20 @@
 <?php
-   // Get the path
-   $path = substr($PHP_SELF, 0, strrpos($PHP_SELF, '/'));
 
-   // Check if this is a HTTPS or regular HTTP request
-   $proto = "http://";
-   if(isset($HTTPS) && $HTTPS == 'on' ) {
-     $proto = "https://";
-   }
+/**
+ * index.php -- Displays the main frameset
+ *
+ * Copyright (c) 1999-2002 The SquirrelMail Project Team
+ * Licensed under the GNU GPL. For full terms see the file COPYING.
+ *
+ * Redirects to the login page.
+ *
+ * $Id$
+ */
 
-   // 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;
-   }
+require_once('./functions/strings.php');
+
+$location = get_location();
+header("Location: $location/src/login.php\n\n");
+exit();
 
-   // Redirect
-   header("Location: $location/src/login.php\n\n");
-   exit();
 ?>