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.9.2.2 -r1.9.2.3 --- openacs-4/packages/acs-api-browser/www/package-view.tcl 10 Sep 2015 08:21:11 -0000 1.9.2.2 +++ openacs-4/packages/acs-api-browser/www/package-view.tcl 20 Sep 2015 15:40:15 -0000 1.9.2.3 @@ -79,8 +79,13 @@ set first_sentence [::apidoc::first_sentence [lindex $doc_elements(main) 0]] set view procs-file-view } else { - set first_sentence "" - set view procs-file-view + array set doc_elements [api_read_script_documentation $full_path] + if { [info exists doc_elements(main)] } { + set first_sentence [::apidoc::first_sentence [lindex $doc_elements(main) 0]] + } else { + set first_sentence "" + } + set view content-page-view } multirow append procs_files $path $full_path $first_sentence $view