z_manifest.t (GD-2.71) | : | z_manifest.t (GD-2.72) | ||
---|---|---|---|---|
# -*- perl -*- | # -*- perl -*- | |||
use Test::More; | use Test::More; | |||
if (!-d ".git" or $^O != /^(linux|.*bsd|darwin|solaris|sunos)$/) { | if (!-d ".git" or $^O != /^(linux|.*bsd|darwin|solaris|sunos)$/) { | |||
plan skip_all => "requires a git checkout and a unix for git and diff"; | plan skip_all => "requires a git checkout and a unix for git and diff"; | |||
} | } | |||
plan tests => 1; | plan tests => 1; | |||
system("git ls-tree -r --name-only HEAD |" | system("git ls-tree -r --name-only HEAD |" | |||
." egrep -v '(.gitignore|.appveyor.yml|.travis.yml)' >MANIFEST.git"); | ." egrep -v '(.gitignore|.appveyor.yml|.whitesource|.travis.yml)' >MANIFES T.git"); | |||
if (-e "MANIFEST.git") { | if (-e "MANIFEST.git") { | |||
#diag "MANIFEST.git created with git ls-tree"; | #diag "MANIFEST.git created with git ls-tree"; | |||
is(`diff -bu MANIFEST.git MANIFEST`, "", "MANIFEST.git compared to MANIFEST") | is(`diff -bu MANIFEST.git MANIFEST`, "", "MANIFEST.git compared to MANIFEST") | |||
and unlink "MANIFEST.git"; | and unlink "MANIFEST.git"; | |||
} else { | } else { | |||
ok(1, "skip no git"); | ok(1, "skip no git"); | |||
} | } | |||
End of changes. 1 change blocks. | ||||
1 lines changed or deleted | 1 lines changed or added |