summaryrefslogtreecommitdiffstats
path: root/blog
diff options
context:
space:
mode:
authorin2 <in2@63ad8ddf-47c3-0310-b6dd-a9e9d9715204>2003-06-19 21:06:58 +0800
committerin2 <in2@63ad8ddf-47c3-0310-b6dd-a9e9d9715204>2003-06-19 21:06:58 +0800
commit2338fc576c1434ffc77799d7f70ab35b282d7126 (patch)
tree11e1697be272bd1dc3a2e85b73b62002aee5e77c /blog
parent8203e1b343f287c6d57d284af2b28f9fa16a072c (diff)
downloadpttbbs-2338fc576c1434ffc77799d7f70ab35b282d7126.tar
pttbbs-2338fc576c1434ffc77799d7f70ab35b282d7126.tar.gz
pttbbs-2338fc576c1434ffc77799d7f70ab35b282d7126.tar.bz2
pttbbs-2338fc576c1434ffc77799d7f70ab35b282d7126.tar.lz
pttbbs-2338fc576c1434ffc77799d7f70ab35b282d7126.tar.xz
pttbbs-2338fc576c1434ffc77799d7f70ab35b282d7126.tar.zst
pttbbs-2338fc576c1434ffc77799d7f70ab35b282d7126.zip
*** empty log message ***
git-svn-id: http://opensvn.csie.org/pttbbs/pttbbs/trunk/pttbbs@945 63ad8ddf-47c3-0310-b6dd-a9e9d9715204
Diffstat (limited to 'blog')
-rwxr-xr-xblog/blog.pl4
1 files changed, 2 insertions, 2 deletions
diff --git a/blog/blog.pl b/blog/blog.pl
index 725d3d01..96c929af 100755
--- a/blog/blog.pl
+++ b/blog/blog.pl
@@ -1,5 +1,5 @@
#!/usr/bin/perl
-# $Id: blog.pl,v 1.22 2003/06/19 12:40:24 in2 Exp $
+# $Id: blog.pl,v 1.23 2003/06/19 13:06:58 in2 Exp $
use CGI qw/:standard/;
use lib qw/./;
use LocalVars;
@@ -34,7 +34,7 @@ sub main
"$BLOGDATA/$brdname/config.db", O_RDONLY, 0666, $DB_HASH) ||
!(tie %attr, 'DB_File',
"$BLOGDATA/$brdname/attr.db", O_RDONLY, 0666, $DB_HASH) ){
- return redirect("http://blog.ptt2.cc/blog.pl/$1/")
+ return redirect("/blog.pl/$1/")
if( $ENV{PATH_INFO} =~ m|^/([\w\-]+?)$| );
print header(-status => 404);
return;