#!/usr/bin/perl -w
use strict;
use Test::More tests=>5;
SKIP: {
skip "Gift.yp not found", 5 unless ($ENV{DEVELOPER} && -r "t/Gift.yp" && -x "./eyapp");
unlink 't/Gift.pm';
my $r = system('perl -I./lib/ eyapp -s t/Gift.yp');
ok(!$r, "standalone option");
ok(-s "t/Gift.pm", ".pm generated with standalone");
my $eyapppath;
eval {
local $ENV{PERL5LIB};
$eyapppath = shift @INC; # Supress ~/LEyapp/lib from search path
require "t/Gift.pm";
};
ok(!$@, "standalone generated module loaded");
my $warnings = '';
local $SIG{__WARN__} = sub { $warnings .= "@_"; };
use_ok ('Parse::Eyapp::Base', ':all');
is($warnings, '', 'Parse::Eyapp::Base loaded after standalone without warnings');
}