From 525c820d6b13326ad4cd796ddb064bca7651d5eb Mon Sep 17 00:00:00 2001 From: =?utf8?q?Sven=20Sch=C3=B6ling?= Date: Thu, 14 Jul 2011 15:43:15 +0200 Subject: [PATCH] =?utf8?q?Percent=20Attributhelper=20hat=20sich=20mittlerw?= =?utf8?q?eile=20ge=C3=A4ndert.?= MIME-Version: 1.0 Content-Type: text/plain; charset=utf8 Content-Transfer-Encoding: 8bit --- t/helper/attr.t | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) diff --git a/t/helper/attr.t b/t/helper/attr.t index 4a4576fa8..ef49d8e74 100644 --- a/t/helper/attr.t +++ b/t/helper/attr.t @@ -35,14 +35,14 @@ is($o->reqdate_as_date, '11.12.2007'); $o->reqdate(DateTime->new(year => 2010, month => 4, day => 12)); is($o->reqdate_as_date, '12.04.2010'); -is($o->marge_percent_as_percent('40'), '40'); +is($o->marge_percent_as_percent('40'), '40,00'); is($o->marge_percent, 0.40); -is($o->marge_percent_as_percent, '40'); +is($o->marge_percent_as_percent, '40,00'); is($o->marge_percent_as_percent('22,4'), '22,40'); is($o->marge_percent, 0.224); -is($o->marge_percent_as_percent, '22'); +is($o->marge_percent_as_percent, '22,40'); is($o->marge_percent(0.231), 0.231); -is($o->marge_percent_as_percent, '23'); +is($o->marge_percent_as_percent, '23,10'); # overloaded attr: invoice taxamount my $i = new_ok 'SL::DB::Invoice'; -- 2.20.1