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 -r1.25 -r1.26
--- openacs-4/packages/acs-api-browser/tcl/acs-api-documentation-procs.tcl	29 Jul 2008 19:22:23 -0000	1.25
+++ openacs-4/packages/acs-api-browser/tcl/acs-api-documentation-procs.tcl	29 Sep 2008 08:42:06 -0000	1.26
@@ -621,7 +621,10 @@
 	append out [api_format_common_elements doc_elements]
 	
 	if { $source_p } {
-		if {[ad_parameter FancySourceFormattingP "" 1]} {
+		if {[parameter::get_from_package_key \
+                         -package_key acs-api-browser \
+                         -parameter FancySourceFormattingP \
+                         -default 1]} {
 			append out "<dt><b>Source code:</b></dt><dd>
 <pre>[api_tcl_to_html $proc_name]<pre>
 </dd><p>\n"