MojoMojo::Schema::Result::Page.3pm

Langue: en

Version: 2010-05-08 (ubuntu - 24/10/10)

Section: 3 (Bibliothèques de fonctions)

NAME

MojoMojo::Schema::Result::Page - store pages

METHODS

update_content <%args>

Create a new content version for this page.

%args is each column of MojoMojo::Schema::Result::Content.

add_version

     my $page_version_new = $page->add_version(
         creator => $user_id,
         name_orig => $page_new_name,
     );
 
 

Arguments: %replacementdata

Returns: The new PageVersion object.

Creates a new page version by cloning the latest version (hence pointing to the same content), and replacing its values with data in the replacement hash.

Used for renaming pages.

tagged_descendants($tag)

Return descendants with the given tag, ordered by name.

tagged_descendants_by_date

Return descendants with the given tag, ordered by creation time, most recent first.

descendants

   @descendants = $page->descendants( [$resultset_page] );
 
 

In list context, returns all descendants of this page (no paging), including the page itself. In scalar context, returns the resultset object.

If the optional $resultset_page is passed, returns that page from the resultset.

descendants_by_date

   @descendants = $page->descendants_by_date;
 
 

Like ``descendants'', but returns pages sorted by the dates of their last content release dates and pages results (20 per page).

user_tags($user)

Return popular tags for this page used $user.

others_tags($user)

Return popular tags for this page used by other people than $user.

tags_with_counts($user)

Return an array of {id, tag, refcount} for the $user's tags.

path( [$path] )

TODO Accessor?

has_photos

Return the number of photos attached to this page. Use for galleries.

AUTHOR

Marcus Ramberg <mramberg@cpan.org>

LICENSE

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