Index: openacs-4/packages/acs-tcl/tcl/site-nodes-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/site-nodes-procs.tcl,v
diff -u -N -r1.141.2.4 -r1.141.2.5
--- openacs-4/packages/acs-tcl/tcl/site-nodes-procs.tcl	29 Mar 2019 14:42:06 -0000	1.141.2.4
+++ openacs-4/packages/acs-tcl/tcl/site-nodes-procs.tcl	3 Jul 2019 18:12:25 -0000	1.141.2.5
@@ -612,6 +612,10 @@
     @param url URL path starting with a slash.
     @author Peter Marklund
 } {
+
+    ns_log notice "OLD nsv-based site_node::exists_p <$url>"
+            
+    
     set url_no_trailing [string trimright $url "/"]
     return [nsv_exists site_nodes "$url_no_trailing/"]
 }
@@ -1779,7 +1783,9 @@
         # lookup and check whether the returned node_id has the same
         # URL as the provided one.
         #
+        ns_log notice "site_node::exists_p <$url>"
         set node_id [::xo::site_node get_node_id -url $url_no_trailing]
+        ns_log notice "site_node::exists_p <[list ::xo::site_node get_node_id -url $url_no_trailing]> -> $node_id"
         return [expr {[::xo::site_node get_url -node_id $node_id] eq "$url_no_trailing/"}]
     }