version 1.1, 2012/02/17 15:09:30
|
version 1.1.1.3, 2016/11/01 09:54:32
|
Line 67 check_git_state($master_branch, 1, 1);
|
Line 67 check_git_state($master_branch, 1, 1);
|
my $confversion; |
my $confversion; |
open(IN, '<', 'configure.ac') or die $!; |
open(IN, '<', 'configure.ac') or die $!; |
while (<IN>) { |
while (<IN>) { |
if (/^RSYNC_VERSION=(.*)/) { | if (/^AC_INIT\(\[rsync\],\s*\[(\d.+?)\]/) { |
$confversion = $1; |
$confversion = $1; |
last; |
last; |
} |
} |
} |
} |
close IN; |
close IN; |
die "Unable to find RSYNC_VERSION in configure.ac\n" unless defined $confversion; | die "Unable to find AC_INIT with version in configure.ac\n" unless defined $confversion; |
|
|
open(IN, '<', 'OLDNEWS') or die $!; |
open(IN, '<', 'OLDNEWS') or die $!; |
$_ = <IN>; |
$_ = <IN>; |
Line 202 foreach my $fn (@tweak_files) {
|
Line 202 foreach my $fn (@tweak_files) {
|
undef $/; $_ = <IN>; $/ = "\n"; |
undef $/; $_ = <IN>; $/ = "\n"; |
close IN; |
close IN; |
if ($fn =~ /configure/) { |
if ($fn =~ /configure/) { |
s/^RSYNC_VERSION=.*/RSYNC_VERSION=$version/m | s/^(AC_INIT\(\[rsync\],\s*\[)\d.+?(\])/$1$version$2/m |
or die "Unable to update RSYNC_VERSION in $fn\n"; | or die "Unable to update AC_INIT with version in $fn\n"; |
} elsif ($fn =~ /\.spec/) { |
} elsif ($fn =~ /\.spec/) { |
while (my($str, $val) = each %specvars) { |
while (my($str, $val) = each %specvars) { |
s/^\Q$str\E .*/$str $val/m |
s/^\Q$str\E .*/$str $val/m |
Line 278 system "packaging/patch-update --branch=$master_branch
|
Line 278 system "packaging/patch-update --branch=$master_branch
|
|
|
if ($ans =~ /^y/i) { |
if ($ans =~ /^y/i) { |
print "\nVisiting all \"patch/$master_branch/*\" branches ...\n"; |
print "\nVisiting all \"patch/$master_branch/*\" branches ...\n"; |
system "packaging/patch-update --branch=$master_branch --shell"; | system "packaging/patch-update --branch=$master_branch --skip-check --shell"; |
} |
} |
|
|
if (-d 'patches/.git') { |
if (-d 'patches/.git') { |