From b4f7fbcdbe34c8c2751225a42be3e3762bb65e57 Mon Sep 17 00:00:00 2001
From: Oliver Gorwits <oliver@cpan.org>
Date: Thu, 20 Dec 2012 13:27:17 +0000
Subject: [PATCH] fix wrong method call

---
 Netdisco/bin/netdisco-deploy | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/Netdisco/bin/netdisco-deploy b/Netdisco/bin/netdisco-deploy
index 713e687c..5ad61461 100755
--- a/Netdisco/bin/netdisco-deploy
+++ b/Netdisco/bin/netdisco-deploy
@@ -74,7 +74,7 @@ sub deploy_db { system 'netdisco-db-deploy' }
 
 sub deploy_oui {
   my $schema = schema('netdisco');
-  $schema->source->disconnect;
+  $schema->storage->disconnect;
 
   my $url = 'http://standards.ieee.org/develop/regauth/oui/oui.txt';
   my $resp = HTTP::Tiny->new->get($url);