Changeset 10164

Timestamp:

01/19/10 20:05:20 (8 months ago)

Author:

adamk

Message:

Moved the various open options into an open sub-menu

Location:

trunk/Padre/lib/Padre

Files:

• Action/File.pm (modified) (1 diff)
• Wx/Menu/File.pm (modified) (1 diff)

trunk/Padre/lib/Padre/Action/File.pm

@@ -95 +95 @@
                 name       => 'file.open',
                 id         => Wx::wxID_OPEN,
-                label      => Wx::gettext('&Open...'),
+                label      => Wx::gettext('&Open'),
                 comment    => Wx::gettext('Browse directory of the current document to open a file'),
                 shortcut   => 'Ctrl-O',

trunk/Padre/lib/Padre/Wx/Menu/File.pm

@@ -82 +82 @@
         );
 
-        $self->add_menu_action(
-                $self,
+        my $file_open = Wx::Menu->new;
+        $self->Append(
+                -1,
+                Wx::gettext("Open..."),
+                $file_open,
+        );
+
+        $self->add_menu_action(
+                $file_open,
                 'file.openurl',
         );
 
         $self->{open_selection} = $self->add_menu_action(
-                $self,
+                $file_open,
                 'file.open_selection',
         );
 
         $self->{open_example} = $self->add_menu_action(
-                $self,
+                $file_open,
                 'file.open_example',
         );