User:ImplSearchBot/Code: Difference between revisions

m
ImplSearchBot:0
m (ImplSearchBot:0)
m (ImplSearchBot:0)
Line 251:
 
die "Unable to login: " . $loginres
unless $loginres == "Success"0;
return $editor;
Line 304:
my $first = shift;
my $second = shift;
my @newinfirstonlyinfirst = &diffcat_simple($second, $first);
my @newinsecondonlyinsecond = &diffcat_simple($first, $second);
return (\@newinfirstonlyinfirst, \@newinsecondonlyinsecond);
}
 
Line 413:
&out(scalar @categorycontents . " members retrieved for $categoryname\n", 5);
 
my ($addedremoved, $removedadded) = &diffcat(&getcacheddata($categoryname), \@categorycontents);
 
&out(scalar @$removed . " removed, " . @$added . " added to $categoryname\n", &getloglevelfromdiff(2, $removed, $added));