The following commit has been merged in the master branch:
commit 756a599698760423cf41ffa0e5ec1ce8e3890434
Author: James Vega <[email protected]>
Date: Mon Apr 12 23:36:44 2010 -0400
debcheckout: Use $DEBEMAIL/$DEBFULLNAME to set username in .hg/hgrc.
Signed-off-by: James Vega <[email protected]>
diff --git a/debian/changelog b/debian/changelog
index f5fff0e..7909cf8 100644
--- a/debian/changelog
+++ b/debian/changelog
@@ -11,6 +11,7 @@ devscripts (2.10.63) UNRELEASED; urgency=low
+ Re-add deb_versort which ensures the versions are valid Debian versions.
* debian/control: Require dpkg-dev >= 1.15.4.1 since we're using bits of the
new Perl API.
+ * debcheckout: Use $DEBEMAIL/$DEBFULLNAME to set username in .hg/hgrc.
[ David Paleino ]
* debsnap: rewritten from scratch in Perl, use snapshot.debian.org
diff --git a/scripts/debcheckout.pl b/scripts/debcheckout.pl
index 0216b66..59e0410 100755
--- a/scripts/debcheckout.pl
+++ b/scripts/debcheckout.pl
@@ -901,7 +901,7 @@ EOF
close B;
} else {
print STDERR
- "failed to open branch.conf to add push_location: $...@\n";
+ "failed to open branch.conf to add push_location: $!\n";
}
} elsif ($repo_type eq 'git') {
my $tg_info = tg_info($repo_url);
@@ -943,8 +943,20 @@ EOF
system($cmd);
}
}
+ } elsif ($repo_type eq 'hg') {
+ my $username = '';
+ $username .= " $ENV{'DEBFULLNAME'}" if (defined($ENV{'DEBFULLNAME'}));
+ $username .= " <$ENV{'DEBEMAIL'}>" if (defined($ENV{'DEBEMAIL'}));
+ if ($username) {
+ if (open(HGRC, '>>', "$destdir/.hg/hgrc")) {
+ print HGRC "[ui]\nusername =$username\n";
+ close HGRC;
+ } else {
+ print STDERR
+ "failed to open hgrc to set username: $!\n";
+ }
+ }
}
-
exit($rc);
}
--
Git repository for devscripts
--
To unsubscribe, send mail to [email protected].
