summaryrefslogtreecommitdiff
path: root/t/tests/model/license.t
blob: d7e799383cd12184f8f5d4d42957b8cba74c6653 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
use v6.d.PREVIEW;
use Test;
use Ultramarine::Model::License;
 
my Ultramarine::Model::License $l .= new;
 
ok($l.is-valid,'the license should always be valid');
ok($l.email,'the license should have an email address');
ok($l.expires-at > now'the license should never expire');
 
done-testing;