fatto il db

4 files changed, 129 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;
+
diff --git a/lib/Bookmarks/M/DB/Links.pm b/lib/Bookmarks/M/DB/Links.pm
new file mode 100644
index 0000000..7b8928f
--- /dev/null
+++ b/lib/Bookmarks/M/DB/Links.pm
@@ -0,0 +1,29 @@
+package Bookmarks::M::DB::Links;
+
+use strict;
+
+=head1 NAME
+
+Bookmarks::M::DB::Links - CDBI Model Component Table Class
+
+=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;
+
diff --git a/lib/Bookmarks/M/DB/LinksTags.pm b/lib/Bookmarks/M/DB/LinksTags.pm
new file mode 100644
index 0000000..df85fe7
--- /dev/null
+++ b/lib/Bookmarks/M/DB/LinksTags.pm
@@ -0,0 +1,29 @@
+package Bookmarks::M::DB::LinksTags;
+
+use strict;
+
+=head1 NAME
+
+Bookmarks::M::DB::LinksTags - CDBI Model Component Table Class
+
+=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;
+
diff --git a/lib/Bookmarks/M/DB/Tags.pm b/lib/Bookmarks/M/DB/Tags.pm
new file mode 100644
index 0000000..3011510
--- /dev/null
+++ b/lib/Bookmarks/M/DB/Tags.pm
@@ -0,0 +1,29 @@
+package Bookmarks::M::DB::Tags;
+
+use strict;
+
+=head1 NAME
+
+Bookmarks::M::DB::Tags - CDBI Model Component Table Class
+
+=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;
+