Content deleted Content added
Updating published sources: CategoryCleaner: * Hmm, someone moved Category:Redirects to Category:Wikipedia redirects and I didn't even notice. |
Updating published sources: General: * Update for the addition of 'rvslots'. DatedCategoryDeleterTest: * Disable. It's clear that task won't be needed. BrokenRedirectDeleter: * Handle pages with newlines before the <code>#REDIRECT</code>. |
||
| (3 intermediate revisions by the same user not shown) | |||
Line 1:
{{ombox|type=notice|text= Approved 2009-12-13<br />[[Wikipedia:Bots/Requests for approval/AnomieBOT 36]]}}
<
package tasks::CategoryCleaner;
Line 11:
BRFA: Wikipedia:Bots/Requests for approval/AnomieBOT 36
Status: Approved 2009-12-13
Created: 2009-11-09
Line 35 ⟶ 34:
generator => 'categorymembers',
gcmtitle => 'Category:Wikipedia redirects',
gcmlimit => '
prop => 'info',
},
Line 47 ⟶ 46:
my $api=shift;
my $tok=shift;
my $txt=$tok->{'revisions'}[0]{'slots'}{'main'}{'*'};
$txt=~s/\[\[\s*(?i:Category)\s*:\s*[wW]ikipedia redirects\s*(?:\|.*?)?\]\]\s*//;
return ($txt,"Removing [[Category:Wikipedia redirects]] as that category is not intended for actual redirects");
Line 112 ⟶ 111:
my ($txt,$log)=$def->{'edit'}($api,$tok);
next if(!defined($txt) || $txt eq $tok->{'revisions'}[0]{'slots'}{'main'}{'*'});
$api->log("Editing $title: $log");
Line 134 ⟶ 133:
1;
</syntaxhighlight>
| |||