| Subject: | foreign_key_info() dies |
I changed this line:
$u = (values %{$ukey{$t->{'confrelid'}}})[0]->[0];
... to this:
$u = ((values %{$ukey{$t->{'confrelid'}}})[0]||[])->[0];
...and it worked. (Or, at least, it didn't die.)
Death occurred during DBIx::Class::Schema::Loader::make_schema_at() (the
error was "can't use an undefined value as an ARRAY reference", hence
the fix).
DBIx::Class::Schema::Loader $VERSION = '0.04004'
This is perl, v5.8.8 built for x86_64-linux-gnu-thread-multi
Linux 2.6.22-2-amd64 #1 SMP Thu Aug 30 23:43:59 UTC 2007 x86_64 GNU/Linux
PostgreSQL 8.1.11 on x86_64-pc-linux-gnu, compiled by GCC cc (GCC) 4.1.2
20061115 (prerelease) (Debian 4.1.1-21)
$DBI::VERSION = "1.601"
Sorry I don't have more info than this.