Repository: lucy-clownfish
Updated Branches:
  refs/heads/master 366ecac93 -> cb4228524


Update update_version script


Project: http://git-wip-us.apache.org/repos/asf/lucy-clownfish/repo
Commit: http://git-wip-us.apache.org/repos/asf/lucy-clownfish/commit/767ab5e6
Tree: http://git-wip-us.apache.org/repos/asf/lucy-clownfish/tree/767ab5e6
Diff: http://git-wip-us.apache.org/repos/asf/lucy-clownfish/diff/767ab5e6

Branch: refs/heads/master
Commit: 767ab5e697d2780208f9afeedf0554962d7e3a38
Parents: 366ecac
Author: Nick Wellnhofer <wellnho...@aevum.de>
Authored: Sat Sep 24 14:52:04 2016 +0200
Committer: Nick Wellnhofer <wellnho...@aevum.de>
Committed: Sat Sep 24 14:52:04 2016 +0200

----------------------------------------------------------------------
 devel/bin/update_version | 18 +++++++++++++++---
 1 file changed, 15 insertions(+), 3 deletions(-)
----------------------------------------------------------------------


http://git-wip-us.apache.org/repos/asf/lucy-clownfish/blob/767ab5e6/devel/bin/update_version
----------------------------------------------------------------------
diff --git a/devel/bin/update_version b/devel/bin/update_version
index 0ee157e..aa44a9b 100755
--- a/devel/bin/update_version
+++ b/devel/bin/update_version
@@ -97,6 +97,14 @@ if ( $z == 0 && $dev == 0 ) {
 }
 write_file( 'runtime/perl/lib/Clownfish.pm', $buf );
 
+# Update Clownfish/Test.pm.
+$buf = read_file('runtime/perl/lib/Clownfish/Test.pm');
+$buf =~ s/(our \$VERSION\ +=\ +)'.+?'/$1'$x_yyyzzz_version'/g
+    or die "no match";
+$buf =~ s/(bootstrap Clownfish::Test ')(.+?)'/$1$x_y_z_d_version'/
+    or die "no match";
+write_file( 'runtime/perl/lib/Clownfish/Test.pm', $buf );
+
 # Update compiler Build.PL
 $buf = read_file('compiler/perl/Build.PL');
 $buf =~ s/(dist_version\ +=>\ +)'.+?'/$1'$x_y_z_d_version'/
@@ -145,15 +153,19 @@ write_file( 
'compiler/perl/lib/Clownfish/CFC/Perl/Build.pm', $buf );
 $buf = read_file('runtime/core/Clownfish.cfp');
 $buf =~ s/("version":\s+)"v\d+\.\d+\.\d+"/$1"v$x_y_z_version"/
     or die "no match";
+if ( $z == 0 && $dev == 0 ) {
+    $buf =~ s/("major_version":\s+)"v\d+\.\d+\.\d+"/$1"v$x_y_z_version"/
+        or die "no match";
+}
 write_file( 'runtime/core/Clownfish.cfp', $buf );
 
-# Update runtime/core/TestClownfish.cfp
-$buf = read_file('runtime/core/TestClownfish.cfp');
+# Update runtime/test/TestClownfish.cfp
+$buf = read_file('runtime/test/TestClownfish.cfp');
 $buf =~ s/("version":\s+)"v\d+\.\d+\.\d+"/$1"v$x_y_z_version"/
     or die "no match";
 $buf =~ s/("Clownfish":\s+)"v\d+\.\d+\.\d+"/$1"v$x_y_z_version"/
     or die "no match";
-write_file( 'runtime/core/TestClownfish.cfp', $buf );
+write_file( 'runtime/test/TestClownfish.cfp', $buf );
 
 # Update runtime/core/Clownfish/Docs/WritingClasses.md
 $buf = read_file('runtime/core/Clownfish/Docs/WritingClasses.md');

Reply via email to