Chromium Code Reviews
chromiumcodereview-hr@appspot.gserviceaccount.com (chromiumcodereview-hr) | Please choose your nickname with Settings | Help | Chromium Project | Gerrit Changes | Sign out
(2202)

Unified Diff: Tools/Scripts/webkitperl/VCSUtils_unittest/fixChangeLogPatch.pl

Issue 1253013003: Remove all perl scripts from Tools/Scripts (Closed) Base URL: svn://svn.chromium.org/blink/trunk
Patch Set: Remove the python code to invoke Perl \o/ Created 5 years, 5 months ago
Use n/p to move between diff chunks; N/P to move between comments. Draft comments are only viewable by you.
Jump to:
View side-by-side diff with in-line comments
Download patch
Index: Tools/Scripts/webkitperl/VCSUtils_unittest/fixChangeLogPatch.pl
diff --git a/Tools/Scripts/webkitperl/VCSUtils_unittest/fixChangeLogPatch.pl b/Tools/Scripts/webkitperl/VCSUtils_unittest/fixChangeLogPatch.pl
deleted file mode 100644
index 4ee54fbe285de3f1542587d7d56773355e71dda8..0000000000000000000000000000000000000000
--- a/Tools/Scripts/webkitperl/VCSUtils_unittest/fixChangeLogPatch.pl
+++ /dev/null
@@ -1,525 +0,0 @@
-#!/usr/bin/perl
-#
-# Copyright (C) 2009, 2010 Chris Jerdonek (chris.jerdonek@gmail.com)
-# Copyright (C) Research In Motion 2010. All rights reserved.
-#
-# Redistribution and use in source and binary forms, with or without
-# modification, are permitted provided that the following conditions are
-# met:
-#
-# * Redistributions of source code must retain the above copyright
-# notice, this list of conditions and the following disclaimer.
-# * Redistributions in binary form must reproduce the above
-# copyright notice, this list of conditions and the following disclaimer
-# in the documentation and/or other materials provided with the
-# distribution.
-# * Neither the name of Google Inc. nor the names of its
-# contributors may be used to endorse or promote products derived from
-# this software without specific prior written permission.
-#
-# THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
-# "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
-# LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR
-# A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT
-# OWNER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
-# SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT
-# LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
-# DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
-# THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
-# (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE
-# OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
-
-# Unit tests of VCSUtils::fixChangeLogPatch().
-
-use strict;
-use warnings;
-
-use Test::More;
-use VCSUtils;
-
-# The source ChangeLog for these tests is the following:
-#
-# 2009-12-22 Alice <alice@email.address>
-#
-# Reviewed by Ray.
-#
-# Changed some code on 2009-12-22.
-#
-# * File:
-# * File2:
-#
-# 2009-12-21 Alice <alice@email.address>
-#
-# Reviewed by Ray.
-#
-# Changed some code on 2009-12-21.
-#
-# * File:
-# * File2:
-
-my @testCaseHashRefs = (
-{ # New test
- diffName => "fixChangeLogPatch: [no change] In-place change.",
- inputText => <<'END',
---- ChangeLog
-+++ ChangeLog
-@@ -1,5 +1,5 @@
- 2010-12-22 Bob <bob@email.address>
-
-- Reviewed by Sue.
-+ Reviewed by Ray.
-
- Changed some code on 2010-12-22.
-END
- expectedReturn => {
- patch => <<'END',
---- ChangeLog
-+++ ChangeLog
-@@ -1,5 +1,5 @@
- 2010-12-22 Bob <bob@email.address>
-
-- Reviewed by Sue.
-+ Reviewed by Ray.
-
- Changed some code on 2010-12-22.
-END
- }
-},
-{ # New test
- diffName => "fixChangeLogPatch: [no change] Remove first entry.",
- inputText => <<'END',
---- ChangeLog
-+++ ChangeLog
-@@ -1,11 +1,3 @@
--2010-12-22 Bob <bob@email.address>
--
-- Reviewed by Ray.
--
-- Changed some code on 2010-12-22.
--
-- * File:
--
- 2010-12-22 Alice <alice@email.address>
-
- Reviewed by Ray.
-END
- expectedReturn => {
- patch => <<'END',
---- ChangeLog
-+++ ChangeLog
-@@ -1,11 +1,3 @@
--2010-12-22 Bob <bob@email.address>
--
-- Reviewed by Ray.
--
-- Changed some code on 2010-12-22.
--
-- * File:
--
- 2010-12-22 Alice <alice@email.address>
-
- Reviewed by Ray.
-END
- }
-},
-{ # New test
- diffName => "fixChangeLogPatch: [no change] Remove entry in the middle.",
- inputText => <<'END',
---- ChangeLog
-+++ ChangeLog
-@@@ -7,10 +7,6 @@
-
- * File:
-
--2010-12-22 Bob <bob@email.address>
--
-- Changed some code on 2010-12-22.
--
- 2010-12-22 Alice <alice@email.address>
-
- Reviewed by Ray.
-END
- expectedReturn => {
- patch => <<'END',
---- ChangeLog
-+++ ChangeLog
-@@@ -7,10 +7,6 @@
-
- * File:
-
--2010-12-22 Bob <bob@email.address>
--
-- Changed some code on 2010-12-22.
--
- 2010-12-22 Alice <alice@email.address>
-
- Reviewed by Ray.
-END
- }
-},
-{ # New test
- diffName => "fixChangeLogPatch: [no change] Far apart changes (i.e. more than one chunk).",
- inputText => <<'END',
---- ChangeLog
-+++ ChangeLog
-@@ -7,7 +7,7 @@
-
- * File:
-
--2010-12-22 Bob <bob@email.address>
-+2010-12-22 Bobby <bob@email.address>
-
- Changed some code on 2010-12-22.
-
-@@ -21,7 +21,7 @@
-
- * File2:
-
--2010-12-21 Bob <bob@email.address>
-+2010-12-21 Bobby <bob@email.address>
-
- Changed some code on 2010-12-21.
-END
- expectedReturn => {
- patch => <<'END',
---- ChangeLog
-+++ ChangeLog
-@@ -7,7 +7,7 @@
-
- * File:
-
--2010-12-22 Bob <bob@email.address>
-+2010-12-22 Bobby <bob@email.address>
-
- Changed some code on 2010-12-22.
-
-@@ -21,7 +21,7 @@
-
- * File2:
-
--2010-12-21 Bob <bob@email.address>
-+2010-12-21 Bobby <bob@email.address>
-
- Changed some code on 2010-12-21.
-END
- }
-},
-{ # New test
- diffName => "fixChangeLogPatch: [no change] First line is new line.",
- inputText => <<'END',
---- ChangeLog
-+++ ChangeLog
-@@ -1,3 +1,11 @@
-+2009-12-22 Bob <bob@email.address>
-+
-+ Reviewed by Ray.
-+
-+ Changed some more code on 2009-12-22.
-+
-+ * File:
-+
- 2009-12-22 Alice <alice@email.address>
-
- Reviewed by Ray.
-END
- expectedReturn => {
- patch => <<'END',
---- ChangeLog
-+++ ChangeLog
-@@ -1,3 +1,11 @@
-+2009-12-22 Bob <bob@email.address>
-+
-+ Reviewed by Ray.
-+
-+ Changed some more code on 2009-12-22.
-+
-+ * File:
-+
- 2009-12-22 Alice <alice@email.address>
-
- Reviewed by Ray.
-END
- }
-},
-{ # New test
- diffName => "fixChangeLogPatch: [no change] No date string.",
- inputText => <<'END',
---- ChangeLog
-+++ ChangeLog
-@@ -6,6 +6,7 @@
-
- * File:
- * File2:
-+ * File3:
-
- 2009-12-21 Alice <alice@email.address>
-
-END
- expectedReturn => {
- patch => <<'END',
---- ChangeLog
-+++ ChangeLog
-@@ -6,6 +6,7 @@
-
- * File:
- * File2:
-+ * File3:
-
- 2009-12-21 Alice <alice@email.address>
-
-END
- }
-},
-{ # New test
- diffName => "fixChangeLogPatch: New entry inserted in middle.",
- inputText => <<'END',
---- ChangeLog
-+++ ChangeLog
-@@ -11,6 +11,14 @@
-
- Reviewed by Ray.
-
-+ Changed some more code on 2009-12-21.
-+
-+ * File:
-+
-+2009-12-21 Alice <alice@email.address>
-+
-+ Reviewed by Ray.
-+
- Changed some code on 2009-12-21.
-
- * File:
-END
- expectedReturn => {
- patch => <<'END',
---- ChangeLog
-+++ ChangeLog
-@@ -1,3 +1,11 @@
-+2009-12-21 Alice <alice@email.address>
-+
-+ Reviewed by Ray.
-+
-+ Changed some more code on 2009-12-21.
-+
-+ * File:
-+
- 2009-12-21 Alice <alice@email.address>
-
- Reviewed by Ray.
-END
- }
-},
-{ # New test
- diffName => "fixChangeLogPatch: New entry inserted earlier in the file, but after an entry with the same author and date.",
- inputText => <<'END',
---- ChangeLog
-+++ ChangeLog
-@@ -70,6 +70,14 @@
-
- 2009-12-22 Alice <alice@email.address>
-
-+ Reviewed by Sue.
-+
-+ Changed some more code on 2009-12-22.
-+
-+ * File:
-+
-+2009-12-22 Alice <alice@email.address>
-+
- Reviewed by Ray.
-
- Changed some code on 2009-12-22.
-END
- expectedReturn => {
- patch => <<'END',
---- ChangeLog
-+++ ChangeLog
-@@ -1,3 +1,11 @@
-+2009-12-22 Alice <alice@email.address>
-+
-+ Reviewed by Sue.
-+
-+ Changed some more code on 2009-12-22.
-+
-+ * File:
-+
- 2009-12-22 Alice <alice@email.address>
-
- Reviewed by Ray.
-END
- }
-},
-{ # New test
- diffName => "fixChangeLogPatch: Leading context includes first line.",
- inputText => <<'END',
---- ChangeLog
-+++ ChangeLog
-@@ -1,5 +1,13 @@
- 2009-12-22 Alice <alice@email.address>
-
-+ Reviewed by Sue.
-+
-+ Changed some more code on 2009-12-22.
-+
-+ * File:
-+
-+2009-12-22 Alice <alice@email.address>
-+
- Reviewed by Ray.
-
- Changed some code on 2009-12-22.
-END
- expectedReturn => {
- patch => <<'END',
---- ChangeLog
-+++ ChangeLog
-@@ -1,3 +1,11 @@
-+2009-12-22 Alice <alice@email.address>
-+
-+ Reviewed by Sue.
-+
-+ Changed some more code on 2009-12-22.
-+
-+ * File:
-+
- 2009-12-22 Alice <alice@email.address>
-
- Reviewed by Ray.
-END
- }
-},
-{ # New test
- diffName => "fixChangeLogPatch: Leading context does not include first line.",
- inputText => <<'END',
-@@ -2,6 +2,14 @@
-
- Reviewed by Ray.
-
-+ Changed some more code on 2009-12-22.
-+
-+ * File:
-+
-+2009-12-22 Alice <alice@email.address>
-+
-+ Reviewed by Ray.
-+
- Changed some code on 2009-12-22.
-
- * File:
-END
- expectedReturn => {
- patch => <<'END',
-@@ -1,3 +1,11 @@
-+2009-12-22 Alice <alice@email.address>
-+
-+ Reviewed by Ray.
-+
-+ Changed some more code on 2009-12-22.
-+
-+ * File:
-+
- 2009-12-22 Alice <alice@email.address>
-
- Reviewed by Ray.
-END
- }
-},
-{ # New test
- diffName => "fixChangeLogPatch: Non-consecutive line additions.",
-
-# This can occur, for example, if the new ChangeLog entry includes
-# trailing white space in the first blank line but not the second.
-# A diff command can then match the second blank line of the new
-# ChangeLog entry with the first blank line of the old.
-# The svn diff command with the default --diff-cmd has done this.
- inputText => <<'END',
-@@ -1,5 +1,11 @@
- 2009-12-22 Alice <alice@email.address>
-+ <pretend-whitespace>
-+ Reviewed by Ray.
-
-+ Changed some more code on 2009-12-22.
-+
-+2009-12-22 Alice <alice@email.address>
-+
- Reviewed by Ray.
-
- Changed some code on 2009-12-22.
-END
- expectedReturn => {
- patch => <<'END',
-@@ -1,3 +1,9 @@
-+2009-12-22 Alice <alice@email.address>
-+ <pretend-whitespace>
-+ Reviewed by Ray.
-+
-+ Changed some more code on 2009-12-22.
-+
- 2009-12-22 Alice <alice@email.address>
-
- Reviewed by Ray.
-END
- }
-},
-{ # New test
- diffName => "fixChangeLogPatch: Additional edits after new entry.",
- inputText => <<'END',
-@@ -2,10 +2,17 @@
-
- Reviewed by Ray.
-
-+ Changed some more code on 2009-12-22.
-+
-+ * File:
-+
-+2009-12-22 Alice <alice@email.address>
-+
-+ Reviewed by Ray.
-+
- Changed some code on 2009-12-22.
-
- * File:
-- * File2:
-
- 2009-12-21 Alice <alice@email.address>
-
-END
- expectedReturn => {
- patch => <<'END',
-@@ -1,11 +1,18 @@
-+2009-12-22 Alice <alice@email.address>
-+
-+ Reviewed by Ray.
-+
-+ Changed some more code on 2009-12-22.
-+
-+ * File:
-+
- 2009-12-22 Alice <alice@email.address>
-
- Reviewed by Ray.
-
- Changed some code on 2009-12-22.
-
- * File:
-- * File2:
-
- 2009-12-21 Alice <alice@email.address>
-
-END
- }
-},
-);
-
-my $testCasesCount = @testCaseHashRefs;
-plan(tests => $testCasesCount); # Total number of assertions.
-
-foreach my $testCase (@testCaseHashRefs) {
- my $testNameStart = "fixChangeLogPatch(): $testCase->{diffName}: comparing";
-
- my $got = VCSUtils::fixChangeLogPatch($testCase->{inputText});
- my $expectedReturn = $testCase->{expectedReturn};
-
- is_deeply($got, $expectedReturn, "$testNameStart return value.");
-}

Powered by Google App Engine
This is Rietveld 408576698