=head2 replicateSelection()

Replicate the selected pages in the local oWireLocal to this
remote Wiki, if appropriate (i.e. this remote Wiki owns it).

Return 1 on success, else 0.

=cut
sub replicateSelection { my $self = shift;

    logDebug("Replicating to (" . $self->urlWikiRemote() . ")");

    for my $name (@{$self->oWireLocal()->raNameSelection()}) {
        if($self->rhNameOwner()->{$name}) {    #Do we own this page?
            $self->replicatePage($name) or return( logError("Could not replicate page ($name)") );
        }
    }

    return(1);
}

##</code><code>##

=head2 raExtractNamePageRecent([$html])

Return array ref with names of recently changed nodes/pages. 
Order: unique, most recent first.

If $html isn't passed, get the input from the Wiki.

Return undef on errors.

=cut
sub raExtractNamePageRecent { my $self = shift;
    my ($html) = @_;
    defined($html) or $html = get( $self->urlFromName("RecentChanges") ) or return(undef);

    my @aName = ($html =~ m|&nbsp;</td><td><a href="[^"]+">([^<]+)</a></td>|gs);

    #Already unique, because they are unique on the web page
        
    return(\@aName);
}