Skip to content
Snippets Groups Projects
Commit 98a18ba6 authored by Simon Potter's avatar Simon Potter
Browse files

added line to avoid a warning

parent c6dedc5c
No related branches found
No related tags found
No related merge requests found
......@@ -146,6 +146,8 @@ sub new {
sub adaptor {
my ($self,$arg) = @_;
$self->{_adaptor} ||= undef;
if (defined($arg)) {
$self->{_adaptor} = $arg;
}
......
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