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

Revision as of 13:25, 21 February 2020

Latest revision as of 12:17, 8 August 2024

(2 intermediate revisions by the same user not shown)

Line 14:

Create redirects for non-existing talk pages of certain pages:

* Template pages ending in "/doc", "/sandbox", "/testcases", "/TemplateData", or "/TemplateDatastyles.css"

* Module pages ending in "/doc", "/sandbox", or "/sandboxstyles.css"

=end metadata

Line 26:

use AnomieBOT::Task;

use Data::Dumper;

use Time::HiRes;

use vars qw/@ISA/;

@ISA=qw/AnomieBOT::Task/;

Line 103 ⟶ 104:

# Load the list of redirects needing creation

my @rows;

my $t0 = Time::HiRes::time();

eval {

@rows = @{ $dbh->selectall_arrayref( qq{

Line 117 ⟶ 119:

return 300;

}

my $t1 = Time::HiRes::time();

$api->log( 'DB query took ' . ($t1-$t0) . ' seconds' );

last unless @rows;

Line 190 ⟶ 194:

}

my $txt = "#REDIRECT [[$target]]\n\n{{RcatRedirect category shell|\n{{R from remote talk page}}\n}}";

my $summary="Redirecting to [[$target]] to avoid decentralized discussion";