Index: openacs-4/packages/xowiki/tcl/package-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/xowiki/tcl/package-procs.tcl,v
diff -u -r1.332.2.17 -r1.332.2.18
--- openacs-4/packages/xowiki/tcl/package-procs.tcl	27 Jun 2019 08:25:24 -0000	1.332.2.17
+++ openacs-4/packages/xowiki/tcl/package-procs.tcl	27 Jun 2019 09:20:13 -0000	1.332.2.18
@@ -531,12 +531,16 @@
     set found_id [:lookup -parent_id $parent_id -name $name]
     if {$found_id != 0 && $page ne ""} {
       #:log "named page named <$name> exists, $page is folder: [$page is_folder_page], path <$folder>"
-      if {[$page is_folder_page] || $name eq [$page revision_id]} {
+      #
+      # Do NOT add a language prefix for folders, links and newborn
+      # pages.
+      #
+      if {[$page is_folder_page] || [$page is_link_page] || $name eq [$page revision_id]} {
         :log "... on the folder or newborn page."
         set found_id 0
       }
     }
-    #:log "-pretty_link: found_id=$found_id name=$name,folder=$folder,lang=$lang,default_lang=$default_lang"
+    #:log "-pretty_link: found_id=$found_id name=$name,folder=$folder,lang=$lang"
     if {$download} {
       #
       # Use the special download (file) syntax.