notification::display::subscribe_url (public)

 notification::display::subscribe_url -type type -object_id object_id \
    -url url -user_id user_id [ -pretty_name pretty_name ]

Defined in packages/notifications/tcl/notification-display-procs.tcl

Returns the URL that allows one to subscribe to a notification type on a particular object. If the notifications package has not been mounted return the empty string.

Switches:
-type (required)
-object_id (required)
-url (required)
-user_id (required)
-pretty_name (optional)

Partial Call Graph (max 5 caller/called nodes):
%3 bug_tracker::bug::get_watch_link bug_tracker::bug::get_watch_link (public) notification::display::subscribe_url notification::display::subscribe_url bug_tracker::bug::get_watch_link->notification::display::subscribe_url notification::display::request_widget notification::display::request_widget (public) notification::display::request_widget->notification::display::subscribe_url packages/bug-tracker/www/notifications.tcl packages/bug-tracker/ www/notifications.tcl packages/bug-tracker/www/notifications.tcl->notification::display::subscribe_url packages/forums/lib/message/post.tcl packages/forums/ lib/message/post.tcl packages/forums/lib/message/post.tcl->notification::display::subscribe_url packages/notifications/lib/notification-widget.tcl packages/notifications/ lib/notification-widget.tcl packages/notifications/lib/notification-widget.tcl->notification::display::subscribe_url apm_package_url_from_key apm_package_url_from_key (public) notification::display::subscribe_url->apm_package_url_from_key export_vars export_vars (public) notification::display::subscribe_url->export_vars notification::package_key notification::package_key (public) notification::display::subscribe_url->notification::package_key notification::type::get_type_id notification::type::get_type_id (public) notification::display::subscribe_url->notification::type::get_type_id

Testcases:
No testcase defined.
Source code:
    set type_id [notification::type::get_type_id -short_name $type]

    set root_path [apm_package_url_from_key [notification::package_key]]

    if { $root_path eq "" } {
        return ""
    }

    set subscribe_url [export_vars -base "${root_path}request-new" { type_id user_id object_id pretty_name {return_url $url} }]

    return $subscribe_url
XQL Not present:
Generic, PostgreSQL, Oracle
[ hide source ] | [ make this the default ]
Show another procedure: