fix silly bug

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

diff --git a/lib/DBIx/Class/DeploymentHandler.pm b/lib/DBIx/Class/DeploymentHandler.pm
index 376138d..a29af6f 100644 (file)
--- a/lib/DBIx/Class/DeploymentHandler.pm
+++ b/lib/DBIx/Class/DeploymentHandler.pm
@@ -39,8 +39,11 @@ sub prepare_version_storage_install {
 sub install_version_storage {
   my $self = shift;
 
+  my $version = (shift||{})->{version} || $self->schema_version;
+
   $self->install_resultsource({
-    result_source => $self->version_storage->version_rs->result_source
+    result_source => $self->version_storage->version_rs->result_source,
+    version       => $version,
   });
 }