s_json
traverse_depth_first as_tree init_with_tree new_from_tree
init_with_deflated_tree new_from_deflated_tree
as_yaml new_from_yaml init_with_yaml
as_json new_from_json i
nit_with_json
init_with_column_value_pairs
has_loaded_related strip forget_related
dirty_columns)
],
# This exists for the benefit of the test suite
all_noprereq =>
[
[
'_json_object'
],
);
#
# Class methods
#
sub json_encoder
{
my($class) = shift;
my $json = $class->_json_object;
unless(defined $json)
{
$json = $class->init_json_encoder;