From 5ba8d09d85b3a0f90aef17495204a2eca3412a3e Mon Sep 17 00:00:00 2001
From: dakkar <dakkar@fcb26f47-9200-0410-b104-b98ab5b095f3>
Date: Thu, 24 Nov 2005 09:53:36 +0000
Subject:  r796@narval2:  dakkar | 2005-11-19 16:29:11 +0100  file Glade e suo
 caricamento

git-svn-id: svn://luxion/repos/GtkPerlFileManager/trunk@41 fcb26f47-9200-0410-b104-b98ab5b095f3
---
 lib/LDFM/MainController.pm | 8 ++++++++
 1 file changed, 8 insertions(+)

(limited to 'lib/LDFM/MainController.pm')

diff --git a/lib/LDFM/MainController.pm b/lib/LDFM/MainController.pm
index a9534e0..780a282 100644
--- a/lib/LDFM/MainController.pm
+++ b/lib/LDFM/MainController.pm
@@ -7,4 +7,12 @@ use Readonly;
 
 our $VERSION = '0.01';
 
+sub new {
+    my ($class,%params)=@_;
+
+    my $self=$class->SUPER::new($params{glade_file});
+
+    return $self;
+}
+
 1;
-- 
cgit v1.2.3