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

Content deleted Content added
AnomieBOT (talk | contribs)
Updating published sources: AFDMergeFromCleaner: * A little whitespace adjustment. * Use {{tl|afd-merged-from}}
AnomieBOT (talk | contribs)
Updating published sources: AFDMergeFromCleaner: * Bug fix.
Line 230:
my $intxt=exists($tok->{'revisions'}[0]{'*'})?$tok->{'revisions'}[0]{'*'}:'';
foreach my $s (split(/(?=(?:^|\n)==)/, $intxt)){
if($s=~/^\n?==\s*Redirected\s*==/){
$s=~s/\|}.*$//s;
foreach (split /\n\|-\n/, $s){
Line 238:
$redirected{"$1>$2>$3"}=$_;
}
} elsif($s=~/^\n?==\s*Deleted\s*==/){
$s=~s/\|}.*$//s;
foreach (split /\n\|-\n/, $s){