Untitled

sub renderTWikiRegistration {
  my $twikiWeb = &TWiki::Func::getTwikiWebname();

  my $twikiRegistrationTopic = 
    TWiki::Func::getPreferencesValue('TWIKIREGISTRATION') || 
    "$twikiWeb.TWikiRegistration";
  $twikiRegistrationTopic =~ s/\./\//g;

  return $twikiRegistrationTopic;
}




  $registerString =
    #'<a href="%SCRIPTURLPATH{"view"}%/%TWIKIREGISTRATION%" '.
    '<a href="'.
    renderTWikiRegistration().
    '"accesskey="r" title="%MAKETEXT{"Register on [_1]" args="<nop>%WIKITOOLNAME%"}%">%MAKETEXT{"Register"}%</a>';