X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Flib%2FDecoratorLibrary.pm;h=880b45610646ffa80c2764aedeb3507d48ddc2ca;hb=686e58885d32547acf17d5d66b8ca5836a9af584;hp=180a959aca8a5ab45fc11680d31db3fb0fee57a9;hpb=d9002a8523567e24b0787a81d891928f937bd6af;p=gitmo%2FMooseX-Types.git diff --git a/t/lib/DecoratorLibrary.pm b/t/lib/DecoratorLibrary.pm index 180a959..880b456 100644 --- a/t/lib/DecoratorLibrary.pm +++ b/t/lib/DecoratorLibrary.pm @@ -10,6 +10,7 @@ use MooseX::Types MyHashRefOfStr StrOrArrayRef AtLeastOneInt + Jobs )]; ## Some questionable messing around @@ -68,5 +69,8 @@ subtype StrOrArrayRef, subtype AtLeastOneInt, as ArrayRef[Int], where { @$_ > 0 }; - + +enum Jobs, + (qw/Programming Teaching Banking/); + 1;