general_comments::create_link (public, deprecated)

 general_comments::create_link object_id object_name return_url \
    link_text [ context_id ] [ category ]

Defined in packages/general-comments/tcl/general-comments-procs.tcl

Deprecated. Invoking this procedure generates a warning.

Generates an html link to add a comment to an object.

Parameters:
object_id - The object to comment on.
object_name - The name of the object.
return_url - A url for the user to return to after viewing a comment.
link_text - The text to display for the link.
context_id (optional)
category (optional) - A category to associate comment to.
See Also:

Partial Call Graph (max 5 caller/called nodes):
%3 ad_log_deprecated ad_log_deprecated (public) export_vars export_vars (public) general_comments_package_url general_comments_package_url (public) general_comments::create_link general_comments::create_link general_comments::create_link->ad_log_deprecated general_comments::create_link->export_vars general_comments::create_link->general_comments_package_url

Testcases:
No testcase defined.
Source code:
ad_log_deprecated proc general_comments::create_link
        # get the package url
        set package_url [general_comments_package_url]

        set html [subst {<a href="[ns_quotehtml [export_vars -base ${package_url}comment-add {object_id
             object_name return_url context_id category}]]">$link_text</a>
        }]
        return $html
Generic XQL file:
packages/general-comments/tcl/general-comments-procs.xql

PostgreSQL XQL file:
packages/general-comments/tcl/general-comments-procs-postgresql.xql

Oracle XQL file:
packages/general-comments/tcl/general-comments-procs-oracle.xql

[ hide source ] | [ make this the default ]
Show another procedure: