… | |
… | |
27 | } |
27 | } |
28 | |
28 | |
29 | use Gtk2 -init; |
29 | use Gtk2 -init; |
30 | |
30 | |
31 | use Crossfire; |
31 | use Crossfire; |
32 | use Crossfire::Tilecache; |
|
|
33 | |
32 | |
34 | our $PICKDIR = "$Crossfire::LIB/maps/editor/picks"; |
33 | our $PICKDIR = "$Crossfire::LIB/maps/editor/picks"; |
35 | our $CFG; |
34 | our $CFG; |
36 | our $MAINWIN; |
35 | our $MAINWIN; |
37 | |
36 | |
… | |
… | |
97 | # FIXME: This sucks, moving it after showing it can't be a good thing. |
96 | # FIXME: This sucks, moving it after showing it can't be a good thing. |
98 | $window->show_all; |
97 | $window->show_all; |
99 | $window->move ($p_and_s->[0] || $default_x, $p_and_s->[1] || $default_y); |
98 | $window->move ($p_and_s->[0] || $default_x, $p_and_s->[1] || $default_y); |
100 | } |
99 | } |
101 | |
100 | |
102 | read_cfg ("$Crossfire::VARDIR/gceconfig"); |
101 | read_cfg "$Crossfire::VARDIR/gceconfig"; |
|
|
102 | |
|
|
103 | # must be done after changing the libdir path: |
|
|
104 | Crossfire::set_libdir $ENV{CROSSFIRE_LIBDIR}; |
|
|
105 | Crossfire::load_archetypes; |
|
|
106 | Crossfire::load_tilecache; |
103 | |
107 | |
104 | my $w = GCE::MainWindow->new; |
108 | my $w = GCE::MainWindow->new; |
105 | |
109 | |
106 | $w->load_layout; |
110 | $w->load_layout; |
107 | |
111 | |