diff options
Diffstat (limited to 'lib/LDFM/MainController.pm')
| -rw-r--r-- | lib/LDFM/MainController.pm | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lib/LDFM/MainController.pm b/lib/LDFM/MainController.pm index 2f573cc..09639c4 100644 --- a/lib/LDFM/MainController.pm +++ b/lib/LDFM/MainController.pm @@ -12,7 +12,8 @@ our $VERSION = '0.01'; sub new { my ($class,%params)=@_; - my $self=$class->SUPER::new($params{glade_file}); + my $glade_file=dir($params{glade_dir})->file('ldfm-main.glade'); + my $self=$class->SUPER::new($glade_file); # cambio le liste con qualcosa di più comodo $self->simplify_list('left'); |