Index: openacs-4/packages/contacts/tcl/contacts-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/contacts/tcl/contacts-procs.tcl,v diff -u -N -r1.119 -r1.120 --- openacs-4/packages/contacts/tcl/contacts-procs.tcl 11 Aug 2007 20:12:20 -0000 1.119 +++ openacs-4/packages/contacts/tcl/contacts-procs.tcl 21 Feb 2011 14:27:27 -0000 1.120 @@ -335,7 +335,7 @@ } { @param party_id the party_id to check permission for @param type either 'email', 'mail' or 'phone' - @returns 1 or 0 if the specified type of communication is allowed + @return 1 or 0 if the specified type of communication is allowed } { if { [parameter::get -boolean -package_id $package_id -parameter "ContactPrivacyEnabledP" -default "0"] } { if { $package_id eq "" } { @@ -365,7 +365,7 @@ } { @param party_id the party_id to check permission for @param type either 'email', 'mail' or 'phone' - @returns 1 or 0 if the specified type of communication is allowed + @return 1 or 0 if the specified type of communication is allowed } { if { [contact::privacy_allows_p -party_id $party_id -type $type -package_id $package_id] } { return 0 Index: openacs-4/packages/dotlrn/tcl/community-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/tcl/community-procs.tcl,v diff -u -N -r1.204 -r1.205 --- openacs-4/packages/dotlrn/tcl/community-procs.tcl 13 Feb 2009 02:10:13 -0000 1.204 +++ openacs-4/packages/dotlrn/tcl/community-procs.tcl 21 Feb 2011 14:27:27 -0000 1.205 @@ -2383,7 +2383,7 @@ @param community_id The id of the Community in order to obtain the master template configured for it - @returns The path of the master template that will be used. + @return The path of the master template that will be used. } { set site_template_id [get_site_template_id -community_id $community_id] @@ -2400,7 +2400,7 @@ @param community_id The id of the Community of which we want to abtain the Site Template - @returns The id of the Site Template assigned to the Community + @return The id of the Site Template assigned to the Community } { return [util_memoize [list dotlrn_community::get_site_template_id_not_cached -community_id $community_id]] Index: openacs-4/packages/dotlrn/tcl/dotlrn-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/tcl/dotlrn-procs.tcl,v diff -u -N -r1.76 -r1.77 --- openacs-4/packages/dotlrn/tcl/dotlrn-procs.tcl 12 May 2010 14:15:34 -0000 1.76 +++ openacs-4/packages/dotlrn/tcl/dotlrn-procs.tcl 21 Feb 2011 14:27:27 -0000 1.77 @@ -430,7 +430,7 @@ @param community_id The id of the User in order to obtain the master template configured for him - @returns The path of the master template that will be used. + @return The path of the master template that will be used. } { set site_template_id [get_site_template_id -user_id $user_id] @@ -447,7 +447,7 @@ @param community_id The id of the User of whom we want to abtain the Site Template - @returns The id of the Site Template assigned to the User + @return The id of the Site Template assigned to the User } { return [util_memoize [list dotlrn::get_site_template_id_not_cached -user_id $user_id] ] Index: openacs-4/packages/imsld/tcl/imsld-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/imsld/tcl/imsld-procs.tcl,v diff -u -N -r1.123 -r1.124 --- openacs-4/packages/imsld/tcl/imsld-procs.tcl 14 Jan 2010 09:44:45 -0000 1.123 +++ openacs-4/packages/imsld/tcl/imsld-procs.tcl 21 Feb 2011 14:27:27 -0000 1.124 @@ -2509,7 +2509,7 @@ @param run_id @option user_id - @returns the url for the given activity + @return the url for the given activity } { set user_id [expr { [string eq $user_id ""] ? [ad_conn user_id] : $user_id }] Index: openacs-4/packages/invoices/tcl/invoice-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/invoices/tcl/invoice-procs.tcl,v diff -u -N -r1.29 -r1.30 --- openacs-4/packages/invoices/tcl/invoice-procs.tcl 11 Nov 2006 11:29:35 -0000 1.29 +++ openacs-4/packages/invoices/tcl/invoice-procs.tcl 21 Feb 2011 14:27:27 -0000 1.30 @@ -200,7 +200,7 @@ Substitute templates with invoice data. - @returns list of invoice texts + @return list of invoice texts } { set package_id [ad_conn package_id] set user_id [ad_conn user_id] @@ -421,7 +421,7 @@ Get template content and styles. - @returns tcl-list if content and styles document + @return tcl-list if content and styles document } { set filename "[acs_root_dir]/$template/content.xml" set file [open $filename] Index: openacs-4/packages/news-aggregator/tcl/aggregator-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/news-aggregator/tcl/aggregator-procs.tcl,v diff -u -N -r1.1 -r1.2 --- openacs-4/packages/news-aggregator/tcl/aggregator-procs.tcl 20 Mar 2004 11:04:39 -0000 1.1 +++ openacs-4/packages/news-aggregator/tcl/aggregator-procs.tcl 21 Feb 2011 14:27:27 -0000 1.2 @@ -17,7 +17,7 @@ @author Guan Yang (guan@unicast.org) @creation-date 2003-11-10 - @returns Tcl array-list with the information, or empty + @return Tcl array-list with the information, or empty string on error. } { if { ![db_0or1row aggregator_info ""] } { @@ -49,7 +49,7 @@ @author Guan Yang (guan@unicast.org) @creation-date 2003-07-10 - @returns tDOM document node + @return tDOM document node } { set items_query [news_aggregator::aggregator::items_sql \ -aggregator_id $aggregator_id \ @@ -169,7 +169,7 @@ @author Guan Yang (guan@unicast.org) @creation-date 2003-07-10 - @returns A string containing the XML document. + @return A string containing the XML document. } { dom setResultEncoding "utf-8" set doc [dom createDocument "opml"] Index: openacs-4/packages/oacs-dav/tcl/oacs-dav-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/oacs-dav/tcl/oacs-dav-procs.tcl,v diff -u -N -r1.15 -r1.16 --- openacs-4/packages/oacs-dav/tcl/oacs-dav-procs.tcl 27 May 2008 12:10:53 -0000 1.15 +++ openacs-4/packages/oacs-dav/tcl/oacs-dav-procs.tcl 21 Feb 2011 14:27:27 -0000 1.16 @@ -273,7 +273,7 @@ get the folder_id of the parent of an item from the uri @param uri - @returns parent_folder_id or empty string if folder does not exist + @return parent_folder_id or empty string if folder does not exist } { array set sn [oacs_dav::request_site_node $uri] @@ -494,7 +494,7 @@ ad_proc -public oacs_dav::request_folder_id { node_id } { resolves a node_id to a DAV enabled folder_id @param node_id site node_id of request - @returns folder_id, or empty string if no folder exists + @return folder_id, or empty string if no folder exists in dav_package_folder_map for this node_id } { return [db_string get_folder_id "" -default ""] Index: openacs-4/packages/project-manager/tcl/project-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/project-manager/tcl/project-procs.tcl,v diff -u -N -r1.45 -r1.46 --- openacs-4/packages/project-manager/tcl/project-procs.tcl 12 Aug 2007 00:39:36 -0000 1.45 +++ openacs-4/packages/project-manager/tcl/project-procs.tcl 21 Feb 2011 14:27:27 -0000 1.46 @@ -3401,7 +3401,7 @@ so on...) for the specific project_item_id @param project_item_id The project_item_id to get all the subprojects - @returns list of all the subprojects + @return list of all the subprojects } { # First we are going to get all subprojects @@ -3449,7 +3449,7 @@ @param projects The list of projects to get check the status @param status_id The status_id that all project must have - @returns 1 or 0 + @return 1 or 0 } { set projects [template::util::tcl_to_sql_list $projects] Index: openacs-4/packages/xcms-ui/tcl/xcms-ui-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/xcms-ui/tcl/xcms-ui-procs.tcl,v diff -u -N -r1.2 -r1.3 --- openacs-4/packages/xcms-ui/tcl/xcms-ui-procs.tcl 26 May 2004 01:05:22 -0000 1.2 +++ openacs-4/packages/xcms-ui/tcl/xcms-ui-procs.tcl 21 Feb 2011 14:27:27 -0000 1.3 @@ -25,7 +25,7 @@ @param redirect_to_folder if set to 1 then it will rebuild the return_url pointing to the new folder being moved to - @returns a link, normally used for the list builder + @return a link, normally used for the list builder } { set item_id $items_to_move set folder_id $destination_folder @@ -55,7 +55,7 @@ @param confirm if passed it will generate a link that will delete the items without confirmation - @returns a link to delete the items, but if a folder that will be deleted is not empty + @return a link to delete the items, but if a folder that will be deleted is not empty it will return a null string } { set item_id $items_to_delete @@ -80,7 +80,7 @@ @param template_id id of which template to use @param return_url after applying the template, redirect to this url - @returns a link to apply the template + @return a link to apply the template } { set url [export_vars -url -base "[ad_conn package_url]manage/apply-template" {item_id template_id return_url}] @@ -97,7 +97,7 @@ @param templates_to_delete a list of template_id you wish to delet @param return_url after deleting, move to this url - @returns a link to delete the templates + @return a link to delete the templates } { set confirm_p 1 set template_id $templates_to_delete @@ -115,7 +115,7 @@ @param cms_context switch to which cms_context @param return_url set where to redirect after switching cms_context - @returns a url to on how to switch to a cms_context + @return a url to on how to switch to a cms_context } { set package_url [ad_conn package_url]