are controlled by cvs, or when changes cross multiple repositories.
* Scripts/update-webkit: Don't print messages if the "quiet" flag is set.
git-svn-id: https://svn.webkit.org/repository/webkit/trunk@10762
268f45cc-cd09-0410-ab3c-
d52691b4dbfc
+2005-10-06 Darin Adler <darin@apple.com>
+
+ * Scripts/cvs-apply: Fixed merge option to work better when not all directories
+ are controlled by cvs, or when changes cross multiple repositories.
+ * Scripts/update-webkit: Don't print messages if the "quiet" flag is set.
+
2005-10-03 Eric Seidel <eseidel@apple.com>
Reviewed by mjs.
if ($merge) {
for my $file (sort keys %versions) {
print "Getting version $versions{$file} of $file\n";
- system "cvs update -r $versions{$file} $file";
+ $file =~ m|^(([^/\n]*/)+)([^/\n]+)$| or die;
+ my ($prefix, $base) = ($1, $3);
+ chdir $prefix;
+ system "cvs update -r $versions{$file} $base";
+ chdir $startDir;
}
}
push @sources, "SVGSupport" if -d "SVGSupport";
# Check out all the sources.
-print "CVS root is $root\n";
+print "CVS root is $root\n" unless $quiet;
my $directories = join ", ", @sources;
$directories =~ s/, ([^,]+)$/, and $1/;
-print "Updating $directories\n";
+print "Updating $directories\n" unless $quiet;
open CVS, "cvs $cvsoptions -d '$root' co -P @sources |" or die;
while (<CVS>) {