[DHG_packages] 10/27: tag.pl: Tag the latest commit affecting the directory in question

[Joachim Breitner]

This is an automated email from the git hooks/post-receive script.

nomeata pushed a commit to branch master
in repository DHG_packages.

commit 57259de3804517a8bac94223e830314d50195e03
Author: Joachim Breitner <mail at joachim-breitner.de>
Date:   Thu Jul 16 15:15:50 2015 +0200

    tag.pl: Tag the latest commit affecting the directory in question
---
 tag.pl | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

diff --git a/tag.pl b/tag.pl
index ae22f96..fadfa83 100755
--- a/tag.pl
+++ b/tag.pl
@@ -26,9 +26,10 @@ for my $dir (@dirs) {
 		if ($suite eq "UNRELEASED") {
 			printf STDERR "Cannot tag UNRELEASED package %s-%s", $source, $version;
 		} else {
-			my $ret = system(qw/git tag -a -m/, $msg, $tag);
+			my $rev = `git log -n 1 --pretty=format:%h -- $dir`;
+			my $ret = system(qw/git tag -a -m/, $msg, $tag, $rev);
 			die (sprintf "Failed to tag %s: %d\n", $tag, $?>>8) if $ret != 0;
-			printf "Added tag %s\n", $tag;
+			printf "Added tag %s (revision %s)\n", $tag, $rev;
 		}
 	} else {
 		printf STDERR "Cannot parse %s:\n%s", $changelog, $firstline;

-- 
Alioth's /usr/local/bin/git-commit-notice on /srv/git.debian.org/git/pkg-haskell/DHG_packages.git