| Subject: | Helper hangs if SQLite @connect_info has only the DSN and no user/pass |
`script/tinyurl_create.pl model DB DBIC::Schema TinyURL::Schema
create=static dbi:SQLite:myapp.db` hangs due to line 403 in
C::H::DBIC::Schema, which reads:
shift @$connect_info while $connect_info->[0] eq '';
At that point @$connect_info is empty. A patch would be to change the
line to
shift @$connect_info while @$connect_info and $connect_info->[0] eq '';
On a side note, perl would have warned about this if warnings weren't
disabled.