From b398c46825dc73ac92677893dd2a714cd21f8a4d Mon Sep 17 00:00:00 2001 From: dakkar Date: Sat, 26 Mar 2011 12:40:12 +0000 Subject: collections working, subclasses, strings --- lib/DeWeave/EDO.pm | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) (limited to 'lib/DeWeave/EDO.pm') diff --git a/lib/DeWeave/EDO.pm b/lib/DeWeave/EDO.pm index f7a605f..3c32c84 100644 --- a/lib/DeWeave/EDO.pm +++ b/lib/DeWeave/EDO.pm @@ -4,23 +4,25 @@ use namespace::autoclean; use MooseX::Types::Moose qw(Int Str Num); use JSON::Any; use Try::Tiny; -use Data::Dump 'pp'; extends 'DeWeave::WBO'; has ciphertext => ( + traits => ['WBOInternal'], isa => Str, required => 1, is => 'ro', ); has IV => ( + traits => ['WBOInternal'], isa => Str, required => 1, is => 'ro', ); has hmac => ( + traits => ['WBOInternal'], isa => Str, required => 1, is => 'ro', @@ -43,6 +45,7 @@ around BUILDARGS => sub { @$args{keys %$extra_args} = values %$extra_args; } + return $args; }; -- cgit v1.2.3