view release on metacpan or  search on metacpan

t/10-run.t  view on Meta::CPAN

				plugins                 => [ 'App::GitHooks::Plugin::BlockProductionCommits' ],
			);

			# Set up test files.
			ok_add_files(
				files      => $files,
				repository => $repository,
			);

			# Try to commit.
			my $stderr;
			lives_ok(
				sub
				{
					$stderr = Capture::Tiny::capture_stderr(
						sub
						{
							$repository->run( 'commit', '-m', 'Test message.' );
						}
					);
					note( $stderr );
				},
				'Commit the changes.',
			);

			if ( $test->{'allow'} )
			{
				unlike(
					$stderr,
					$failure,
					"The output matches expected results.",
				);
			}
			else
			{
				like(
					$stderr,
					$failure,
					"The output matches expected results.",
				);
			}
		}
	);
}

t/12-missing_config.t  view on Meta::CPAN

	plugins                 => [ 'BlockProductionCommits' ],
);

# Set up test files.
ok_add_files(
	files      => $files,
	repository => $repository,
);

# Try to commit.
my $stderr;
lives_ok(
	sub
	{
		$stderr = Capture::Tiny::capture_stderr(
			sub
			{
				$repository->run( 'commit', '-m', 'Test message.' );
			}
		);
		note( $stderr );
	},
	'Commit the changes.',
);

like(
	$stderr,
	qr/\QYou must define 'env_variable' in the [BlockProductionCommits] section of your githooksrc config\E/,
	"The output matches expected results.",
);