We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
There was an error while loading. Please reload this page.
1 parent b418668 commit 65fe1f3Copy full SHA for 65fe1f3
lib/MetaCPAN/Web/Controller/Pod.pm
@@ -40,7 +40,10 @@ sub view : Private {
40
my $release = $c->stash->{release};
41
42
if ( $data->{directory} ) {
43
- $c->cdn_max_age('1y');
+
44
+# This can end up being a redirect from a non-versioned path to a versioned path
45
+# and it doesn't have any surrogate keys so it won't get purged.
46
+ $c->cdn_max_age('1d');
47
$c->res->redirect( $c->uri_for( '/source', @path ), 301 );
48
$c->detach;
49
}
0 commit comments