Marcus Ramberg > MojoMojo > MojoMojo::Schema::Result::Page

Download:
MojoMojo-1.11.tar.gz

Dependencies

Annotate this POD

Website

View/Report Bugs
Source  

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.

syntax highlighting: