]>
iEval git - html-element-library.git/blob - t/unroll_select.t
d29870a014415e097089fc2fe51ad2619849ebf8
7 my $tree = mktree
't/html/unroll_select.html';
10 select_label
=> 'clan_list',
11 option_value
=> sub { my $row = shift; $row->{clan_id
} },
12 option_content
=> sub { my $row = shift; $row->{clan_name
} },
13 option_selected
=> sub { my $row = shift; $row->{selected
} },
14 data
=> SelectData
->load_data,
15 data_iter
=> sub { my $data = shift; shift @
$data });
17 isxml
($tree, 't/html/unroll_select.exp', 'unroll_select');
This page took 0.050436 seconds and 3 git commands to generate.