From a4cd46c6eed61b9db3df6cd91c5a0cc98fe83d87 Mon Sep 17 00:00:00 2001
From: dakkar <dakkar@thenautilus.net>
Date: Sat, 23 May 2009 16:30:33 +0200
Subject: glade

---
 lib/LDFM/MainController.pm | 10 ++++++++++
 1 file changed, 10 insertions(+)

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

diff --git a/lib/LDFM/MainController.pm b/lib/LDFM/MainController.pm
index a9534e0..9508ced 100644
--- a/lib/LDFM/MainController.pm
+++ b/lib/LDFM/MainController.pm
@@ -4,7 +4,17 @@ use warnings;
 use strict;
 use base 'Gtk2::GladeXML::Simple';
 use Readonly;
+use Path::Class;
 
 our $VERSION = '0.01';
 
+sub new {
+    my ($class,%params)=@_;
+
+    my $glade_file=dir($params{glade_dir})->file('ldfm-main.glade');
+    my $self=$class->SUPER::new($glade_file);
+
+    return $self;
+}
+
 1;
-- 
cgit v1.2.3