X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=lib%2FDebbugs%2FDB%2FResultSet%2FBug.pm;fp=lib%2FDebbugs%2FDB%2FResultSet%2FBug.pm;h=bb257931bb0f253e11a9f2ed7b93be5ba1b6e4b8;hb=dfd1d5b50f0f2d1bae6deb5168de9f0bed11faa9;hp=265d4d97b8d82d169bfb00b8b65a5c517e16c84d;hpb=b402eacc8f657e94c53e517604d341e886e2140d;p=debbugs.git diff --git a/lib/Debbugs/DB/ResultSet/Bug.pm b/lib/Debbugs/DB/ResultSet/Bug.pm index 265d4d9..bb25793 100644 --- a/lib/Debbugs/DB/ResultSet/Bug.pm +++ b/lib/Debbugs/DB/ResultSet/Bug.pm @@ -24,8 +24,6 @@ use warnings; use base 'DBIx::Class::ResultSet'; -use Debbugs::DB::Util qw(select_one); - use List::AllUtils qw(natatime); @@ -68,17 +66,11 @@ actually be calling C instead of this function. sub quick_insert_bug { my ($self,$bug) = @_; - return $self->result_source->schema->storage-> - dbh_do(sub { - my ($s,$dbh,$b) = @_; - select_one($dbh,<<'SQL',$b); + return $self->result_source->schema-> + select_one(<<'SQL',$bug); INSERT INTO bug (id,subject,severity) VALUES (?,'',1) ON CONFLICT (id) DO NOTHING RETURNING id; SQL - }, - $bug - ); - }