@@ -1,3 +1,5 @@

+0.0502

+  update document

 0.0501

   packaging DBIx::Custom::Result DBIx::Custom::Query DBIx::Custom::MySQL DBIx::Custom::SQLite DBIx::Custom::SQL::Template 

 0.0401

@@ -3,7 +3,7 @@ use 5.008001;

 package DBIx::Custom;

 use Object::Simple;

-our $VERSION = '0.0501';

+our $VERSION = '0.0502';

 use Carp 'croak';

 use DBI;

@@ -755,7 +755,7 @@ DBIx::Custom - Customizable simple DBI

 =head1 VERSION

-Version 0.0501

+Version 0.0502

 =head1 CAUTION

@@ -1,10 +1,9 @@

 package DBIx::Custom::Basic;

-use 5.008001;

 use base 'DBIx::Custom';

-use Encode qw/decode encode/;

 use warnings;

 use strict;

+use Encode qw/decode encode/;

 my $class = __PACKAGE__;

@@ -1,70 +0,0 @@

-package DBIx::Custom::Pg;

-use base 'DBIx::Custom::Basic';

-

-use warnings;

-use strict;

-

-my $class = __PACKAGE__;

-

-

-sub connect {

-    my $self = shift;

-    

-    if (!$self->data_source) {

-        my $database = $self->database;

-        my $host     = $self->host;

-        my $port     = $self->port;

-        

-        my $data_source = "dbi:Pg:";

-        my $data_source_original = $data_source;

-        $data_source .= "dbname=$database;" if $database;

-        $data_source .= "host=$host;"       if $host;

-        $data_source .= "port=$port;"       if $port;

-        

-        $data_source =~ s/:$// if $data_source eq $data_source_original;

-        $self->data_source($data_source);

-    }

-    

-    return $self->SUPER::connect;

-}

-

-=head1 NAME

-

-DBIx::Custom::Pg - DBIx::Custom PostgreSQL implementation

-

-=head1 Synopsys

-

-=head1 See DBIx::Custom and DBI::Custom::Basic documentation

-

-This class is L<DBIx::Custom::Basic> subclass,

-and L<DBIx::Custom::Basic> is L<DBIx::Custom> subclass.

-

-You can use all methods of L<DBIx::Custom::Basic> and <DBIx::Custom>

-Please see L<DBIx::Custom::Basic> and <DBIx::Custom> documentation.

-

-=head1 Object methods

-

-=head2 connect

-

-    This method override DBIx::Custom::connect

-    

-    If database attribute is set, automatically data source is created and connect

-

-=head2 last_insert_id

-

-=head1 Author

-

-Yuki Kimoto, C<< <kimoto.yuki at gmail.com> >>

-

-Github L<http://github.com/yuki-kimoto>

-

-I develope this module L<http://github.com/yuki-kimoto/DBIx-Custom>

-

-=head1 Copyright & license

-

-Copyright 2009 Yuki Kimoto, all rights reserved.

-

-This program is free software; you can redistribute it and/or modify it

-under the same terms as Perl itself.

-

-

@@ -1,6 +1,9 @@

 package DBIx::Custom::Query;

 use Object::Simple;

+use strict;

+use warnings;

+

 sub sql             : Attr {}

 sub key_infos       : Attr {}

 sub bind_filter     : Attr {}

@@ -21,11 +24,7 @@ Object::Simple->build_class;

 =head1 NAME

-DBIx::Custom::Query - Query object for DBIx::Custom

-

-=head1 VERSION

-

-Version 0.0101

+DBIx::Custom::Query - DBIx::Custom query

 =head1 SYNOPSIS

@@ -1,5 +1,6 @@

 package DBIx::Custom::Result;

 use Object::Simple;

+

 use strict;

 use warnings;

 use Carp 'croak';

@@ -193,11 +194,7 @@ Object::Simple->build_class;

 =head1 NAME

-DBIx::Custom::Result - Resultset for DBIx::Custom

-

-=head1 VERSION

-

-Version 0.0301

+DBIx::Custom::Result - DBIx::Custom Resultset

 =head1 SYNOPSIS

@@ -1,6 +1,8 @@

 package DBIx::Custom::SQL::Template;

 use Object::Simple;

+use strict;

+use warnings;

 use Carp 'croak';

 # Accessor is created by Object::Simple. Please read Object::Simple document

@@ -471,13 +473,7 @@ sub expand_update_tag {

 =head1 NAME

-DBIx::Custom::SQL::Template - Custamizable SQL Template for DBIx::Custom

-

-=head1 VERSION

-

-Version 0.0101

-

-=cut

+DBIx::Custom::SQL::Template - DBIx::Custom SQL Template

 =head1 SYNOPSIS

@@ -1,8 +1,8 @@

 package DBIx::Custom::SQLite;

 use base 'DBIx::Custom::Basic';

-use warnings;

 use strict;

+use warnings;

 use Carp 'croak';

 my $class = __PACKAGE__;

@@ -64,10 +64,6 @@ sub last_insert_id {

 DBIx::Custom::SQLite - DBIx::Custom SQLite implementation

-=head1 Version

-

-Version 0.0201

-

 =head1 Synopsys

     use DBIx::Custom::SQLite;