summaryrefslogtreecommitdiffstats
path: root/perl-install/Xconfigurator.pm
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>1999-12-15 12:50:29 +0000
committerPascal Rigaux <pixel@mandriva.com>1999-12-15 12:50:29 +0000
commit3bc20c1ea1a306475ea8eab8e8e1973625ca785f (patch)
tree5cecbffa4160d47c8de483e723474ec668c0bcc6 /perl-install/Xconfigurator.pm
parent42ded0f5b50145273e019818e4e3eb002667aff8 (diff)
downloaddrakx-3bc20c1ea1a306475ea8eab8e8e1973625ca785f.tar
drakx-3bc20c1ea1a306475ea8eab8e8e1973625ca785f.tar.gz
drakx-3bc20c1ea1a306475ea8eab8e8e1973625ca785f.tar.bz2
drakx-3bc20c1ea1a306475ea8eab8e8e1973625ca785f.tar.xz
drakx-3bc20c1ea1a306475ea8eab8e8e1973625ca785f.zip
no_comment
Diffstat (limited to 'perl-install/Xconfigurator.pm')
-rw-r--r--perl-install/Xconfigurator.pm3
1 files changed, 2 insertions, 1 deletions
diff --git a/perl-install/Xconfigurator.pm b/perl-install/Xconfigurator.pm
index 0327b4728..da7d574b7 100644
--- a/perl-install/Xconfigurator.pm
+++ b/perl-install/Xconfigurator.pm
@@ -772,7 +772,8 @@ sub main {
_("What do you want to do?"),
[ grep { !ref } @c ]);
eval { &{$c{$f}} };
- !$@ || $@ =~ /^ask_from_list cancel/ or die;
+ !$@ || $@ =~ /ask_from_list cancel/ or die;
+ $in->kill;
}
if ($ok) {