Commit c120d293 authored by Francesc Guasch's avatar Francesc Guasch
Browse files

[#61] don't disconnect after methods

parent b7106c91
...@@ -60,13 +60,10 @@ has 'readonly' => ( ...@@ -60,13 +60,10 @@ has 'readonly' => (
# #
# #
before 'create_domain' => \&_pre_create_domain; before 'create_domain' => \&_pre_create_domain;
after 'create_domain' => \&_disconnect;
before 'search_domain' => \&_connect; before 'search_domain' => \&_connect;
after 'search_domain' => \&_disconnect;
before 'create_volume' => \&_connect; before 'create_volume' => \&_connect;
after 'create_volume' => \&_disconnect;
############################################################# #############################################################
# #
...@@ -84,11 +81,6 @@ sub _connect { ...@@ -84,11 +81,6 @@ sub _connect {
$self->connect(); $self->connect();
} }
sub _disconnect {
my $self = shift;
$self->disconnect();
}
sub _pre_create_domain { sub _pre_create_domain {
_check_create_domain(@_); _check_create_domain(@_);
_connect(@_); _connect(@_);
......
Supports Markdown
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment