novarobot
/
webperl-for
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Added more info to an error message

Browse Source 
Thanks to Bernhard M. Wiedemann for pointing this out!
master
Hauke D 6 years ago
parent 00e738560f
commit d1206e84fb
1 changed files with 1 additions and 0 deletions
Show Stats Download Patch File Download Diff File

1
build/build.pl
Unescape Escape View File

@ -161,6 +161,7 @@ GITSTUFF: {
unless $tags=~/^\Q$C{PERLVER}\E$/m; unless $tags=~/^\Q$C{PERLVER}\E$/m;
my $branches = git 'branch', '--list', {show_cmd=>$VERBOSE}; my $branches = git 'branch', '--list', {show_cmd=>$VERBOSE};
die "could not find branch '$C{PERL_BRANCH}', is this the right repository?" die "could not find branch '$C{PERL_BRANCH}', is this the right repository?"
. " (or the WebPerl author forgot to push tags to the emperl5 repo)"
unless $branches=~/^\*?\s*\b\Q$C{PERL_BRANCH}\E$/m; unless $branches=~/^\*?\s*\b\Q$C{PERL_BRANCH}\E$/m;
say STDERR "# Found tag '$C{PERLVER}' and branch '$C{PERL_BRANCH}' in $C{PERLSRCDIR}"; say STDERR "# Found tag '$C{PERLVER}' and branch '$C{PERL_BRANCH}' in $C{PERLSRCDIR}";
} }

Write Preview
Loading…
Cancel
Save