This repository was archived by the owner on Dec 22, 2021. It is now read-only.

Commit 16b2782

committed

PERL-1125 Use Num for expire time instead of Int

1 parent 7a5da10 commit 16b2782Copy full SHA for 16b2782

File tree

-1

lines changed

-1

lines changed

Lines changed: 2 additions & 1 deletion

Original file line number	Diff line number	Diff line change
`@@ -30,6 +30,7 @@ use Types::Standard qw(`
`30`	`30`	`HashRef`
`31`	`31`	`Str`
`32`	`32`	`Int`
	`33`	`+ Num`
`33`	`34`	`);`
`34`	`35`	`use namespace::clean -except => 'meta';`
`35`	`36`	`use Scalar::Util qw/looks_like_number/;`
`@@ -95,7 +96,7 @@ has valid_options => (`
`95`	`96`
`96`	`97`	`has expires => (`
`97`	`98`	`is => 'ro',`
`98`		`- isa => Int,`
	`99`	`+ isa => Num,`
`99`	`100`	`writer => '_set_expires',`
`100`	`101`	`);`
`101`	`102`

Comments

(0)