ViewVC Help
View File | Revision Log | Show Annotations | Download File
/cvs/kgsueme/kgsueme/userlist.pl
(Generate patch)

Comparing kgsueme/kgsueme/userlist.pl (file contents):
Revision 1.3 by pcg, Mon Jun 2 12:39:20 2003 UTC vs.
Revision 1.4 by pcg, Thu Jun 12 21:03:04 2003 UTC

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
641; 641;
65 65

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines