| … | |
… | |
| 3449 | |
3449 | |
| 3450 | ############################################################################# |
3450 | ############################################################################# |
| 3451 | |
3451 | |
| 3452 | package CFClient::UI::Inventory; |
3452 | package CFClient::UI::Inventory; |
| 3453 | |
3453 | |
| 3454 | our @ISA = CFClient::UI::ScrolledWindow::; |
3454 | our @ISA = CFClient::UI::Table::; |
| 3455 | |
3455 | |
| 3456 | sub new { |
3456 | sub new { |
| 3457 | my $class = shift; |
3457 | my $class = shift; |
| 3458 | |
3458 | |
| 3459 | my $self = $class->SUPER::new ( |
3459 | my $self = $class->SUPER::new ( |
| 3460 | child => (new CFClient::UI::Table col_expand => [0, 1, 0]), |
3460 | col_expand => [0, 1, 0], |
| 3461 | @_, |
3461 | @_, |
| 3462 | ); |
3462 | ); |
| 3463 | |
3463 | |
| 3464 | $self |
3464 | $self |
| 3465 | } |
3465 | } |
| 3466 | |
3466 | |
| 3467 | sub set_items { |
3467 | sub set_items { |
| 3468 | my ($self, $items) = @_; |
3468 | my ($self, $items) = @_; |
| 3469 | |
3469 | |
| 3470 | $self->{child}->clear; |
3470 | $self->clear; |
| 3471 | return unless $items; |
3471 | return unless $items; |
| 3472 | |
3472 | |
| 3473 | my @items = sort { |
3473 | my @items = sort { |
| 3474 | ($a->{type} <=> $b->{type}) |
3474 | ($a->{type} <=> $b->{type}) |
| 3475 | or ($a->{name} cmp $b->{name}) |
3475 | or ($a->{name} cmp $b->{name}) |
| … | |
… | |
| 3479 | |
3479 | |
| 3480 | my $row = 0; |
3480 | my $row = 0; |
| 3481 | for my $item (@items) { |
3481 | for my $item (@items) { |
| 3482 | CFClient::Item::update_widgets $item; |
3482 | CFClient::Item::update_widgets $item; |
| 3483 | |
3483 | |
| 3484 | $self->{child}->add (0, $row, $item->{face_widget}); |
3484 | $self->add (0, $row, $item->{face_widget}); |
| 3485 | $self->{child}->add (1, $row, $item->{desc_widget}); |
3485 | $self->add (1, $row, $item->{desc_widget}); |
| 3486 | $self->{child}->add (2, $row, $item->{weight_widget}); |
3486 | $self->add (2, $row, $item->{weight_widget}); |
| 3487 | |
3487 | |
| 3488 | $row++; |
3488 | $row++; |
| 3489 | } |
3489 | } |
| 3490 | } |
3490 | } |
| 3491 | |
3491 | |
