$graphical is now a module variable. Can be changed from everywhere

1 files changed, 1 insertions, 3 deletions

diff --git a/perl-install/install_steps_auto_install.pm b/perl-install/install_steps_auto_install.pm
index c3bc5762e..9eae1794d 100644
--- a/perl-install/install_steps_auto_install.pm
+++ b/perl-install/install_steps_auto_install.pm
@@ -3,7 +3,7 @@ package install_steps_auto_install; # $Id$
 use diagnostics;
 use strict;
 use lang;
-use vars qw(@ISA);
+use vars qw(@ISA $graphical);
 
 @ISA = qw(install_steps);
 
@@ -17,8 +17,6 @@ use common qw(:common :functional);
 use install_steps;
 use log;
 
-my $graphical = 0;
-
 sub new {
     my ($type, $o) = @_;