r802@narval2: dakkar | 2005-11-19 18:50:31 +0100

 finiti i dialog e tutte le funzioni


git-svn-id: svn://luxion/repos/GtkPerlFileManager/trunk@47 fcb26f47-9200-0410-b104-b98ab5b095f3

1 files changed, 4 insertions, 1 deletions

diff --git a/lib/LDFM/DialogController.pm b/lib/LDFM/DialogController.pm
index eb4936a..7cd7807 100644
--- a/lib/LDFM/DialogController.pm
+++ b/lib/LDFM/DialogController.pm
@@ -1,8 +1,9 @@
-package LDFM::MainController;
+package LDFM::DialogController;
 use utf8;
 use warnings;
 use strict;
 use base 'Gtk2::GladeXML::Simple';
+use Path::Class;
 
 our $VERSION = '0.01';
 
@@ -33,6 +34,8 @@ sub run {
         return $data;
     }
     else {
+        $self->{dialog}->destroy();
+
         return;
     }
 }