view release on metacpan or  search on metacpan

t/integration.t  view on Meta::CPAN

	diag "Output:\n$out" if $ENV{TEST_VERBOSE};
};

# -----------------------------------------------------------------------
# 7. Idempotency: feeding generate() output back as 'existing'
#
# Strategy: generate a cpanfile from a Makefile.PL, then call generate()
# again with that output as the 'existing' argument.  The second output
# must equal the first — regeneration must be stable.
# This verifies that the develop-merge logic does not accumulate duplicates
# or otherwise mutate the output across iterations.
# -----------------------------------------------------------------------

subtest 'pipeline: generate() is idempotent when output fed back as existing' => sub {
	my $g = empty_home();
	my $mf = make_mf($MF_ALL_PHASES);

	my $first = App::makefilepl2cpanfile::generate(
		makefile     => "$mf",
		with_develop => 0,
	);