Name

CatalystX::Usul::Model::Schema - Base class for database models

Version

Describes v0.17.$Rev: 1 $

Synopsis

   package YourApp::Model::YourModel;

   use CatalystX::Usul::Moose;

   extends q(CatalystX::Usul::Model::Schema);

   __PACKAGE__->config( database     => q(library),
                        schema_class => q(YourApp::Schema::YourSchema) );

   sub COMPONENT {
      my ($class, $app, $config) = @_;

      $config->{database    } ||= $class->config->{database};
      $config->{connect_info} ||=
         $class->get_connect_info( $app->config, $config->{database} );

      return $class->next::method( $app, $config );
   }

Description

Aggregates the methods from the two classes it inherits from

Configuration and Environment

BUILDARGS

Adds the attributes from CatalystX::Usul::Model to the ones from Catalyst::Model::DBIC::Schema

Subroutines/Methods

ACCEPT_CONTEXT

Copy of the one in CatalsytX::Usul::Model which is much more useful than the pointless one we are overriding in Catalyst::Model::DBIC::Schema

Diagnostics

None

Dependencies

Catalyst::Model::DBIC::Schema

CatalystX::Usul::Model

CatalystX::Usul::TraitFor::Model::QueryingRequest

CatalystX::Usul::TraitFor::Model::StashHelper

Class::Usul::TraitFor::ConnectInfo

Incompatibilities

There are no known incompatibilities in this module

Bugs and Limitations

There are no known bugs in this module. Please report problems to the address below. Patches are welcome

Author

Peter Flanigan, <Support at RoxSoft.co.uk>

License and Copyright

Copyright (c) 2014 Peter Flanigan. All rights reserved

This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself. See perlartistic

This program is distributed in the hope that it will be useful, but WITHOUT WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE