--- EPrints/t/EPrints.t 2007/06/29 17:03:54 12 +++ EPrints/t/EPrints.t 2007/07/02 18:26:00 20 @@ -18,7 +18,7 @@ ok( EPrints->id( 42 ), 'id' ); ok( EPrints->lookup( 'title' ), 'title' ); -ok( my $slogovi = EPrints::slogovi( 'otorinolaringolog je duga riječ' ), 'slogovi' ); +ok( my $slogovi = EPrints->slogovi( 'otorinolaringolog je duga riječ' ), 'slogovi' ); diag "slogovi: $slogovi" if $debug;