… | |
… | |
9 | $self->{model} = new Gtk2::ListStore Glib::String, Glib::String, Glib::String, Glib::Int, Glib::String; |
9 | $self->{model} = new Gtk2::ListStore Glib::String, Glib::String, Glib::String, Glib::Int, Glib::String; |
10 | gtk::state $self->{model}, "userlist::model", undef, modelsortorder => [2, 'descending']; |
10 | gtk::state $self->{model}, "userlist::model", undef, modelsortorder => [2, 'descending']; |
11 | |
11 | |
12 | $self->{widget} = new Gtk2::TreeView $self->{model}; |
12 | $self->{widget} = new Gtk2::TreeView $self->{model}; |
13 | |
13 | |
14 | $self->{widget}->set_search_column(1); |
14 | $self->{widget}->set (rules_hint => 0, search_column => 1); |
15 | |
15 | |
16 | my $column = $self->{rlcolumns}[0] = |
16 | my $column = $self->{rlcolumns}[0] = |
17 | Gtk2::TreeViewColumn->new_with_attributes ("Name", $gtk::text_renderer, text => 0); |
17 | Gtk2::TreeViewColumn->new_with_attributes ("Name", $gtk::text_renderer, text => 0); |
18 | $column->set_sort_column_id(1); |
18 | $column->set_sort_column_id(1); |
19 | $column->set(sizing => 'grow-only'); |
19 | $column->set(sizing => 'grow-only'); |
… | |
… | |
55 | $l->set ($_->{iter} ||= $l->append, |
55 | $l->set ($_->{iter} ||= $l->append, |
56 | 0, $_->{name}, |
56 | 0, $_->{name}, |
57 | 1, lc $_->{name}, |
57 | 1, lc $_->{name}, |
58 | 2, $_->rank_string, |
58 | 2, $_->rank_string, |
59 | 3, $_->rank, |
59 | 3, $_->rank, |
60 | 4, "?"); |
60 | 4, $_->flags_string); |
61 | } |
61 | } |
62 | } |
62 | } |
63 | |
63 | |
64 | 1; |
64 | 1; |
65 | |
65 | |