Alien-SVN
view release on metacpan - search on metacpan
view release on metacpan or search on metacpan
src/subversion/tools/dist/backport.pl view on Meta::CPAN
# ### TODO: both here and in merge(), unlink files that previous merges added
die "Local mods to STATUS file $STATUS" if `$SVN status -q $STATUS`;
# Skip most of the file
while (<STATUS>) {
last if /^Approved changes/;
}
while (<STATUS>) {
last unless /^=+$/;
}
$/ = ""; # paragraph mode
while (<STATUS>) {
my @lines = split /\n/;
given ($lines[0]) {
# Section header
when (/^[A-Z].*:$/i) {
print "\n\n=== $lines[0]" unless $YES;
}
# Separator after section header
view all matches for this distributionview release on metacpan - search on metacpan
( run in 4.735 seconds using v1.00-cache-2.02-grep-82fe00e-cpan-d29e8ade9f55 )