Index: openacs-4/packages/acs-admin/tcl/apm-admin-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-admin/tcl/apm-admin-procs.tcl,v diff -u -r1.27 -r1.28 --- openacs-4/packages/acs-admin/tcl/apm-admin-procs.tcl 16 May 2018 17:08:51 -0000 1.27 +++ openacs-4/packages/acs-admin/tcl/apm-admin-procs.tcl 28 Jun 2018 14:58:16 -0000 1.28 @@ -73,7 +73,7 @@ } ad_proc apm_shell_wrap { cmd } { - Returns a command string, wrapped it shell-style (with backslashes) + @return a command string, wrapped it shell-style (with backslashes) in case lines get too long. } { set out "" 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.47 -r1.48 --- openacs-4/packages/acs-api-browser/tcl/acs-api-documentation-procs.tcl 15 Jun 2018 10:04:18 -0000 1.47 +++ openacs-4/packages/acs-api-browser/tcl/acs-api-documentation-procs.tcl 28 Jun 2018 14:58:16 -0000 1.48 @@ -685,7 +685,7 @@ -label proc } { - Return a pretty version of a proc name + @return a pretty version of a proc name @param label the label printed for the proc in the header line @param link provide a link to the documentation pages } { @@ -712,8 +712,8 @@ } ad_proc -public api_apropos_functions { string } { - Returns the functions in the system that contain string in their name - and have been defined using ad_proc. + @return the functions in the system that contain string in their name + and have been defined using ad_proc. } { set matches [list] foreach function [nsv_array names api_proc_doc] { @@ -932,7 +932,7 @@ ad_proc -private first_sentence { string } { - Returns the first sentence of a string. + @return the first sentence of a string. } { if { [regexp {^(.+?\.)\s} $string "" sentence] } { @@ -1482,7 +1482,7 @@ ad_proc -private xql_links_list { {-include_compiled 0} path } { - Returns list of xql files related to Tcl script file + @return list of xql files related to Tcl script file @param path path and filename from $::acs::rootdir } { @@ -1547,7 +1547,7 @@ # ad_proc api_proc_url { proc } { - Returns the URL of the page that documents the given proc. + @return the URL of the page that documents the given proc. @author Lars Pind (lars@pinds.com) @creation-date 14 July 2000 @@ -1556,7 +1556,7 @@ } ad_proc api_proc_link { proc } { - Returns a full HTML link to the documentation for the proc. + @return full HTML link to the documentation for the proc. @author Lars Pind (lars@pinds.com) @creation-date 14 July 2000 Index: openacs-4/packages/calendar/tcl/calendar-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/calendar/tcl/calendar-procs.tcl,v diff -u -r1.38 -r1.39 --- openacs-4/packages/calendar/tcl/calendar-procs.tcl 28 Jun 2018 14:48:40 -0000 1.38 +++ openacs-4/packages/calendar/tcl/calendar-procs.tcl 28 Jun 2018 14:58:16 -0000 1.39 @@ -374,7 +374,7 @@ {-calendar_id:required} {-user_id ""} } { - Returns true (1) if this is the user's personal calendar, false (0) otherwise. + @return true (1) if this is the user's personal calendar, false (0) otherwise. @param user_id The user whose calendar you want to check } { @@ -541,7 +541,7 @@ ad_proc -public calendar::notification::get_url { object_id } { - Returns a full URL to the object_id + @return a full URL to the object_id } { return [site_node::get_url_from_object_id -object_id $object_id] }