use strict;
use warnings;
+
+# check deps
+BEGIN {
+ require DBIx::Class::Optional::Dependencies;
+ if (my $missing = DBIx::Class::Optional::Dependencies->req_missing_for ('ic_file') ) {
+ die "The following extra modules are required for DBIx::Class::InflateColumn::File: $missing\n";
+ }
+}
+
use base 'DBIx::Class';
use File::Copy;
-use Path::Class;
use DBIx::Class::Carp;
use namespace::clean;
sub _file_column_file {
my ($self, $column, $filename) = @_;
- my $column_info = $self->result_source->column_info($column);
+ my $column_info = $self->result_source->columns_info->{$column};
return unless $column_info->{is_file_column};