diff options
| author | dakkar <dakkar@fcb26f47-9200-0410-b104-b98ab5b095f3> | 2005-11-24 09:53:40 +0000 |
|---|---|---|
| committer | dakkar <dakkar@fcb26f47-9200-0410-b104-b98ab5b095f3> | 2005-11-24 09:53:40 +0000 |
| commit | f4e8bb9560428781dff219eff11a34df59d84f4a (patch) | |
| tree | c05129575dd0f4b3dd2a49bbb97b9e805727645a /scripts/ldfm | |
| parent | r800@narval2: dakkar | 2005-11-19 18:20:31 +0100 (diff) | |
| download | GtkPerlFileManager-f4e8bb9560428781dff219eff11a34df59d84f4a.tar.gz GtkPerlFileManager-f4e8bb9560428781dff219eff11a34df59d84f4a.tar.bz2 GtkPerlFileManager-f4e8bb9560428781dff219eff11a34df59d84f4a.zip | |
r801@narval2: dakkar | 2005-11-19 18:38:19 +0100
tentativo di dialog con Glade
git-svn-id: svn://luxion/repos/GtkPerlFileManager/trunk@46 fcb26f47-9200-0410-b104-b98ab5b095f3
Diffstat (limited to 'scripts/ldfm')
| -rw-r--r-- | scripts/ldfm | 7 |
1 files changed, 3 insertions, 4 deletions
diff --git a/scripts/ldfm b/scripts/ldfm index 62e6246..d8b71ff 100644 --- a/scripts/ldfm +++ b/scripts/ldfm @@ -6,14 +6,13 @@ use Gtk2 '-init'; use Path::Class; use LDFM::MainController; -my $glade_file=file(__FILE__) +my $glade_dir=file(__FILE__) ->parent ->parent - ->subdir('resources') - ->file('ldfm-main.glade'); + ->subdir('resources'); my $main_controller=LDFM::MainController->new( - glade_file => $glade_file + glade_dir => $glade_dir ); $main_controller->run(); |