perl-modperl mailing list archives

Site index · List index
Message view « Date » · « Thread »
Top « Date » · « Thread »
From Grant <emailgr...@gmail.com>
Subject Fixing a mod_perl module
Date Fri, 08 Dec 2006 18:12:43 GMT
Hello, I'm on the Interchange mailing list (icdevgroup.org) and we've
found a problem with our Interchange::Link mod_perl module for
apache2.  I don't know perl myself, and I was wondering if anyone here
might be able to help fix it.

The problem is that the Interchange tag:

[bounce href="http://www.domain.com" status="301 moved"]

uses the default 302 code when Interchange::Link is used.  It uses the
specified 301 without Interchange::Link.  The problem has been
isolated to this portion of code from Interchange::Link :

if($set_status =~ /^30[21]/) {
#warn "Doing redirect\n";
  $r->content_type($set_content);
  close (SOCK)                                or die "close: $!\n";
  return Apache2::Const::REDIRECT;
}

Please let me know if you can help.

- Grant

Mime
View raw message