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 -N -r1.95.2.6 -r1.95.2.7 --- openacs-4/packages/acs-tcl/tcl/apm-procs.tcl 13 Jun 2016 17:15:04 -0000 1.95.2.6 +++ openacs-4/packages/acs-tcl/tcl/apm-procs.tcl 16 Nov 2016 19:06:04 -0000 1.95.2.7 @@ -1301,12 +1301,15 @@ Return the id of the (per default enabled) version of the given package_key. If no such version id can be found, returns the empty string. - @param all when specified, return the the enabled or disabled version_id of the package_key. + @param all when specified, return the the enabled or disabled version_ids of the package_key. @param package_key @author Peter Marklund + + @return the supposedly unique version_id for the enabled package, or a list of + all the enabled and disabled version when -all flag is specified } { if {$all_p} { - return [db_string get_id {} -default ""] + return [db_list get_id {}] } else { return [db_string get_enabled_id {} -default ""] }