Changeset 500

Timestamp:

10/26/08 08:05:19 (3 years ago)

Author:

szabgab

Message:

refresh status bar when last editor is closed

Location:

trunk/lib/Padre/Wx

Files:

• MainWindow.pm (modified) (4 diffs)
• Menu.pm (modified) (1 diff)

trunk/lib/Padre/Wx/MainWindow.pm

@@ -262 +262 @@
 sub refresh_all {
     my ($self) = @_;
+
     return if $self->no_refresh;
 
@@ -292 +293 @@
     my $pageid = $self->{notebook}->GetSelection();
     if (not defined $pageid or $pageid == -1) {
-        $self->SetStatusText("", $_) for (0..2);
+        $self->SetStatusText("", $_) for (0..3);
         return;
     }
@@ -973 +974 @@
 # Returns false on cancel.
 sub on_close {
-    shift->close(@_);
+    my $self = shift;
+    $self->close(@_);
+    $self->refresh_all;
 }
 
@@ -1023 +1026 @@
     }
     $self->Thaw;
+    $self->refresh_all;
     return 1;
 }

trunk/lib/Padre/Wx/Menu.pm

@@ -51 +51 @@
     Wx::Event::EVT_MENU( $win,
         $menu->{file}->Append( Wx::wxID_CLOSE,  '' ),
-        sub { $_[0]->close },
+        sub { $_[0]->on_close },
     );
     Wx::Event::EVT_MENU( $win,