diff options
| -rwxr-xr-x | public-inbox.cgi | 15 |
1 files changed, 11 insertions, 4 deletions
diff --git a/public-inbox.cgi b/public-inbox.cgi index bd592ce3..31d52133 100755 --- a/public-inbox.cgi +++ b/public-inbox.cgi @@ -78,14 +78,14 @@ sub main { invalid_list_mid(\%ctx, $1, $2) || get_mid_txt(\%ctx, $cgi); } elsif ($path_info =~ m!$LISTNAME_RE/m/(\S+)\.html\z!o) { invalid_list_mid(\%ctx, $1, $2) || get_mid_html(\%ctx, $cgi); - } elsif ($path_info =~ m!$LISTNAME_RE/m/(\S+)\z!o) { - redirect_mid_html($cgi, $1, $2); # full-message page } elsif ($path_info =~ m!$LISTNAME_RE/f/(\S+)\.html\z!o) { invalid_list_mid(\%ctx, $1, $2) || get_full_html(\%ctx, $cgi); - } elsif ($path_info =~ m!$LISTNAME_RE/f/(\S+)\z!o) { - redirect_mid_html($cgi, $1, $2); + + # convenience redirect + } elsif ($path_info =~ m!$LISTNAME_RE/(?:m|f)/(\S+)\z!o) { + invalid_list_mid(\%ctx, $1, $2) || redirect_mid(\%ctx, $cgi); } else { r404(); @@ -195,6 +195,13 @@ sub redirect_list_index { do_redirect($cgi->self_url . "/"); } +sub redirect_mid { + my ($ctx, $cgi) = @_; + my $url = $cgi->self_url; + $url =~ s!/f/!/m/!; + do_redirect($url . '.html'); +} + sub do_redirect { my ($url) = @_; [ '301 Moved Permanently', |