summaryrefslogtreecommitdiff
path: root/perl-lib/PgCommitFest/DB.pm
diff options
context:
space:
mode:
Diffstat (limited to 'perl-lib/PgCommitFest/DB.pm')
-rw-r--r--perl-lib/PgCommitFest/DB.pm5
1 files changed, 5 insertions, 0 deletions
diff --git a/perl-lib/PgCommitFest/DB.pm b/perl-lib/PgCommitFest/DB.pm
index 0cd3b7d..4719007 100644
--- a/perl-lib/PgCommitFest/DB.pm
+++ b/perl-lib/PgCommitFest/DB.pm
@@ -89,6 +89,11 @@ sub insert_returning_id {
return $result->{'id'};
}
+sub quote {
+ my ($self, $value) = @_;
+ return $self->{'dbh'}->quote($value);
+}
+
sub rollback {
my ($self) = @_;
$self->{'dirty'} = 0;