add missing newline for no-linenumber-change dzil
[dbsrgits/DBIx-Class-DeploymentHandler.git] / lib / DBIx / Class / DeploymentHandler / Types.pm
index 67e4780..9e8dda6 100644 (file)
@@ -1,4 +1,5 @@
 package DBIx::Class::DeploymentHandler::Types;
+
 use strict;
 use warnings;
 
@@ -11,8 +12,16 @@ 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