Unverified Commit de213f09 authored by Birte Kristina Friesel's avatar Birte Kristina Friesel
Browse files

Location: Add TO_JSON function

parent 00c8fa4f
Loading
Loading
Loading
Loading
+8 −0
Original line number Diff line number Diff line
@@ -30,6 +30,14 @@ sub new {
	return $ref;
}

sub TO_JSON {
	my ($self) = @_;

	my $ret = { %{$self} };

	return $ret;
}

1;

__END__