2010-04-05 03:07:37 +04:00
|
|
|
#!/usr/bin/perl
|
|
|
|
|
|
|
|
use File::Basename;
|
|
|
|
|
|
|
|
my ($myself, $path) = fileparse($0);
|
|
|
|
chdir($path);
|
|
|
|
|
|
|
|
require 'helpers.pm';
|
|
|
|
|
2010-04-05 03:24:42 +04:00
|
|
|
chdir('../../installer/builder');
|
2010-04-05 03:07:37 +04:00
|
|
|
|
2010-04-05 03:58:24 +04:00
|
|
|
my $output;
|
2010-04-05 03:32:15 +04:00
|
|
|
if ($^O eq "linux") {
|
2010-04-05 04:02:16 +04:00
|
|
|
$output = `mono builder.exe directions.info`;
|
2010-04-05 03:32:15 +04:00
|
|
|
} else {
|
2010-04-05 04:02:16 +04:00
|
|
|
$output = `builder.exe directions.info`;
|
2010-04-05 03:32:15 +04:00
|
|
|
}
|
2010-04-05 04:02:16 +04:00
|
|
|
print $output . "\n";
|
2010-04-05 03:07:37 +04:00
|
|
|
|
2010-04-05 03:58:24 +04:00
|
|
|
if ($output =~ /Build failed/) {
|
|
|
|
die "Build failed!\n";
|
|
|
|
} else {
|
2010-04-05 03:32:15 +04:00
|
|
|
exit(0);
|
|
|
|
}
|
2010-04-05 03:07:37 +04:00
|
|
|
|