[lucy-commits] svn commit: r1126586 - in /incubator/lucy/trunk: devel/bin/update_version perl/lib/Lucy.pm

[ka...@apache.org]

Author: karpet
Date: Mon May 23 17:02:13 2011
New Revision: 1126586

URL: http://svn.apache.org/viewvc?rev=1126586&view=rev
Log:
fix bug where a version string was missed by update_version, causing older XSLoader calls to fail

Modified:
    incubator/lucy/trunk/devel/bin/update_version
    incubator/lucy/trunk/perl/lib/Lucy.pm

Modified: incubator/lucy/trunk/devel/bin/update_version
URL: http://svn.apache.org/viewvc/incubator/lucy/trunk/devel/bin/update_version?rev=1126586&r1=1126585&r2=1126586&view=diff
==============================================================================
--- incubator/lucy/trunk/devel/bin/update_version (original)
+++ incubator/lucy/trunk/devel/bin/update_version Mon May 23 17:02:13 2011
@@ -49,6 +49,8 @@ my $buf;
 $buf = read_file('perl/lib/Lucy.pm');
 $buf =~ s/(our \$VERSION\ +=\ +)'.+?'/$1'$x_yyyzzz_version'/
     or die "no match";
+$buf =~ s/XSLoader::load\( 'Lucy', '(.+?)'/XSLoader::load\( 'Lucy', '$x_yyyzzz_version'/
+    or die "no match";
 write_file( 'perl/lib/Lucy.pm', $buf );
 $buf = read_file('perl/lib/Lucy.pod');
 $buf =~ s/(^=head1\s+VERSION\s+)([\d.]+)/$1$x_y_z_version/m

Modified: incubator/lucy/trunk/perl/lib/Lucy.pm
URL: http://svn.apache.org/viewvc/incubator/lucy/trunk/perl/lib/Lucy.pm?rev=1126586&r1=1126585&r2=1126586&view=diff
==============================================================================
--- incubator/lucy/trunk/perl/lib/Lucy.pm (original)
+++ incubator/lucy/trunk/perl/lib/Lucy.pm Mon May 23 17:02:13 2011
@@ -26,7 +26,7 @@ $VERSION = eval $VERSION;
 
 use XSLoader;
 # This loads a large number of disparate subs.
-BEGIN { XSLoader::load( 'Lucy', '0.001' ) }
+BEGIN { XSLoader::load( 'Lucy', '0.001000' ) }
 
 BEGIN {
     push our @ISA, 'Exporter';