my $ip = shift;
my $nfsroot = "$server::base_dir/tftp/nfsroot";
+ my $debian_mirror = server::conf_default( 'debian_mirror', 'http://ftp.debian.org/debian' );
if ( ! -e $nfsroot ) {
system "apt-get install nfs-kernel-server debootstrap";
-
+
if ( ! -e $nfsroot ) {
mkdir $nfsroot;
system "debootstrap --arch i386 lenny $nfsroot http://ftp.hr.debian.org/debian";
};
- system "chroot $nfsroot /tmp/configure.sh";
+ system "chroot $nfsroot sh -x /tmp/configure.sh";
open(my $exports, '>>', '/etc/exports');
print $exports "$nfsroot\t$server::ip/$server::netmask(rw,async,no_root_squash,no_subtree_check)\n";
use strict;
use autodie;
-use Test::More tests => 3;
+use Test::More tests => 4;
use Data::Dump qw/dump/;
use_ok 'server';
diag $test;
cmp_ok( $test, '==', server::shared( 'test' ), 'get shared' );
+cmp_ok( $test, '==', server::conf_default( 'test' ), 'get conf_default' );
+