| Revision: | 1.1 |
| Committed: | Sun Feb 5 00:34:36 2006 UTC (20 years, 8 months ago) by elmex |
| Branch: | MAIN |
| CVS Tags: | rel-2_2, rel-2_0, rel-2_1, pre_cursor_branch, HEAD |
| Branch point for: | cursor |
| Log Message: | first checkin of skeleton |
| # | Content |
|---|---|
| 1 | package GCE::MapWindow; |
| 2 | |
| 3 | =head1 NAME |
| 4 | |
| 5 | GCE::MapWindow - the map window class for gce |
| 6 | |
| 7 | =cut |
| 8 | |
| 9 | use Gtk2; |
| 10 | use Gtk2::Gdk::Keysyms; |
| 11 | |
| 12 | use Glib::Object::Subclass Gtk2::Window; |
| 13 | |
| 14 | sub INIT_INSTANCE { |
| 15 | my ($self) = @_; |
| 16 | |
| 17 | $self->add (my $b = Gtk2::Label->new ("<map here>")); |
| 18 | } |
| 19 | |
| 20 | |
| 21 | =head1 AUTHOR |
| 22 | |
| 23 | Marc Lehmann <schmorp@schmorp.de> |
| 24 | http://home.schmorp.de/ |
| 25 | |
| 26 | Robin Redeker <elmex@ta-sa.org> |
| 27 | http://www.ta-sa.org/ |
| 28 | |
| 29 | =cut |
| 30 | 1; |