Index: openacs-4/packages/xooauth/tcl/rest-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/xooauth/tcl/rest-procs.tcl,v
diff -u -r1.1.2.5 -r1.1.2.6
--- openacs-4/packages/xooauth/tcl/rest-procs.tcl	24 Jul 2023 13:10:36 -0000	1.1.2.5
+++ openacs-4/packages/xooauth/tcl/rest-procs.tcl	24 Jul 2024 17:15:25 -0000	1.1.2.6
@@ -249,10 +249,7 @@
             # Convert JSON to a Tcl dict and add it to the result
             # dict.
             #
-            if {[info commands ::json::json2dict] eq ""} {
-                package require json
-            }
-            return [::json::json2dict $json_string]
+            return [::util::json2dict  $json_string]
         }
 
         :method typed_value_to_json {type value} {