File Coverage

blib/lib/Biblio/Zotero/DB/Schema.pm

Criterion	Covered	Total	%
statement	19	21	90.4
branch			n/a
condition			n/a
subroutine	7	7	100.0
pod			n/a
total	26	28	92.8

use utf8;
package Biblio::Zotero::DB::Schema;
$Biblio::Zotero::DB::Schema::VERSION = '0.004';
# Created by DBIx::Class::Schema::Loader
# DO NOT MODIFY THE FIRST PART OF THIS FILE

use strict;
use warnings;

use base 'DBIx::Class::Schema';

__PACKAGE__->load_namespaces;


# Created by DBIx::Class::Schema::Loader v0.07035 @ 2013-07-02 23:02:38
# DO NOT MODIFY THIS OR ANYTHING ABOVE! md5sum:UlX+tV+7vyST2GUwO/11dw

# NOTE: extended DBIC schema below

use Moo;
use Path::Class;
use Path::Class::URI;

extends 'DBIx::Class::Schema';


has zotero_storage_directory => ( is => 'rw' );

around connection => sub {
	my ( $inner, $self, $dsn, $username, $pass, $attr ) = ( shift, @_ );

	$self->zotero_storage_directory(dir(
		delete $attr->{zotero_storage_directory}
	)->absolute) if(exists $attr->{zotero_storage_directory});

	$attr->{ReadOnly} = 1; # force to be readonly
  $attr->{sqlite_unicode} = 1; # strings are UTF-8
  # there are no SQL_BLOB types in the schema, so this should be fine

	$inner->(@_);
};

1;

__END__