Index: openacs-4/packages/wiki/tcl/wikit-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/wiki/tcl/wikit-procs.tcl,v
diff -u -r1.1.2.1 -r1.1.2.2
--- openacs-4/packages/wiki/tcl/wikit-procs.tcl	6 Jan 2005 23:37:43 -0000	1.1.2.1
+++ openacs-4/packages/wiki/tcl/wikit-procs.tcl	7 Jan 2005 16:51:51 -0000	1.1.2.2
@@ -770,12 +770,13 @@
 	    set info [$ip $text]
 	    foreach {id name date} $info break
 	    if {$id == ""} {continue}
-
-	    regexp {[0-9]+} $id id
+            ns_log notice "stream_to_refs id='${id} name='${name}'"
+	    #regexp {[0-9]+} $id id
 	    set pages($id) ""
 	}
-	
+	ns_log notice "returning names [array names pages]"
 	array names pages
+        
     }
 
     # Output specific conversion. Extracts all external references