Index: openacs-4/packages/xowiki/tcl/link-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/xowiki/tcl/link-procs.tcl,v
diff -u -r1.16 -r1.17
--- openacs-4/packages/xowiki/tcl/link-procs.tcl	10 Dec 2006 17:10:24 -0000	1.16
+++ openacs-4/packages/xowiki/tcl/link-procs.tcl	25 Dec 2006 21:26:21 -0000	1.17
@@ -19,13 +19,13 @@
   Link instproc init {} {
     set class [self class]::[my type]
     if {[my isclass $class]} {my class $class}
-    my log "--L link has class [my info class] // $class"
+    #my log "--L link has class [my info class] // $class"
   }
   Link instproc resolve {} {
-      my log "--lookup of [my name]"
-	if {![regexp {(.*?)(\#|%23)+(.*)$} [my name] full_name name anchor_tag anchor]} {
-	    set name [my name]
-	}
+    #my log "--lookup of [my name]"
+    if {![regexp {(.*?)(\#|%23)+(.*)$} [my name] full_name name anchor_tag anchor]} {
+      set name [my name]
+    }
     ::Generic::CrItem lookup -name $name -parent_id [my folder_id]
   }
   Link instproc render_found {href label} {