NAME

Catalyst::Model::Gedcom - Gedcom Model Class

SYNOPSIS

        # lib/MyApp/Model/Gedcom.pm
        package MyApp::Model::Gedcom;
        
        use base qw( Catalyst::Model::Gedcom );
        
        __PACKAGE__->config(
                gedcom_file => 'root/my.ged',
                read_only   => 1
        );
        
        1;
        
        my $gedcom = $c->comp( 'MyApp::Model::Gedcom' );
        
        my @individuals = $gedcom->individuals;

DESCRIPTION

This is a model class to connect Gedcom files to Catalyst.

METHODS

new( )

passes your config options to Gedcom's new method.

AUTHOR

• Brian Cassidy <bricas@cpan.org>

COPYRIGHT AND LICENSE

Copyright 2005 by Brian Cassidy

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

SEE ALSO

• Catalyst

• Gedcom