1 my ($tag, $fcoms, $hash);
6 return $main::am_buildid;
17 my $diffcount=`git diff | wc -l`;
33 # "git describe" will just return a tag name if the current commit is
34 # tagged. Otherwise, the output will look something like this:
36 # <tag name>-<commits beyong tag>-g<hash>
40 # 2.0.59-1somecompany-1-g4c20b1f
43 my $desc=`git describe --tags`;
44 if ($desc =~ /(.+?)(?:-(\d)+-g([0-9a-f]+))\n?/) {
45 # tag with describe info added