Module::Build testing

lib/tap.bash

@@ -14,6 +14,11 @@ function plan {
   elif [ "$1" == "no" ]; then
     _tap_planned="$1"
     return 0
+  elif [ "$1" == "0" ]; then
+    _tap_planned="0"
+    echo "1..0 # SKIP $2"
+    trap EXIT
+    exit 0
   else
     _tap_planned="$1"
     echo "1..$1"

t/mb.t

@@ -0,0 +1,22 @@
+#!/bin/bash
+. lib/tap.bash
+
+if ! perl -e'require 5.008' 2>/dev/null; then
+  plan 0 'Perl 5.8 required'
+fi
+
+(
+  cd t/mb
+  set -e
+  set -x
+  . $PERLBREW_ROOT/etc/bashrc
+  . $HELPERS_ROOT/init --auto
+  cpanm --quiet --installdeps --notest .
+  perl Build.PL && ./Build && ./Build test
+) 2>&1 | note
+
+ok ${PIPESTATUS[0]} 'Module::Build dist with --auto'
+
+done_testing
+
+# vim: ft=sh

t/mb/.gitignore

@@ -0,0 +1,19 @@
+/MANIFEST
+/MANIFEST.bak
+/MANIFEST.SKIP
+/MANIFEST.SKIP.bak
+/Build
+/_build/
+/META.*
+/MYMETA.*
+/Makefile
+/Makefile.old
+/README
+/blib/
+/pm_to_blib
+*~
+*#
+.#*
+/Travis-Test-Dist-MB-*/
+/Travis-Test-Dist-MB-*.tar.gz
+/cover_db/

t/mb/Build.PL

@@ -0,0 +1,14 @@
+use strict;
+use warnings;
+use Module::Build;
+
+Module::Build->new(
+  module_name => 'Travis::Test::Dist::MB',
+  dist_version => '0.01',
+  dist_author => 'SOMEONE',
+  dist_abstract => 'test module',
+  license  => 'perl',
+  requires => {
+    'Devel::GlobalPhase' => 0,
+  },
+)->create_build_script;

t/mb/Makefile.PL

@@ -0,0 +1 @@
+die "This fine shouldn't be used.";

t/mb/t/prereqs.t

@@ -0,0 +1,14 @@
+use strict;
+use warnings;
+use Test::More tests => 1;
+
+for my $prereq (
+  ['Devel::GlobalPhase'],
+) {
+  my ($mod, $installed) = @$prereq;
+  $installed = 1 if ! defined $installed;
+  (my $file = "$mod.pm") =~ s{::}{/}g;
+  my $worked = eval { require $file };
+  $worked = !$worked if !$installed;
+  ok $worked, "$mod was " . ($installed ? '' : 'not ') . "installed";
+}