Commit 05b7b65b authored by Leigh B Stoller's avatar Leigh B Stoller

Add DESTROY method, newer version of perl was unhappy without it.

Also a mysql 5.7 fixup.
parent bbc0b644
......@@ -1887,7 +1887,7 @@ sub FindProfilesUsing($$)
}
my $query_result =
DBQueryWarn("select distinct profileid,version ".
DBQueryWarn("select distinct profileid,version,name ".
" from apt_profile_images ".
"where image=$safe_urn ".
"order by name,version");
......@@ -1947,5 +1947,11 @@ AUTOLOAD {
return undef;
}
sub DESTROY {
my $self = shift;
$self->{'DBROW'} = undef;
}
# _Always_ make sure that this 1 is at the end of the file...
1;
Markdown is supported
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