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

Comparing deliantra/Deliantra-Client/DC/UI/Dockbar.pm (file contents):
Revision 1.7 by elmex, Wed Oct 29 16:02:10 2008 UTC vs.
Revision 1.8 by elmex, Fri Nov 28 08:27:33 2008 UTC

197} 197}
198 198
199# close current tab 199# close current tab
200sub close_current_tab { 200sub close_current_tab {
201 my ($self) = @_; 201 my ($self) = @_;
202
203 if ($self->{notebook}->get_current_page) {
202 my $curdock = $self->{notebook}->get_current_page; 204 my $curdock = $self->{notebook}->get_current_page;
203 $curdock->emit ('close_dock'); 205 $curdock->close;
206 }
204} 207}
205 208
206# "activates" the current page 209# "activates" the current page
207sub activate_current { 210sub activate_current {
208 my ($self) = @_; 211 my ($self) = @_;
212
213 if ($self->{notebook}->get_current_page) {
209 $self->{notebook}->get_current_page->activate 214 $self->{notebook}->get_current_page->activate
215 }
210} 216}
211 217
2121 2181

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines