From: Graham Knop Date: Sun, 2 Oct 2016 01:16:34 +0000 (-0400) Subject: add warning for over-long dotted decimal X-Git-Tag: v0.003000~15 X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=e05a4bcce49bde388efce50f75c037f630bef857;hp=edb3d04463c68c1afcdce30bf70529daf17ae64e;p=p5sagit%2FDistar.git add warning for over-long dotted decimal --- diff --git a/helpers/bump-version b/helpers/bump-version index b474e3f..d9ae2ae 100755 --- a/helpers/bump-version +++ b/helpers/bump-version @@ -188,6 +188,9 @@ sub bump_version { $parts[$bump_this]++; $_ += 0 for @parts; + if (grep $_ > 999, @parts[1 .. $#parts]) { + warn "$new_decimal has a version component greater than 999. It will be incompatible with some uses in perl.\n"; + } $new_decimal = $new_vstring = $v . join '.', @parts; } else {