diff options
Diffstat (limited to 'lib/DeWeave/WBO.pm')
-rw-r--r-- | lib/DeWeave/WBO.pm | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lib/DeWeave/WBO.pm b/lib/DeWeave/WBO.pm index db89581..3f551dd 100644 --- a/lib/DeWeave/WBO.pm +++ b/lib/DeWeave/WBO.pm @@ -36,7 +36,7 @@ has ttl => ( ); sub from_json { - my ($class,$json)=@_; + my ($class,$json,$crypt)=@_; my $j = JSON::Any->new; @@ -47,6 +47,7 @@ sub from_json { @$args{keys %$extra_args} = values %$extra_args; + $args->{__crypt}=$crypt; }; } |