diff options
Diffstat (limited to 'lib/Bookmarks/M/DB.pm')
-rw-r--r-- | lib/Bookmarks/M/DB.pm | 42 |
1 files changed, 42 insertions, 0 deletions
diff --git a/lib/Bookmarks/M/DB.pm b/lib/Bookmarks/M/DB.pm new file mode 100644 index 0000000..44d7498 --- /dev/null +++ b/lib/Bookmarks/M/DB.pm @@ -0,0 +1,42 @@ +package Bookmarks::M::DB; + +use strict; +use base 'Catalyst::Model::CDBI'; +use Path::Class; + +my $DBHOME=dir(Bookmarks->config->{home})->file('bookmarks.db'); + +__PACKAGE__->config( + dsn => "dbi:SQLite:$DBHOME", + user => '', + password => '', + options => {}, + relationships => 1 +); + + +=head1 NAME + +Bookmarks::M::DB - CDBI Model Component + +=head1 SYNOPSIS + + Very simple to use + +=head1 DESCRIPTION + +Very nice component. + +=head1 AUTHOR + +Clever guy + +=head1 LICENSE + +This library is free software . You can redistribute it and/or modify it under +the same terms as perl itself. + +=cut + +1; + |