summaryrefslogtreecommitdiff
path: root/Build/source/libs/freetype2/freetype-src/src/tools/update-copyright-year
diff options
context:
space:
mode:
Diffstat (limited to 'Build/source/libs/freetype2/freetype-src/src/tools/update-copyright-year')
-rwxr-xr-xBuild/source/libs/freetype2/freetype-src/src/tools/update-copyright-year65
1 files changed, 23 insertions, 42 deletions
diff --git a/Build/source/libs/freetype2/freetype-src/src/tools/update-copyright-year b/Build/source/libs/freetype2/freetype-src/src/tools/update-copyright-year
index 69d63b60aba..c659bbafb89 100755
--- a/Build/source/libs/freetype2/freetype-src/src/tools/update-copyright-year
+++ b/Build/source/libs/freetype2/freetype-src/src/tools/update-copyright-year
@@ -2,7 +2,7 @@ eval '(exit $?0)' && eval 'exec perl -wS -i "$0" ${1+"$@"}'
& eval 'exec perl -wS -i "$0" $argv:q'
if 0;
-# Copyright (C) 2015-2021 by
+# Copyright (C) 2015-2020 by
# Werner Lemberg.
#
# This file is part of the FreeType project, and may only be used, modified,
@@ -28,20 +28,20 @@ eval '(exit $?0)' && eval 'exec perl -wS -i "$0" ${1+"$@"}'
#
# or
#
-# /* Copyright (c) 2000, 2001, 2004-2007 by */
-# /* foobar */
+# /* Copyright 2000, 2001, 2004-2007 by */
+# /* foobar */
#
# and replaces them uniformly with
#
-# Copyright (C) 2000-2021
+# Copyright 2000-2015
# foobar
#
# and
#
-# /* Copyright (C) 2000-2021 by */
-# /* foobar */
+# /* Copyright 2000-2015 by */
+# /* foobar */
#
-# (assuming that the current year is 2021). As can be seen, the line length
+# (assuming that the current year is 2015). As can be seen, the line length
# is retained if there is non-whitespace after the word `by' on the same
# line.
@@ -80,11 +80,11 @@ while (<>)
{
# Fill line to the same length (if appropriate); we skip the middle
# part but insert `(C)', three spaces, and `-'.
- my $space = length($+{space1})
- + length($+{middle})
- + length($+{space2})
+ my $space = length($+{space1}) - 1
+ + length($+{middle}) - 1
+ + length($+{space2}) - 1
+ length($+{space3})
- - (length("(C)") + 3 + 1);
+ - (length("(C)") + 1);
print "$+{begin}";
print "Copyright\ (C)\ $+{first}-$year\ by";
@@ -106,38 +106,19 @@ while (<>)
(?<end>.*)
}
{
- if ($+{first} < $year)
- {
- # Fill line to the same length (if appropriate); we insert three
- # spaces, the string `(C)', a `-', and the current year.
- my $space = length($+{space1})
- + length($+{space2})
- + length($+{space3})
- - (length($year) + length("(C)") + 3 + 1);
-
- print "$+{begin}";
- print "Copyright\ (C)\ $+{first}-$year\ by";
- # If $space is negative this inserts nothing.
- print ' ' x $space if length($+{end});
- print "$+{end}\n";
- $replaced = 1;
- }
- else
- {
- # Fill line to the same length (if appropriate); we insert three
- # spaces and the string `(C)'.
- my $space = length($+{space1})
- + length($+{space2})
- + length($+{space3})
- - (length("(C)") + 3);
+ # Fill line to the same length (if appropriate); we insert three
+ # spaces, a `-', and the current year.
+ my $space = length($+{space1}) - 1
+ + length($+{space2}) - 1
+ + length($+{space3})
+ - (length($year) + 1);
- print "$+{begin}";
- print "Copyright\ (C)\ $+{first}\ by";
- # If $space is negative this inserts nothing.
- print ' ' x $space if length($+{end});
- print "$+{end}\n";
- $replaced = 1;
- }
+ print "$+{begin}";
+ print "Copyright\ (C)\ $+{first}-$year\ by";
+ # If $space is negative this inserts nothing.
+ print ' ' x $space if length($+{end});
+ print "$+{end}\n";
+ $replaced = 1;
}ex
||
# Otherwise print line unaltered.