/
CDC-1.2b/
CDC-1.2b/src/
parent $arg_opts
object $display_opts

var $root child_index 0
var $root owners [$display_opts]
var $root owned [$display_opts]
var $root fertile 0
var $root inited 1
var $arg_opts opt_rec [['max_parent, "anc", 'obj_or_dict, ['sub, 1], #[["^", ['sub, 1]], [",", ['sub, 2]]]], ['show_private, "pri?vate", 'on_off_dict, ['val, 0], #[['plus, ['val, 1]], ['minus, ['val, 0]], ['none, ['val, 1]]]], ['header, "head?er", 'on_off_dict, ['val, 1], #[['plus, ['val, 1]], ['minus, ['val, 0]], ['none, ['val, 1]]]], ['chop_head_data, "hchop", 'on_off_dict, ['val, 0], #[['plus, ['val, 1]], ['minus, ['val, 0]], ['none, ['val, 1]]]], ['chop_props, "pchop", 'on_off_dict, ['val, 1]], ['chop_props, "pchop", 'on_off_dict, ['val, 1], #[['plus, ['val, 1]], ['minus, ['val, 0]], ['none, ['val, 1]]]]]
var $root manager $display_opts
var $root writable [$display_opts]
var $root readable ['parameters, 'methods, 'code]
var $root dbref 'display_opts

method set_opts
    // opt rec format:
    // ['id,"template",type,default,#[translation_dictionary]]
    // opt types:
    // 'check_presence, 'on_off_dict, 'obj, 'num, 'obj_or_dict
    // sub2 = $list.last(obj.ancestors())
    opt_rec = [];
    opt_rec = opt_rec + [['max_parent, "anc", 'obj_or_dict, ['sub, 1], #[["^", ['sub, 1]], [",", ['sub, 2]]]]];
    opt_rec = opt_rec + [['chop_head_data, "chop", 'on_off_dict, ['val, 0], #[['plus, 1], ['minus, 0], ['none, 1]]]];
    opt_rec = opt_rec + [['show_private, "pri?vate", 'on_off_dict, ['val, 0], #[['plus, 1], ['minus, 0], ['none, 1]]]];
    opt_rec = opt_rec + [['header, "head?er", 'on_off_dict, ['val, 1], #[['plus, 1], ['minus, 0], ['none, 1]]]];
.