Changeset 773


Ignore:
Timestamp:
Apr 20, 2006, 3:13:20 PM (15 years ago)
Author:
Dominic Hargreaves
Message:

Fix RSS redirection (fixes #54)

Location:
trunk
Files:
2 edited

Legend:

Unmodified
Added
Removed
  • trunk/Changes

    r772 r773  
    1111        #93 Upgrade to new Google Maps API (for smaller javascript download)
    1212        #103 Fix empty Category/Locale list bug.
     13        #54 Fix RSS redirection for backwards compatibility.
    1314
    14150.52    5 March 2006
  • trunk/wiki.cgi

    r769 r773  
    1 #!/usr/local/bin/perl
     1#!/usr/bin/perl
    22
    33use strict;
     
    115115        }
    116116    } elsif ($action eq 'rss') {
    117         print $q->redirect( $script_url . '?action=rc;format=rss' );
     117        my $redir_target = $script_url . $script_name . '?action=rc;format=rss';
     118        my %args = map { $_ => ( $q->param($_) || "" ) }
     119            qw( feed items days ignore_minor_edits username
     120                category locale );
     121        foreach my $arg (sort keys %args) {
     122            if ($args{$arg} ne "") {
     123                $redir_target .= ";$arg=$args{$arg}";
     124            }
     125        }
     126        print $q->redirect( $redir_target );
    118127    } else { # Default is to display a node.
    119128        if ( $format and $format eq "rdf" ) {
Note: See TracChangeset for help on using the changeset viewer.