Don't hardcode Perl path; Release 1.3.7

TinoDidriksen · TinoDidriksen · commit 2bde13075f03 · 2022-07-20T14:33:28.000+02:00
diff --git a/scripts/update-revision.pl b/scripts/update-revision.pl
@@ -1,4 +1,4 @@
-#!/usr/bin/perl
+#!/usr/bin/env perl
 use strict;
 use warnings;
 
@@ -7,7 +7,7 @@
 $revision =~ s/^([0-9]+).*/$1/g;
 $revision += 1;
 
-`/usr/bin/perl -e 's/CG3_REVISION = [0-9]+;\$/CG3_REVISION = $revision;/;' -pi src/version.hpp`;
+`perl -e 's/CG3_REVISION = [0-9]+;\$/CG3_REVISION = $revision;/;' -pi src/version.hpp`;
 `svn2cl --group-by-day -i --reparagraph --limit 350`;
 
 print "Set revision to $revision.\n";
diff --git a/src/version.hpp b/src/version.hpp
@@ -29,7 +29,7 @@ constexpr auto CG3_COPYRIGHT_STRING = "Copyright (C) 2007-2021 GrammarSoft ApS.
 
 constexpr uint32_t CG3_VERSION_MAJOR = 1;
 constexpr uint32_t CG3_VERSION_MINOR = 3;
-constexpr uint32_t CG3_VERSION_PATCH = 6;
+constexpr uint32_t CG3_VERSION_PATCH = 7;
 constexpr uint32_t CG3_REVISION = 13892;
 constexpr uint32_t CG3_FEATURE_REV = 13892;
 constexpr uint32_t CG3_TOO_OLD = 10373;
diff --git a/test/Apertium/T_AnyMinusSome/run.pl b/test/Apertium/T_AnyMinusSome/run.pl
@@ -1,4 +1,4 @@
-#!/usr/bin/perl
+#!/usr/bin/env perl
 use strict;
 use warnings;
 use Cwd qw(realpath);
diff --git a/test/Apertium/T_Append/run.pl b/test/Apertium/T_Append/run.pl
@@ -1,4 +1,4 @@
-#!/usr/bin/perl
+#!/usr/bin/env perl
 use strict;
 use warnings;
 use Cwd qw(realpath);
diff --git a/test/Apertium/T_Barrier/run.pl b/test/Apertium/T_Barrier/run.pl
@@ -1,4 +1,4 @@
-#!/usr/bin/perl
+#!/usr/bin/env perl
 use strict;
 use warnings;
 use Cwd qw(realpath);
diff --git a/test/Apertium/T_CarefulBarrier/run.pl b/test/Apertium/T_CarefulBarrier/run.pl
@@ -1,4 +1,4 @@
-#!/usr/bin/perl
+#!/usr/bin/env perl
 use strict;
 use warnings;
 use Cwd qw(realpath);
diff --git a/test/Apertium/T_CharsInWhiteSpace/run.pl b/test/Apertium/T_CharsInWhiteSpace/run.pl
@@ -1,4 +1,4 @@
-#!/usr/bin/perl
+#!/usr/bin/env perl
 use strict;
 use warnings;
 use Cwd qw(realpath);
diff --git a/test/Apertium/T_CompositeSelect/run.pl b/test/Apertium/T_CompositeSelect/run.pl
@@ -1,4 +1,4 @@
-#!/usr/bin/perl
+#!/usr/bin/env perl
 use strict;
 use warnings;
 use Cwd qw(realpath);
diff --git a/test/Apertium/T_ContextTest/run.pl b/test/Apertium/T_ContextTest/run.pl
@@ -1,4 +1,4 @@
-#!/usr/bin/perl
+#!/usr/bin/env perl
 use strict;
 use warnings;
 use Cwd qw(realpath);
diff --git a/test/Apertium/T_Delimit/run.pl b/test/Apertium/T_Delimit/run.pl
@@ -1,4 +1,4 @@
-#!/usr/bin/perl
+#!/usr/bin/env perl
 use strict;
 use warnings;
 use Cwd qw(realpath);
diff --git a/test/Apertium/T_DontMatchEmptySet/run.pl b/test/Apertium/T_DontMatchEmptySet/run.pl
@@ -1,4 +1,4 @@
-#!/usr/bin/perl
+#!/usr/bin/env perl
 use strict;
 use warnings;
 use Cwd qw(realpath);
diff --git a/test/Apertium/T_EndlessSelect/run.pl b/test/Apertium/T_EndlessSelect/run.pl
@@ -1,4 +1,4 @@
-#!/usr/bin/perl
+#!/usr/bin/env perl
 use strict;
 use warnings;
 use Cwd qw(realpath);
