| 63 | | my $wiki = $self->{wiki}; |
| 64 | | |
| 65 | | # If we're not passed any parameters to limit the items returned, default to 15. |
| 66 | | |
| 67 | | my %criteria = ( |
| 68 | | ignore_case => 1, |
| 69 | | ); |
| 70 | | |
| 71 | | if ($args{days}) |
| 72 | | { |
| 73 | | $criteria{days} = $args{days}; |
| 74 | | } |
| 75 | | else |
| 76 | | { |
| 77 | | $criteria{last_n_changes} = $args{items} || 15; |
| 78 | | } |
| 79 | | |
| 80 | | if ($args{ignore_minor_edits}) |
| 81 | | { |
| 82 | | $criteria{metadata_wasnt} = { major_change => 0 }; |
| 83 | | } |
| 84 | | |
| 85 | | if ($args{filter_on_metadata}) |
| 86 | | { |
| 87 | | $criteria{metadata_was} = $args{filter_on_metadata}; |
| 88 | | } |
| 89 | | |
| 90 | | my @changes = $wiki->list_recent_changes(%criteria); |
| | 63 | my @changes = $self->fetch_recently_changed_nodes(%args); |
