summaryrefslogtreecommitdiffstats
path: root/web_wizard/Apache.pm
diff options
context:
space:
mode:
Diffstat (limited to 'web_wizard/Apache.pm')
-rwxr-xr-xweb_wizard/Apache.pm5
1 files changed, 3 insertions, 2 deletions
diff --git a/web_wizard/Apache.pm b/web_wizard/Apache.pm
index dcb68dc8..ce6f99d4 100755
--- a/web_wizard/Apache.pm
+++ b/web_wizard/Apache.pm
@@ -30,6 +30,7 @@ use MDK::Wizard::Wizcommon;
use MDK::Wizard::Varspaceval;
my $wiz = new MDK::Wizard::Wizcommon;
+my $in = interactive->vnew;
my $file = "/etc/httpd/conf/httpd.conf";
my $root;
@@ -110,7 +111,7 @@ $o->{pages} = {
},
complete => sub {
if (!$o->{var}{user_dir}) {
- $::in->ask_warn(N('Error'), N('You must specify a user directory.')); return 1;
+ $in->ask_warn(N('Error'), N('You must specify a user directory.')); return 1;
} else { return 0; }; },
data => [
{ label => N("user http sub-directory: ~/"), help => N("Type the name of the directory users should create in their homes (without ~/) to get it available via http://www.yourserver.com/~user"), val => \$o->{var}{user_dir} },
@@ -125,7 +126,7 @@ $o->{pages} = {
],
complete => sub {
if (! -d $o->{var}{shared_dir}) {
- $::in->ask_warn(N("Error"), N("The path you entered does not exist.")); return 1; }
+ $in->ask_warn(N("Error"), N("The path you entered does not exist.")); return 1; }
else { return 0; };
},
next => 'summary',