view release on metacpan or  search on metacpan

lib/Biblio/Zotero/DB/Schema.pm  view on Meta::CPAN

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__

=pod