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;
|