ViewVC Help
View File | Revision Log | Show Annotations | Download File
/cvs/deliantra/Deliantra-Client/DC/UI.pm
(Generate patch)

Comparing deliantra/Deliantra-Client/DC/UI.pm (file contents):
Revision 1.414 by root, Mon Jul 23 17:54:14 2007 UTC vs.
Revision 1.415 by elmex, Mon Jul 23 18:13:33 2007 UTC

… …
3768 buttonbar => (new CFPlus::UI::Buttonbar), 3768 buttonbar => (new CFPlus::UI::Buttonbar),
3769 multiplexer => (new CFPlus::UI::Multiplexer expand => 1), 3769 multiplexer => (new CFPlus::UI::Multiplexer expand => 1),
3770 # filter => # will be put between multiplexer and $self 3770 # filter => # will be put between multiplexer and $self
3771 @_, 3771 @_,
3772 ); 3772 );
3773 3773
3774 $self->{filter}->add ($self->{multiplexer}) if $self->{filter}; 3774 $self->{filter}->add ($self->{multiplexer}) if $self->{filter};
3775 $self->SUPER::add ($self->{buttonbar}, $self->{filter} || $self->{multiplexer}); 3775 $self->SUPER::add ($self->{buttonbar}, $self->{filter} || $self->{multiplexer});
3776 3776
3777 { 3777 {
3778 Scalar::Util::weaken (my $wself = $self); 3778 Scalar::Util::weaken (my $wself = $self);
… …
3819 3819
3820sub remove { 3820sub remove {
3821 my ($self, @widgets) = @_; 3821 my ($self, @widgets) = @_;
3822 3822
3823 $self->{multiplexer}->remove (@widgets) 3823 $self->{multiplexer}->remove (@widgets)
3824}
3825
3826sub pages {
3827 my ($self) = @_;
3828 $self->{multiplexer}->children
3824} 3829}
3825 3830
3826sub add_tab { 3831sub add_tab {
3827 my ($self, $title, $widget, $tooltip) = @_; 3832 my ($self, $title, $widget, $tooltip) = @_;
3828 3833

Diff Legend

– Removed lines
+ Added lines
< Changed lines
> Changed lines