apidoc::set_public (private)

 apidoc::set_public version_id [ public_p ]

Defined in packages/acs-api-browser/tcl/acs-api-documentation-procs.tcl

Gets or sets the user's public/private preferences for a given package.

Parameters:
version_id - the version of the package
public_p (optional) - if empty, return the user's preferred setting or the default (1) if no preference found. If not empty, set the user's preference to public_p
Returns:
public_p

Partial Call Graph (max 5 caller/called nodes):
%3 packages/acs-api-browser/www/package-view.tcl packages/acs-api-browser/ www/package-view.tcl apidoc::set_public apidoc::set_public packages/acs-api-browser/www/package-view.tcl->apidoc::set_public packages/acs-api-browser/www/procs-file-view.tcl packages/acs-api-browser/ www/procs-file-view.tcl packages/acs-api-browser/www/procs-file-view.tcl->apidoc::set_public ad_get_client_property ad_get_client_property (public) apidoc::set_public->ad_get_client_property ad_set_client_property ad_set_client_property (public) apidoc::set_public->ad_set_client_property

Testcases:
No testcase defined.
Source code:
        set public_property_name "api,package,$version_id,public_p"
        if { $public_p eq "" } {
            set public_p [ad_get_client_property acs-api-browser $public_property_name]
            if { $public_p eq "" } {
                set public_p 1
            }
        } else {
            ad_set_client_property acs-api-browser $public_property_name $public_p
        }
        return $public_p
XQL Not present:
Generic, PostgreSQL, Oracle
[ hide source ] | [ make this the default ]
Show another procedure: