Browse Source

switch from Monotone to Git as the VCS for OpenPKG package repository

master
parent
commit
557c657b34
  1. 12
      .openpkg/openpkg-dev-release

12
.openpkg/openpkg-dev-release

@ -41,11 +41,11 @@ if ($info->{"package-name"} eq "") {
}
# commit changeset to Monotone repository
my $stat = `mtn stat . 2>/dev/null`;
if ($stat !~ m/\s+no\s+changes/s) {
my $stat = `git stat . 2>/dev/null`;
if ($stat !~ m/nothing\s+to\s+commit,\s+working\s+tree\s+clean/s) {
print STDOUT "\033[31m++ committing changeset to OpenPKG VCS repository\033[0m\n";
if ($info->{"vcs"} ne "mtn") {
print STDERR "openpkg-dev-release: ERROR: Ops, not Montone VCS?!\n";
if ($info->{"vcs"} ne "git") {
print STDERR "openpkg-dev-release: ERROR: Ops, not Git VCS?!\n";
exit(1);
}
if (! -f $info->{"spec-dir"} . "/" . $info->{"package-name"} . ".spec") {
@ -55,7 +55,7 @@ if ($stat !~ m/\s+no\s+changes/s) {
print STDOUT "-- local: " . $info->{"spec-dir"} . "\n";
my $cmd = "cd " . $info->{"spec-dir"} . " && ";
$info->{"commit-message"} =~ s/'/\\'/sg;
$cmd .= "mtn commit -m '" . $info->{"commit-message"} . "' .";
$cmd .= "git commit -m '" . $info->{"commit-message"} . "' .";
print STDOUT "\$ $cmd\n";
my $rc;
for (my $i = 0; $i < 10; $i++) {
@ -97,7 +97,7 @@ if (`uname -s` =~ m/^FreeBSD\n?$/s) {
foreach my $job ($jobs =~ m/\s+(\d+)[^ \t]*$/mg) {
system("at -r $job >/dev/null 2>&1 || true");
}
system("echo 'mtn --quiet sync >/dev/null 2>&1' | at -qZ '+ 15 minutes'");
system("echo 'git push --quiet >/dev/null 2>&1' | at -qZ '+ 15 minutes'");
}
# final hint

Loading…
Cancel
Save