Made a nice site for source.ipfire.org.

[ipfire.org.git] / index.pl

diff --git a/index.pl b/index.pl
index 5ab359bf0380cb9587895196595975ac65c09ec1..dd630fcae6b574740a080a7359a438e55acb7dbb 100755 (executable)
--- a/index.pl
+++ b/index.pl
@@ -1,4 +1,13 @@
 #!/usr/bin/perl
 
 print "Status: 302 Moved\n";
-print "Location: /de/\n\n";
+print "Pragma: no-cache\n";
+
+if ($ENV{'SERVER_NAME'} eq "source.ipfire.org") {
+       print "Location: /en/source.shtml\n";
+} else {
+       print "Location: /en/index.shtml\n";
+}
+
+# End http header...
+print "\n";