OpenACS Core Documentation Primers and References Documentation Improvement Project Archive

API Browser <% # This block of ADP code ensures that the Installer can still serve this # page even without a working templating system. set found_p 0 if {[db_table_exists apm_package_types]} { db_foreach get_installed_pkgs "select package_key, pretty_name from apm_package_types order by upper(pretty_name) " { if { ! $found_p } { set found_p 1 adp_puts "\n

Installed Packages\n

    \n" adp_puts "\n
  • Core Documentation\n" } set index_page [lindex [glob -nocomplain \ "[acs_package_root_dir $package_key]/www/doc/index.*"] 0] if { [file exists $index_page] } { if {![empty_string_p $pretty_name]} { adp_puts "
  • $pretty_name\n" } else { adp_puts "
  • $package_key\n" } } else { if {![empty_string_p $pretty_name]} { adp_puts "
  • $pretty_name\n" } else { adp_puts "
  • $package_key\n" } } } } if {!$found_p} { adp_puts "\n
  • Core Documentation\n" adp_puts "
  • No installed packages.\n" } adp_puts "
" set packages [core_docs_uninstalled_packages] if { ! [empty_string_p $packages] } { adp_puts "\n

Uninstalled packages\n

    " foreach {key name} $packages { set index_page [lindex [glob -nocomplain \ "[acs_package_root_dir $key]/www/doc/index.*"] 0] if { [file exists $index_page] } { adp_puts "
  • $name\n" } else { adp_puts "
  • $name\n" } } adp_puts "\n
" } %>
This software is licensed under the GNU General Public License, version 2 (June 1991)

Questions or comments about the documentation?
Please visit the OpenACS forums or send email to docs@openacs.org.