User:ImplSearchBot/Code: Difference between revisions

Content added Content deleted
m (ImplSearchBot:0)
m (ImplSearchBot:0)
Line 69: Line 69:
if ( exists $options{'post'} );
if ( exists $options{'post'} );


if("yes" eq $wikineeded)
if(defined $wikineeded)
{
{
unless(exists $options{'username'} and exists $options{'password'})
unless(exists $options{'username'} and exists $options{'password'})
Line 549: Line 549:
my ($removed, $added) = &diffcat($old, $new);
my ($removed, $added) = &diffcat($old, $new);


my $out = "Removed from $category:\n";
my $out = "";


$out .= "Removed from $category:\n"
my $page;
if( scalar @$removed > 0 );
$out .= "$_\n"
foreach (@$removed);


$out .= "Added to $category:\n"
foreach $page (@$removed)
if( scalar @$added > 0 );
{
$out .= "$page\n";
$out .= "$_\n"
foreach (@$added);
}

$out .= "Added to $category:\n";
foreach $page (@$added)
{
$out .= "$page\n";
}


&out($out, 2);
&out($out, 2)
if("" ne $out);
}
}