diff options
author | Daniel Friesel <derf@finalrewind.org> | 2015-04-29 18:23:52 +0200 |
---|---|---|
committer | Daniel Friesel <derf@finalrewind.org> | 2015-04-29 18:23:52 +0200 |
commit | 7fdc8d20ca694307df44f38ac9ac02510188fab0 (patch) | |
tree | 4a2f729d9fe78a89c6cb40ee9589d73f53dae541 /lib/Travel/Status/DE/IRIS/Result.pm | |
parent | 39a5d4f2c608ab13358acb16a250d974afe0d951 (diff) |
Result: TO_JSON: Do not include references (causes death by recursion otherwise)
Diffstat (limited to 'lib/Travel/Status/DE/IRIS/Result.pm')
-rw-r--r-- | lib/Travel/Status/DE/IRIS/Result.pm | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/lib/Travel/Status/DE/IRIS/Result.pm b/lib/Travel/Status/DE/IRIS/Result.pm index ea96c55..daeb4b6 100644 --- a/lib/Travel/Status/DE/IRIS/Result.pm +++ b/lib/Travel/Status/DE/IRIS/Result.pm @@ -726,6 +726,12 @@ sub translate_msg { sub TO_JSON { my ($self) = @_; + my %copy = %{$self}; + delete $copy{arrival_wings}; + delete $copy{departure_wings}; + delete $copy{replaced_by}; + delete $copy{replacement_for}; + return { %{$self} }; } |