Index: openacs-4/packages/acs-api-browser/tcl/acs-api-documentation-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-api-browser/tcl/acs-api-documentation-procs.tcl,v diff -u -N -r1.72.2.10 -r1.72.2.11 --- openacs-4/packages/acs-api-browser/tcl/acs-api-documentation-procs.tcl 6 Sep 2019 22:09:56 -0000 1.72.2.10 +++ openacs-4/packages/acs-api-browser/tcl/acs-api-documentation-procs.tcl 10 Sep 2019 12:57:29 -0000 1.72.2.11 @@ -293,9 +293,17 @@ return $out } -ad_proc -public api_type_documentation { +ad_proc -deprecated -public api_type_documentation { type } { + Deprecated: this was part of a feature which used to react to the + 'type' property set in ad_page_contract's documentation and + generate an extra link in /api-doc/package-view, but currently no + upstream script seems to specify this value and no code seems to + create necessary 'doc_type_doc' nsv + + @see acs-api-browser/www/type-view + @return HTML fragment of the API docs. } { array set doc_elements [nsv_get doc_type_doc $type] Index: openacs-4/packages/acs-api-browser/www/package-view.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-api-browser/www/package-view.adp,v diff -u -N -r1.11 -r1.11.2.1 --- openacs-4/packages/acs-api-browser/www/package-view.adp 18 Nov 2017 12:03:06 -0000 1.11 +++ openacs-4/packages/acs-api-browser/www/package-view.adp 10 Sep 2019 12:57:29 -0000 1.11.2.1 @@ -54,9 +54,6 @@ @content_pages.indentation;noquote@ @content_pages.name@ - - - @content_pages.first_sentence@ Index: openacs-4/packages/acs-api-browser/www/package-view.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-api-browser/www/package-view.tcl,v diff -u -N -r1.18 -r1.18.2.1 --- openacs-4/packages/acs-api-browser/www/package-view.tcl 19 Sep 2018 00:59:56 -0000 1.18 +++ openacs-4/packages/acs-api-browser/www/package-view.tcl 10 Sep 2019 12:57:29 -0000 1.18.2.1 @@ -127,7 +127,7 @@ } } content { - multirow create content_pages indentation full_path content_type name type first_sentence + multirow create content_pages indentation full_path content_type name first_sentence set last_components [list] foreach path [apm_get_package_files -package_key $package_key -file_types content_page] { set components [split $path "/"] @@ -153,21 +153,17 @@ append indentation "     " } set name [lindex $components $i] - set type "" set first_sentence "" if { $i == [llength $components] - 1 } { set content_type page - if { [info exists doc_elements(type)] } { - set type $doc_elements(type) - } if { [info exists doc_elements(main)] } { set first_sentence [::apidoc::first_sentence [lindex $doc_elements(main) 0]] } } else { set content_type directory } multirow append content_pages \ - $indentation $full_path $content_type $name $type $first_sentence + $indentation $full_path $content_type $name $first_sentence } set last_components $components } on error {errorMsg} { Index: openacs-4/packages/acs-api-browser/www/type-view.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-api-browser/www/type-view.tcl,v diff -u -N -r1.8 -r1.8.2.1 --- openacs-4/packages/acs-api-browser/www/type-view.tcl 23 May 2018 06:57:54 -0000 1.8 +++ openacs-4/packages/acs-api-browser/www/type-view.tcl 10 Sep 2019 12:57:29 -0000 1.8.2.1 @@ -2,6 +2,9 @@ Displays information about a type. + This page is currently in a non working state, as well as the + api_type_documentation api it makes use of. + @cvs-id $Id$ } {