Item6840: Web names that are WikiWords make for broken links when including topics across webs

If the web name is a WikiWord then the link can break.

For example AfricaMap.Webhome is shown as Main.AfricaMap

-- TWiki:Main/PeterJones - 2012-01-25

This is confirmed. To reproduce:

• Create topic with WikiWords in the Sandbox web
• Include that topic into a topic that resides in another web
• Links get fixed as follows:
  • WebNotify to Sandbox.WebNotify (OK)
  • Main.WebNotify to Main.WebNotify (OK)
  • WikiWordWebName.WebNotify to Sandbox.WikiWordWebName.WebNotify (bug) - expected WikiWordWebName.WebNotify

-- TWiki:Main.PeterThoeny - 2012-01-26

This is now fixed in SVN trunk and TWiki-5.1 branch.

--- TWiki.pm   (revision 22576)
+++ TWiki.pm   (working copy)
@@ -2063,8 +2063,12 @@
     my $fromWeb = $options->{web};
 
     unless( $options->{in_noautolink} ) {
+        # Prefix web name to WikiWord to make links work, such as:
         # 'TopicName' to 'Web.TopicName'
+        # TWikibug:Item6840: Exclude 'WikiWordWeb.TopicName' using translation token
+        $text =~ s/(?:^|(?<=[\s(]))($regex{webNameRegex}\.($regex{wikiWordRegex}|$regex{abbrevRegex}))/-$TranslationToken$1)/go;
         $text =~ s#(?:^|(?<=[\s(]))($regex{wikiWordRegex})#$fromWeb.$1#go;
+        $text =~ s/-$TranslationToken//go;
     }
 
     # Handle explicit [[]] everywhere

-- TWiki:Main.PeterThoeny - 2012-01-26