Content deleted Content added
No edit summary Tag: Reverted |
m Reverted 1 edit by 50.224.156.210 (talk) to last revision by AnomieBOT |
||
Line 1:
{{ombox|type=notice|text= Per [[WP:BOT#Approval]], any bot or automated editing process that only affects only the operators' user and talk pages (or subpages thereof), and which are not otherwise disruptive, may be run without prior approval.}}
<syntaxhighlight lang="perl">
package tasks::SourceUploader;
=pod
=begin metadata
Bot: AnomieBOT
Task: SourceUploader
BRFA: N/A
Status: Begun 2008-08-15
Created: 2008-08-16
Updates the pages under [[User:AnomieBOT/source]] to reflect the current source
of the bot.
=end metadata
=cut
use utf8;
use strict;
use AnomieBOT::Task qw/:time/;
use vars qw/@ISA/;
@ISA=qw/AnomieBOT::Task/;
use Storable qw/dclone/;
use URI::Escape;
use tasks::SourceUploader::WikiPod;
Line 6 ⟶ 34:
use Fcntl ':mode';
my %extensions=(
'pl' => 'perl',
'pm' => 'perl',
Line 488 ⟶ 516:
return "01 Current" if($botnum>0 && $status=~/^Begun \d{4}-\d{2}-\d{2}$/);
return "02 On demand" if(exists($metadata{'ondemand'}) && $metadata{'ondemand'} eq 'true');
}
if($status=~/^Approved \d{4}-\d{2}-\d{2}$/){
return "01 Current" if $botnum>0;
|