Lines Matching refs:Revision
252 my $revision;
255 my $svnInfo = `LC_ALL=C svn info $dir | grep Revision:`;
256 ($revision) = ($svnInfo =~ m/Revision: (\d+).*/g);
259 ($revision) = ($gitLog =~ m/ +git-svn-id: .+@(\d+) /g);
261 die "Unable to determine current SVN revision in $dir" unless (defined $revision);
262 return $revision;
405 # sourceRevision: the revision number of the source. This is the same
406 # as the revision number the file was copied from, in
447 if (/^--- .+\(revision (\d+)\)/) {
451 # which case there is always also a "revision" clause.
453 die("Revision number \"$2\" in \"from\" clause does not match " .
454 "source revision number \"$sourceRevision\".") if ($2 != $sourceRevision);
500 # sourceRevision: the revision number of the source. This is the same
501 # as the revision number the file was copied from, in