Changeset 700 for trunk/wiki.cgi


Ignore:
Timestamp:
Oct 23, 2005, 8:00:10 PM (16 years ago)
Author:
Earle Martin
Message:

Change "action=rss" parameter to "action=rc;format=rss". Extract RecentChanges code in OpenGuides.pm to its own sub (display_recent_changes()). Fix references to old params in templates. Put redirect to URL with new parameters into wiki.cgi for old parameter.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/wiki.cgi

    r699 r700  
    22
    33use strict;
     4use lib qw( /home/earle/openguides.org/testing/lib );
    45use warnings;
    56
    67use vars qw( $VERSION );
    7 $VERSION = '0.50';
     8$VERSION = '0.51';
    89
    910use CGI qw/:standard/;
     
    9899    } elsif ($action eq 'list_all_versions') {
    99100        $guide->list_all_versions( id => $node );
     101    } elsif ($action eq 'rc') {
     102        if ($format && $format eq 'rss') {
     103            my $feed = $q->param("feed");
     104            if ( !defined $feed or $feed eq "recent_changes" ) {
     105                my %args = map { $_ => ( $q->param($_) || "" ) }
     106                           qw( feed items days ignore_minor_edits username
     107                               category locale );
     108                $guide->display_rss( %args );
     109            } elsif ( $feed eq "chef_dan" ) {
     110                display_node_rdf( node => $node );
     111            } else {
     112                croak "Unknown RSS feed type '$feed'";
     113            }
     114        } else {
     115            $guide->display_node( id => 'RecentChanges' );
     116        }
    100117    } elsif ($action eq 'rss') {
    101         my $feed = $q->param("feed");
    102         if ( !defined $feed or $feed eq "recent_changes" ) {
    103             my %args = map { $_ => ( $q->param($_) || "" ) }
    104                        qw( feed items days ignore_minor_edits username
    105                            category locale );
    106             $guide->display_rss( %args );
    107         } elsif ( $feed eq "chef_dan" ) {
    108             display_node_rdf( node => $node );
    109         } else {
    110             croak "Unknown RSS feed type '$feed'";
    111         }
     118        print $q->redirect( $script_url . '?action=rc;format=rss' );
    112119    } else { # Default is to display a node.
    113120        if ( $format and $format eq "rdf" ) {
     
    120127        } else {
    121128            my $version = $q->param("version");
    122         my $other_ver = $q->param("diffversion");
     129            my $other_ver = $q->param("diffversion");
    123130            if ( $other_ver ) {
    124131                $guide->display_diffs(
Note: See TracChangeset for help on using the changeset viewer.