MojoMojo::Schema::Result::Page(3)

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.