1 package DBIx::Class::DeploymentHandler::VersionResultSet;
6 use parent 'DBIx::Class::ResultSet';
10 sub version_storage_is_installed {
12 try { $self->next; 1} catch { undef }
15 sub database_version {
17 $self->search(undef, {
18 order_by => { -desc => 'installed' },
20 })->get_column('version')->next || 0;