X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FDBIx%2FClass%2FStorage%2FDBI%2FSybase.pm;h=f754ceacfd9867fc094d6ec0bb81032ec5c0f919;hb=6636ad53c7480e9546c2a0a3ecaa5a807874c819;hp=9cfc047aa729f1a25b4474e34d62cdfebbed7845;hpb=63d46bb3853faf51e05d39311c87b6aa7e44110d;p=dbsrgits%2FDBIx-Class.git diff --git a/lib/DBIx/Class/Storage/DBI/Sybase.pm b/lib/DBIx/Class/Storage/DBI/Sybase.pm index 9cfc047..f754cea 100644 --- a/lib/DBIx/Class/Storage/DBI/Sybase.pm +++ b/lib/DBIx/Class/Storage/DBI/Sybase.pm @@ -52,6 +52,8 @@ Used as: Does C<< $dbh->{syb_binary_images} = 1; >> to return C data as raw binary instead of as a hex string. +Recommended. + =cut sub connect_call_blob_setup { @@ -100,6 +102,8 @@ C columns only have minute precision. } } +sub datetime_parser_type { "DateTime::Format::Sybase" } + sub _dbh_last_insert_id { my ($self, $dbh, $source, $col) = @_; @@ -108,6 +112,15 @@ sub _dbh_last_insert_id { return ($dbh->selectrow_array($sth))[0]; } +=head2 count + +Counts for limited queries are emulated by executing select queries and +returning the number of successful executions minus the offset. + +This is necessary due to the limitations of Sybase. + +=cut + sub count { my $self = shift; my ($source, $attrs) = @_; @@ -137,8 +150,6 @@ sub count { return $count - $offset; } -sub datetime_parser_type { "DateTime::Format::Sybase" } - 1; =head1 NAME @@ -162,16 +173,25 @@ without doing a C list (one way to insure that is to define the column last in your +C class.) + =head1 AUTHORS See L.