1 #############################################################################
2 ## Name: ext/mdi/lib/Wx/MDI.pm
3 ## Purpose: Wx::MDI (pulls in all MDI)
4 ## Author: Mattia Barbon
7 ## RCS-ID: $Id: MDI.pm 2057 2007-06-18 23:03:00Z mbarbon $
8 ## Copyright: (c) 2001-2002, 2004 Mattia Barbon
9 ## Licence: This program is free software; you can redistribute it and/or
10 ## modify it under the same terms as Perl itself
11 #############################################################################
18 use vars qw($VERSION);
22 Wx::wx_boot( 'Wx::MDI', $VERSION );
27 # properly setup inheritance tree
32 package Wx::MDIParentFrame; @ISA = qw(Wx::Frame);
33 package Wx::MDIChildFrame; @ISA = qw(Wx::Frame);
34 package Wx::MDIClientWindow;
36 @ISA = Wx::wxMOTIF ? 'Wx::Notebook' : 'Wx::Window';
38 package Wx::GenericMDIParentFrame; @ISA = qw(Wx::MDIParentFrame);
39 package Wx::GenericMDIChildFrame; @ISA = qw(Wx::MDIChildFrame);
40 package Wx::GenericMDIClientWindow; @ISA = qw(Wx::MDIClientWindow);