From 523c27df90abf71c0d55a12575e4bf7b3c3a1a97 Mon Sep 17 00:00:00 2001
From: einhverfr <einhverfr@4979c152-3d1c-0410-bac9-87ea11338e46>
Date: Sun, 23 Nov 2008 00:07:20 +0000
Subject: Test case for print_max_invoices bug added

git-svn-id: https://ledger-smb.svn.sourceforge.net/svnroot/ledger-smb/trunk@2418 4979c152-3d1c-0410-bac9-87ea11338e46
---
 t/62-api.t | 6 ++++++
 1 file changed, 6 insertions(+)

(limited to 't/62-api.t')

diff --git a/t/62-api.t b/t/62-api.t
index 740a1fcb..3357a8ba 100644
--- a/t/62-api.t
+++ b/t/62-api.t
@@ -2,6 +2,7 @@ BEGIN {
 	use LedgerSMB;
 	use Test::More;
 	use LedgerSMB::Template;
+	use LedgerSMB::Sysconfig;
 	use LedgerSMB::DBTest;
 }
 
@@ -31,6 +32,7 @@ for (qw(	drafts.pl     login.pl      payment.pl
 } # Import new code namespaces
 
 my $dbh = LedgerSMB::DBTest->connect("dbi:Pg:dbname=$ENV{PGDATABASE}", undef, undef);
+my $locale = LedgerSMB::Locale->get_handle( ${LedgerSMB::Sysconfig::language} );
 
 for my $test (@$test_request_data){
 	if (lc $test->{_codebase} eq 'old'){
@@ -52,6 +54,7 @@ for my $test (@$test_request_data){
 	} else {
 		my $request = LedgerSMB->new();
 		$request->merge($test);
+		$request->{_locale} = $locale;
 		my $script = $test->{module};
 		$request->{dbh} = $dbh;
 		if (ref $api_test_cases->{"$test->{_test_id}"} eq 'CODE'){
@@ -83,6 +86,9 @@ sub render {
 	return 1;
 }
 
+sub _http_output {
+	return 1;
+}
 package old_code_test;
 # Keeps old code isolated in a different namespace, and provides for reasonable 
 # reload facilities.
-- 
cgit v1.2.3