The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.

NAME

Angerwhale::Controller::Tags - Catalyst Controller

SYNOPSIS

See Angerwhale

DESCRIPTION

Catalyst Controller.

METHODS

check_tag_access

Checks to see if the current user is allowed to tag. Sets response code to HTTP 401 is access is denied and returns false to Perl, or true if the user is allowed to tag.

do_tag($article, @args)

If called without @args, returns a textual list of tags. Otherwise tags the article with the POSTed tags. (Called by AJAX tagging system.)

Returns false and sets HTTP error to 404 if an invalid article is specified.

show_tagged_articles(@tags)

Renders a page showing all article tagged with all of @tags.

tag_list

Renders a tag cloud. Forwarded to by index (below).

get_nav_box

Used by AJAX editor to update the sidebar after tagging.

all_tags

Show all tags. Currently dispatches to tag_list to render a Web 2.0 compliant Tag Cloud. Yay.

AUTHOR

Jonathan Rockway

LICENSE

This library is free software, you can redistribute it and/or modify it under the same terms as Perl itself.