Index: openacs-4/packages/xolp/tcl/xolp-util-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/xolp/tcl/xolp-util-procs.tcl,v diff -u -N -r1.5 -r1.6 --- openacs-4/packages/xolp/tcl/xolp-util-procs.tcl 12 Apr 2019 12:17:25 -0000 1.5 +++ openacs-4/packages/xolp/tcl/xolp-util-procs.tcl 2 May 2019 15:46:24 -0000 1.6 @@ -35,7 +35,7 @@ return $list } - #if {$generate_iri_path} {set iri "${iri}:[uuid::uuid generate]"} + #if {$generate_iri_path} {set iri "${iri}:[ns_uuid]"} } ###################### @@ -49,7 +49,7 @@ ad_proc create_test_iris {{-nr 1}} {} { set iris {} for {set i 1} {$i <= $nr} {incr i} { - lappend iris "xolp:test:[uuid::uuid generate]" + lappend iris "xolp:test:[ns_uuid]" } return $iris }