summaryrefslogtreecommitdiff
path: root/lib/LDFM/MainController.pm
diff options
context:
space:
mode:
authordakkar <dakkar@fcb26f47-9200-0410-b104-b98ab5b095f3>2005-11-24 09:53:36 +0000
committerdakkar <dakkar@fcb26f47-9200-0410-b104-b98ab5b095f3>2005-11-24 09:53:36 +0000
commit5ba8d09d85b3a0f90aef17495204a2eca3412a3e (patch)
tree9ae2fb55a56b995c4b7524e2e64edbae0748b341 /lib/LDFM/MainController.pm
parent r795@narval2: dakkar | 2005-11-19 15:53:49 +0100 (diff)
downloadGtkPerlFileManager-5ba8d09d85b3a0f90aef17495204a2eca3412a3e.tar.gz
GtkPerlFileManager-5ba8d09d85b3a0f90aef17495204a2eca3412a3e.tar.bz2
GtkPerlFileManager-5ba8d09d85b3a0f90aef17495204a2eca3412a3e.zip
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
Diffstat (limited to 'lib/LDFM/MainController.pm')
-rw-r--r--lib/LDFM/MainController.pm8
1 files changed, 8 insertions, 0 deletions
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;