From 695d7fd96eccb9a47b2bb44feaf475b65f3db138 Mon Sep 17 00:00:00 2001
From: einhverfr <einhverfr@4979c152-3d1c-0410-bac9-87ea11338e46>
Date: Fri, 21 Nov 2008 20:45:17 +0000
Subject: API tests now mostly work

git-svn-id: https://ledger-smb.svn.sourceforge.net/svnroot/ledger-smb/trunk@2412 4979c152-3d1c-0410-bac9-87ea11338e46
---
 LedgerSMB/DBTest.pm | 18 ++++++++++++++++++
 1 file changed, 18 insertions(+)

(limited to 'LedgerSMB')

diff --git a/LedgerSMB/DBTest.pm b/LedgerSMB/DBTest.pm
index 915bfc0b..b9eb6ae2 100644
--- a/LedgerSMB/DBTest.pm
+++ b/LedgerSMB/DBTest.pm
@@ -62,6 +62,14 @@ passes this call on to the private database handle
 
 passes this call on to the private database handle
 
+=item quote()
+
+passes this call on to the private database handle
+
+=item quote_identifier()
+
+passes this call on to the private database handle
+
 =item rollback()
 
 passes this call on to the private database handle.  Note that this will roll
@@ -108,6 +116,16 @@ sub errstr{
     return $self->{_dbh}->errstr;
 }
 
+sub quote{
+    my $self = shift @_;
+    return $self->{_dbh}->quote(@_);
+}
+
+sub quote_identifier{
+    my $self = shift @_;
+    return $self->{_dbh}->quote_identifier(@_);
+}
+
 sub prepare{
     my ($self, $statement) = @_;
     return $self->{_dbh}->prepare($statement);
-- 
cgit v1.2.3