Index: openacs-4/packages/acs-tcl/tcl/apm-install-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/apm-install-procs.tcl,v diff -u -r1.126.2.29 -r1.126.2.30 --- openacs-4/packages/acs-tcl/tcl/apm-install-procs.tcl 26 Aug 2024 08:48:43 -0000 1.126.2.29 +++ openacs-4/packages/acs-tcl/tcl/apm-install-procs.tcl 27 Aug 2024 13:37:22 -0000 1.126.2.30 @@ -1859,7 +1859,7 @@ # especially on large sites. By deactivating the following line, # just "Main Site Administrators" will have rights on the # /api-doc, which is probably the right thing to do on most sites. - # With the new permissions interface, providing more liberal rights via is + # With the new permissions interface, providing more liberal rights via is # if {0} { # Only registered users should have permission to access the @@ -1956,7 +1956,7 @@ The spec contains a flat list of triples of the form { "from_version" "to_version" "code_chunk" "from_version" "to_version" "code_chunk ..." }. - + The list is compared against the "from_version_name" and "to_version_name" parameters supplied, and the code_chunks that fall within the from_version_name and to_version_name it'll get @@ -2218,14 +2218,14 @@ $doc documentElement root foreach node [$root selectNodes {//ul/li/a}] { set href [$node getAttribute href] - if {[regexp {(\d+[-]\d+)} $href . version]} { + if {[regexp {^(\d+[-]\d+)} $href . version]} { set name $version set tag oacs-$version lappend repositories [list $name $tag] } else { - set txt [string trim [$node asText]] - ns_log warning "unexpected li found in repository $repository_url: $txt" - continue + #set txt [string trim [$node asText]] + #ns_log warning "unexpected href found in repository $repository_url: $txt ($href)" + #continue } } return $repositories