From 57191960bf48c40ac0f7e805740f15927c026682 Mon Sep 17 00:00:00 2001 From: dakkar Date: Sat, 26 Mar 2011 12:05:17 +0000 Subject: crypto works! --- lib/DeWeave/WBO.pm | 3 +-- 1 file changed, 1 insertion(+), 2 deletions(-) (limited to 'lib/DeWeave/WBO.pm') diff --git a/lib/DeWeave/WBO.pm b/lib/DeWeave/WBO.pm index bdfb027..8d8a1ba 100644 --- a/lib/DeWeave/WBO.pm +++ b/lib/DeWeave/WBO.pm @@ -4,7 +4,6 @@ use namespace::autoclean; use MooseX::Types::Moose qw(Int Str Num); use JSON::Any; use Try::Tiny; -use Data::Dump 'pp'; has id => ( isa => Str, @@ -42,7 +41,7 @@ sub from_json { my $j = JSON::Any->new; my $args = $j->decode($json); - use Data::Dump 'pp';warn pp $args; + if (defined $args->{payload}) { $args->{__crypt}=$crypt; } -- cgit v1.2.3