diff --git a/test/Apertium/T_Flush/run.pl b/test/Apertium/T_Flush/run.pl
@@ -1,4 +1,4 @@
-#!/usr/bin/perl
+#!/usr/bin/env perl
 use strict;
 use warnings;
 use Cwd qw(realpath);
diff --git a/test/Apertium/T_Generate/run.pl b/test/Apertium/T_Generate/run.pl
@@ -1,4 +1,4 @@
-#!/usr/bin/perl
+#!/usr/bin/env perl
 use strict;
 use warnings;
 use Cwd qw(realpath);
diff --git a/test/Apertium/T_Iff/run.pl b/test/Apertium/T_Iff/run.pl
@@ -1,4 +1,4 @@
-#!/usr/bin/perl
+#!/usr/bin/env perl
 use strict;
 use warnings;
 use Cwd qw(realpath);
diff --git a/test/Apertium/T_Joiner/run.pl b/test/Apertium/T_Joiner/run.pl
@@ -1,4 +1,4 @@
-#!/usr/bin/perl
+#!/usr/bin/env perl
 use strict;
 use warnings;
 use Cwd qw(realpath);
diff --git a/test/Apertium/T_MapAdd_Different/run.pl b/test/Apertium/T_MapAdd_Different/run.pl
@@ -1,4 +1,4 @@
-#!/usr/bin/perl
+#!/usr/bin/env perl
 use strict;
 use warnings;
 use Cwd qw(realpath);
diff --git a/test/Apertium/T_MatchBaseform/run.pl b/test/Apertium/T_MatchBaseform/run.pl
@@ -1,4 +1,4 @@
-#!/usr/bin/perl
+#!/usr/bin/env perl
 use strict;
 use warnings;
 use Cwd qw(realpath);
diff --git a/test/Apertium/T_MatchWordform/run.pl b/test/Apertium/T_MatchWordform/run.pl
@@ -1,4 +1,4 @@
-#!/usr/bin/perl
+#!/usr/bin/env perl
 use strict;
 use warnings;
 use Cwd qw(realpath);
diff --git a/test/Apertium/T_MultiWords/run.pl b/test/Apertium/T_MultiWords/run.pl
@@ -1,4 +1,4 @@
-#!/usr/bin/perl
+#!/usr/bin/env perl
 use strict;
 use warnings;
 use Cwd qw(realpath);
diff --git a/test/Apertium/T_MultipleSections/run.pl b/test/Apertium/T_MultipleSections/run.pl
@@ -1,4 +1,4 @@
-#!/usr/bin/perl
+#!/usr/bin/env perl
 use strict;
 use warnings;
 use Cwd qw(realpath);
diff --git a/test/Apertium/T_MultiwordTagStaying/run.pl b/test/Apertium/T_MultiwordTagStaying/run.pl
@@ -1,4 +1,4 @@
-#!/usr/bin/perl
+#!/usr/bin/env perl
 use strict;
 use warnings;
 use Cwd qw(realpath);
diff --git a/test/Apertium/T_NegatedContextTest/run.pl b/test/Apertium/T_NegatedContextTest/run.pl
@@ -1,4 +1,4 @@
-#!/usr/bin/perl
+#!/usr/bin/env perl
 use strict;
 use warnings;
 use Cwd qw(realpath);
diff --git a/test/Apertium/T_RegExp_Map/run.pl b/test/Apertium/T_RegExp_Map/run.pl
@@ -1,4 +1,4 @@
-#!/usr/bin/perl
+#!/usr/bin/env perl
 use strict;
 use warnings;
 use Cwd qw(realpath);
diff --git a/test/Apertium/T_RegExp_Select/run.pl b/test/Apertium/T_RegExp_Select/run.pl
@@ -1,4 +1,4 @@
-#!/usr/bin/perl
+#!/usr/bin/env perl
 use strict;
 use warnings;
 use Cwd qw(realpath);
diff --git a/test/Apertium/T_RegExp_Substitute/run.pl b/test/Apertium/T_RegExp_Substitute/run.pl
@@ -1,4 +1,4 @@
-#!/usr/bin/perl
+#!/usr/bin/env perl
 use strict;
 use warnings;
 use Cwd qw(realpath);
diff --git a/test/Apertium/T_Remove/run.pl b/test/Apertium/T_Remove/run.pl
@@ -1,4 +1,4 @@
-#!/usr/bin/perl
+#!/usr/bin/env perl
 use strict;
 use warnings;
 use Cwd qw(realpath);
