Index: openacs-4/packages/acs-tcl/tcl/apm-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/apm-procs.tcl,v
diff -u -r1.59 -r1.60
--- openacs-4/packages/acs-tcl/tcl/apm-procs.tcl	13 Oct 2003 17:07:05 -0000	1.59
+++ openacs-4/packages/acs-tcl/tcl/apm-procs.tcl	16 Oct 2003 13:02:46 -0000	1.60
@@ -698,6 +698,13 @@
     }]
 }
 
+ad_proc -public apm_highest_version_name {package_key} {
+    Return the highest version of the indicated package.
+    @return the version_name of the highest installed version of a package.
+} {
+    return [db_string apm_highest_version_name {} -default ""]
+}
+
 ad_proc -public apm_num_instances {package_key} {
 
     @return The number of instances of the indicated package.