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.135 -r1.136
--- openacs-4/packages/xowiki/tcl/package-procs.tcl	1 Oct 2008 21:36:40 -0000	1.135
+++ openacs-4/packages/xowiki/tcl/package-procs.tcl	4 Oct 2008 18:42:25 -0000	1.136
@@ -149,15 +149,18 @@
     @param parent_id parent_id (for now just for download)
     @param name name of the wiki page
   } {
-    my get_lang_and_name -name $name lang stripped_name
     if {[regexp {^::[0-9]+$} $name]} {
       # special rule for folder objects. Will be most probably
       # removed...
       return $name
-    } else {
-      set folder [my folder_path -parent_id $parent_id]
-      return ${lang}:$folder$stripped_name
-    }
+    } 
+    set folder [my folder_path -parent_id $parent_id]
+    if {[regexp {^[0-9]+$} $name]} {
+      # the name looks like an unnamed entry
+      return $folder$name
+    } 
+    my get_lang_and_name -name $name lang stripped_name
+    return ${lang}:$folder$stripped_name
   }
 
   Package ad_instproc pretty_link {