From: David Jack Olrik Date: Fri, 9 Mar 2007 22:02:40 +0000 (+0000) Subject: Disabled broken inflate/deflate. X-Git-Tag: v0.08010~150^2~90 X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=23f067d16c10318f06d060a6205bcd05a84ec06e;p=dbsrgits%2FDBIx-Class.git Disabled broken inflate/deflate. Current now passes all tests again. (DBIx::Class::InflateColumn::File is still broken) --- diff --git a/lib/DBIx/Class/InflateColumn/File.pm b/lib/DBIx/Class/InflateColumn/File.pm index b7bda60..65fb87f 100644 --- a/lib/DBIx/Class/InflateColumn/File.pm +++ b/lib/DBIx/Class/InflateColumn/File.pm @@ -17,10 +17,14 @@ sub register_column { $self->inflate_column( $column => { - inflate => $self->_inflate_file_column, + inflate => sub { + my ($value, $obj) = @_; + #$self->_inflate_file_column; + }, deflate => sub { - my ( $file, @column_names ) = $self->_load_file_column_information; - $self->_save_file_column( $file, $self, @column_names ); + my ($value, $obj) = @_; + #my ( $file, @column_names ) = $self->_load_file_column_information; + #$self->_save_file_column( $file, $self, @column_names ); }, } );