'-d' => $config->{release},
'-m' => $config->{mirror},
);
+
+ open $scriptFH, '|-', '/bin/bash';
+ print {$scriptFH} $config->{files}{'pre-host'};
+ close $scriptFH;
+
write_file('/etc/vservers/' . $vsname . '/context', getFreeContext() . "\n");
system('vserver', $vsname, 'start');
write_file('/etc/vservers/' . $vsname . '/profile', $profile . "\n");
# TODO: get the apt-key stuff working
system('vserver', $vsname, 'apt-get', 'update');
- open $scriptFH, '|-', '/bin/bash';
- print {$scriptFH} $config->{files}{'pre-host'};
- close $scriptFH;
open $scriptFH, '|-', 'vserver', $vsname, 'exec', '/bin/bash';
print {$scriptFH} $config->{files}{'pre-vserver'};
close $scriptFH;