User:AnomieBOT/source/tasks/WikiProjectWorker.pm: Difference between revisions

Revision as of 17:56, 9 December 2009

Revision as of 15:27, 11 December 2009

Line 37:

### Increment this number every time a new run is started, so we don't have to

### mess around with deleting previous runs' database entries.

my $seq=1011;

### How to find the pages?

Line 282:

my $prio=undef;

my $imp=undef;

foreach my $p (@$params){

$prio=$1 if $p=~/^\s*priority\s*=\s*(\S.*?)\s*$/;

$imp=$1 if $p=~/^\s*importance\s*=\s*(\S.*?)\s*$/;

}

$prio//=$imp;

return $wikitext unless defined($prio);

my @pp=();

foreach my $p (@$params){

next if $p=~/^\s*(?:priority|importance)\s*=/;

if($p=~/^(\s*([^=]*?)\s*=\s*+(?!(?i)no|n|0|$|¬).*?)(\s*)$/ && exists($wg{$2})){

push @pp, $1;