diff --git a/test/Apertium/T_RemoveSingleTag/run.pl b/test/Apertium/T_RemoveSingleTag/run.pl
@@ -1,4 +1,4 @@
-#!/usr/bin/perl
+#!/usr/bin/env perl
 use strict;
 use warnings;
 use Cwd qw(realpath);
diff --git a/test/Apertium/T_ScanningTests/run.pl b/test/Apertium/T_ScanningTests/run.pl
@@ -1,4 +1,4 @@
-#!/usr/bin/perl
+#!/usr/bin/env perl
 use strict;
 use warnings;
 use Cwd qw(realpath);
diff --git a/test/Apertium/T_Sections/run.pl b/test/Apertium/T_Sections/run.pl
@@ -1,4 +1,4 @@
-#!/usr/bin/perl
+#!/usr/bin/env perl
 use strict;
 use warnings;
 use Cwd qw(realpath);
diff --git a/test/Apertium/T_Select/run.pl b/test/Apertium/T_Select/run.pl
@@ -1,4 +1,4 @@
-#!/usr/bin/perl
+#!/usr/bin/env perl
 use strict;
 use warnings;
 use Cwd qw(realpath);
diff --git a/test/Apertium/T_SetOp_FailFast/run.pl b/test/Apertium/T_SetOp_FailFast/run.pl
@@ -1,4 +1,4 @@
-#!/usr/bin/perl
+#!/usr/bin/env perl
 use strict;
 use warnings;
 use Cwd qw(realpath);
diff --git a/test/Apertium/T_SetOp_OR/run.pl b/test/Apertium/T_SetOp_OR/run.pl
@@ -1,4 +1,4 @@
-#!/usr/bin/perl
+#!/usr/bin/env perl
 use strict;
 use warnings;
 use Cwd qw(realpath);
diff --git a/test/Apertium/T_SpaceInWord/run.pl b/test/Apertium/T_SpaceInWord/run.pl
@@ -1,4 +1,4 @@
-#!/usr/bin/perl
+#!/usr/bin/env perl
 use strict;
 use warnings;
 use Cwd qw(realpath);
diff --git a/test/Apertium/T_Substitute/run.pl b/test/Apertium/T_Substitute/run.pl
@@ -1,4 +1,4 @@
-#!/usr/bin/perl
+#!/usr/bin/env perl
 use strict;
 use warnings;
 use Cwd qw(realpath);
diff --git a/test/Apertium/T_SuperBlanks/run.pl b/test/Apertium/T_SuperBlanks/run.pl
@@ -1,4 +1,4 @@
-#!/usr/bin/perl
+#!/usr/bin/env perl
 use strict;
 use warnings;
 use Cwd qw(realpath);
diff --git a/test/Apertium/T_SuperBlanksNewline/run.pl b/test/Apertium/T_SuperBlanksNewline/run.pl
@@ -1,4 +1,4 @@
-#!/usr/bin/perl
+#!/usr/bin/env perl
 use strict;
 use warnings;
 use Cwd qw(realpath);
diff --git a/test/Apertium/T_SuperBlanksWithEscape/run.pl b/test/Apertium/T_SuperBlanksWithEscape/run.pl
@@ -1,4 +1,4 @@
-#!/usr/bin/perl
+#!/usr/bin/env perl
 use strict;
 use warnings;
 use Cwd qw(realpath);
diff --git a/test/Apertium/T_Unification/run.pl b/test/Apertium/T_Unification/run.pl
@@ -1,4 +1,4 @@
-#!/usr/bin/perl
+#!/usr/bin/env perl
 use strict;
 use warnings;
 use Cwd qw(realpath);
diff --git a/test/Apertium/T_UnknownWord/run.pl b/test/Apertium/T_UnknownWord/run.pl
@@ -1,4 +1,4 @@
-#!/usr/bin/perl
+#!/usr/bin/env perl
 use strict;
 use warnings;
 use Cwd qw(realpath);
diff --git a/test/Apertium/runall.pl b/test/Apertium/runall.pl
@@ -1,4 +1,4 @@
-#!/usr/bin/perl
+#!/usr/bin/env perl
 use strict;
 use warnings;
 use Cwd qw(realpath);

Original file line number	Diff line number	Diff line change
`@@ -1,4 +1,4 @@`
`1`		`-#!/usr/bin/perl`
	`1`	`+#!/usr/bin/env perl`
`2`	`2`	`use strict;`
`3`	`3`	`use warnings;`
`4`	`4`	`use Cwd qw(realpath);`