From: K J Cheetham Date: Tue, 5 Jun 2007 14:46:58 +0000 (+0000) Subject: POD tweak X-Git-Tag: v0.08010~150^2~19 X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=0876072cff6850bfc1408204babef9dd2c0c9e6a;hp=40dce2a5f0f24e152fe1773760904619804abb1f;p=dbsrgits%2FDBIx-Class.git POD tweak --- diff --git a/lib/DBIx/Class/InflateColumn/File.pm b/lib/DBIx/Class/InflateColumn/File.pm index 65fb87f..7816127 100644 --- a/lib/DBIx/Class/InflateColumn/File.pm +++ b/lib/DBIx/Class/InflateColumn/File.pm @@ -113,29 +113,10 @@ sub _save_file_column { } } -=head1 METHODS - -=cut - - -=head2 _file_column_callback ($file,$ret,$target) - -method made to be overridden for callback purposes. - -=cut - -sub _file_column_callback { - my ($self,$file,$ret,$target) = @_; -} - =head1 NAME DBIx::Class::InflateColumn::File - map files from the Database to the filesystem. -=head1 DESCRIPTION - -InflateColumn::File - =head1 SYNOPSIS In your L table class: @@ -167,7 +148,8 @@ In your L table class: In your L class: -FileColumn requires a hash that contains L as handle and the file's name as name. +FileColumn requires a hash that contains L as handle and the file's +name as name. my $entry = $c->model('MyAppDB::Articles')->create({ subject => 'blah', @@ -187,9 +169,26 @@ And Place the following in your TT template File Body: [% entry.body %] -The file will be stored on the filesystem for later retrieval. -Calling delete on your resultset will delete the file from the filesystem. -Retrevial of the record automatically inflates the column back to the set hash with the IO::File handle and filename. +The file will be stored on the filesystem for later retrieval. Calling delete +on your resultset will delete the file from the filesystem. Retrevial of the +record automatically inflates the column back to the set hash with the +IO::File handle and filename. + +=head1 DESCRIPTION + +InflateColumn::File + +=head1 METHODS + +=head2 _file_column_callback ($file,$ret,$target) + +method made to be overridden for callback purposes. + +=cut + +sub _file_column_callback { + my ($self,$file,$ret,$target) = @_; +} =head1 AUTHOR