Index: openacs-4/packages/xotcl-core/tcl/06-param-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/xotcl-core/tcl/06-param-procs.tcl,v
diff -u -N -r1.24.2.10 -r1.24.2.11
--- openacs-4/packages/xotcl-core/tcl/06-param-procs.tcl	10 Jul 2020 10:18:13 -0000	1.24.2.10
+++ openacs-4/packages/xotcl-core/tcl/06-param-procs.tcl	1 Sep 2020 17:56:06 -0000	1.24.2.11
@@ -164,10 +164,12 @@
   }
   parameter proc get_package_id_from_package_key {-package_key:required} {
     return [ns_cache eval xotcl_package_cache package_id-$package_key {
-      ::xo::dc get_value get_package_id \
-          [::xo::dc select -vars package_id -from apm_packages \
-               -where "package_key = :package_key" -limit 1]
-    }]
+      ::xo::dc get_value get_package_id {
+        select min(package_id)
+        from apm_packages
+        where package_key = :package_key
+      }
+    }
   }
 
   parameter proc get_parameter_object {