add missing newline for no-linenumber-change dzil

[dbsrgits/DBIx-Class-DeploymentHandler.git] / lib / DBIx / Class / DeploymentHandler / Types.pm

diff --git a/lib/DBIx/Class/DeploymentHandler/Types.pm b/lib/DBIx/Class/DeploymentHandler/Types.pm
index 3878c9f..9e8dda6 100644 (file)
--- a/lib/DBIx/Class/DeploymentHandler/Types.pm
+++ b/lib/DBIx/Class/DeploymentHandler/Types.pm
@@ -1,7 +1,10 @@
 package DBIx::Class::DeploymentHandler::Types;
+
 use strict;
 use warnings;
 
+# ABSTRACT: Types internal to DBIx::Class::DeploymentHandler
+
 use Moose::Util::TypeConstraints;
 subtype 'DBIx::Class::DeploymentHandler::Databases'
  => as 'ArrayRef[Str]';
@@ -9,6 +12,19 @@ subtype 'DBIx::Class::DeploymentHandler::Databases'
 coerce 'DBIx::Class::DeploymentHandler::Databases'
  => from 'Str'
  => via { [$_] };
-no Moose::Util::TypeConstraints;
 
+subtype 'StrSchemaVersion'
+ => as 'Str'
+ => message {
+  defined $_
+    ? "Schema version (currently '$_') must be a string"
+    : 'Schema version must be defined'
+ };
+
+no Moose::Util::TypeConstraints;
 1;
+
+# vim: ts=2 sw=2 expandtab
+
+__END__
+