# vim: syntax=perl { "-name" => "a simplistic example", # workaround for some perl bug -type => "sortable", -dispheight => 3, -compare=>sub { $_[0]->{v} <=> $_[1]->{v} }, -node_opts=>{ -shape => "oval", -size => [30,20], -display => sub { return $_[0]->cget(-content)->{v} } }, -init_data => [ { v => 592 }, { v => 821 }, { v => 334 }, { v => 175 }, { v => 838 }, { v => 861 }, { v => 332 }, { v => 428 }, { v => 420 }, { v => 503 }, { v => 701 }, { v => 41 }, { v => 789 }, { v => 4 }, { v => 615 }, { v => 451 }, { v => 372 }, { v => 603 }, { v => 522 }, { v => 756 }, { v => 829 }, { v => 820 }, { v => 764 }, { v => 36 }, { v => 934 }, { v => 467 }, { v => 288 }, { v => 777 }, { v => 361 }, { v => 407 }, { v => 613 }, { v => 816 }, { v => 483 }, { v => 990 }, { v => 608 }, { v => 966 }, ], -operation => [ # remove => { v => 75 }, # insert => { v => 48 }, ], };