Revision 0d4dc351
Von Sven Schöling vor etwa 13 Jahren hinzugefügt
| t/helper/attr.t | ||
|---|---|---|
| 7 | 7 |
use_ok 'SL::DB::Invoice'; |
| 8 | 8 |
use_ok 'SL::Dispatcher'; |
| 9 | 9 |
|
| 10 |
SL::Dispatcher::pre_startup_setup(); |
|
| 11 | 10 |
|
| 11 |
{
|
|
| 12 |
$::dispatcher = SL::Dispatcher->new; |
|
| 13 |
$::dispatcher->pre_startup_setup; |
|
| 14 |
no warnings 'once'; |
|
| 12 | 15 |
$::form = Form->new; |
| 13 | 16 |
$::myconfig{numberformat} = '1.000,00';
|
| 14 | 17 |
$::myconfig{dateformat} = 'dd.mm.yyyy';
|
| 15 | 18 |
$::locale = Locale->new('de');
|
| 19 |
} |
|
| 16 | 20 |
|
| 17 | 21 |
my $p = new_ok 'SL::DB::Part'; |
| 18 | 22 |
is($p->sellprice_as_number('2,30'), '2,30');
|
Auch abrufbar als: Unified diff
dispatcher muss mittlerweile eine Instanz sein.