diff options
Diffstat (limited to 'lib/DeWeave/WBO.pm')
| -rw-r--r-- | lib/DeWeave/WBO.pm | 3 |
1 files changed, 1 insertions, 2 deletions
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; } |