App-DuckPAN

 view release on metacpan or  search on metacpan

Changes  view on Meta::CPAN


    bin/duckpan: Fix Getopt::Long configuration 

  Change: a2a8bd96ab28838b287a3abf11da264248722d66
  Author: Sarvesh D <sarveshd@openmailbox.org>
  Date : 2015-12-03 05:10:04 +0000

    bin/duckpan: Fix Getopt::Long configuration

    after processing switches to duckpan. This disables pass_through so
    that arguments to other sub-commands get validated. 

  Change: 3521cbc5cefad04bf5b72b3b1775ff6f3c8983d3
  Author: Zaahir Moolla <moollaza@fastmail.fm>
  Date : 2015-12-02 15:00:20 +0000

    Merge pull request #283 from duckduckgo/zt/alt-to

    Add alt_to values to rewrites 

  Change: 82769ae38f4469e1abf3993b01956bc127592e9c

lib/App/DuckPAN/Cmd/Test.pm  view on Meta::CPAN

				}
				elsif (my @test_file = File::Find::Rule->name("$perl_module.t")->in('t')) {
					push @to_test, "@test_file";
				}
			}

			if ($ia_type eq 'Fathead') {
				my $path = "lib/fathead/$id/output.txt";
				if (-f $path) {
					$ENV{'DDG_TEST_FATHEAD'} = $id;
					push @to_test, "t/validate_fathead.t";
				} else {
					$self->app->emit_and_exit(1, "Could not find output.txt for $id in $path");
				}
			}

			$self->app->emit_and_exit(1, "Could not find any tests for $id $ia_type") unless @to_test;
		};

		$self->app->emit_error('Tests failed! See output above for details') if @to_test           and $ret = system("prove -lr @to_test");
		$self->app->emit_error('Tests failed! See output above for details') if @cheat_sheet_tests and $ret = system("prove -lr t/CheatSheets/CheatSheetsJSON.t :: @cheat_sheet_tests");



( run in 0.519 second using v1.01-cache-2.11-cpan-4d50c553e7e )