Bug #: none
[WebKit-https.git] / WebKitTools / checkout
index 963a16f4eb59295df61c6d5cb9d8db3e2c750144..b306a3c152c91a68e7c0b173bf5d3fb8c1829503 100755 (executable)
@@ -32,7 +32,9 @@ use strict;
 use Getopt::Long;
 
 my $includeSVG = 0;
-GetOptions('svg' => \$includeSVG);
+my $includeTests = 1;
+GetOptions('svg' => \$includeSVG,
+           'tests!' => \$includeTests);
 
 # Check that we're in the right directory.
 if (! -d "WebKitTools") {
@@ -53,12 +55,14 @@ close ROOT;
 # Check out all the sources.
 print "CVS root is $root\n";
 print "Checking out WebKitTools (again), JavaScriptCore, WebCore, WebKitLibraries";
+print ", LayoutTests" if $includeTests;
 if ($includeSVG) {
     print ", WebKit and SVGSupport\n";
 } else {
     print " and WebKit\n";
 }
 my $directories = "WebKitTools JavaScriptCore WebCore WebKitLibraries WebKit";
+$directories .= " LayoutTests" if $includeTests;
 $directories .= " SVGSupport" if $includeSVG;
 open CVS, "cvs -d '$root' co -P $directories |" or die;
 while (<CVS>) {