summaryrefslogtreecommitdiffstats
path: root/staticweb
diff options
context:
space:
mode:
Diffstat (limited to 'staticweb')
-rwxr-xr-xstaticweb/index.pl5
1 files changed, 4 insertions, 1 deletions
diff --git a/staticweb/index.pl b/staticweb/index.pl
index ea48b874..2fcd7e30 100755
--- a/staticweb/index.pl
+++ b/staticweb/index.pl
@@ -1,5 +1,5 @@
#!/usr/bin/perl
-# $Id: index.pl,v 1.1 2003/07/03 12:39:05 in2 Exp $
+# $Id: index.pl,v 1.2 2003/07/04 05:59:05 in2 Exp $
use lib qw/./;
use LocalVars;
use CGI qw/:standard/;
@@ -10,6 +10,9 @@ sub main
{
my($tmpl, %rh);
+ print redirect("/man.pl/$1/")
+ if( $ENV{REDIRECT_REQUEST_URI} =~ m|/\?(.*)| );
+
charset('');
print header();