Bug 5601 :: Add tests for bugfix
Signed-off-by: Frédéric Demians <f.demians@tamil.fr> Signed-off-by: Chris Cormack <chrisc@catalyst.net.nz>
This commit is contained in:
parent
d4842d4560
commit
0d5029ec5b
1 changed files with 12 additions and 1 deletions
13
t/SIP_Sip.t
13
t/SIP_Sip.t
|
@ -6,7 +6,7 @@
|
|||
use strict;
|
||||
use warnings;
|
||||
|
||||
use Test::More tests => 1;
|
||||
use Test::More tests => 4;
|
||||
|
||||
BEGIN {
|
||||
use FindBin;
|
||||
|
@ -14,3 +14,14 @@ BEGIN {
|
|||
use_ok('C4::SIP::Sip');
|
||||
}
|
||||
|
||||
my $date_time = Sip::timestamp();
|
||||
like( $date_time, qr/^\d{8} \d{6}$/, 'Timestamp format no param');
|
||||
|
||||
my $t = time();
|
||||
|
||||
$date_time = Sip::timestamp($t);
|
||||
like( $date_time, qr/^\d{8} \d{6}$/, 'Timestamp format secs');
|
||||
|
||||
$date_time = Sip::timestamp('2011-01-12');
|
||||
ok( $date_time eq '20110112 235900', 'Timestamp iso date string');
|
||||
|
||||
|
|
Loading…
Reference in a new issue