[libsphinx-search-perl] 10/16: New upstream release 0.22

Taku YASUI tach at debian.org
Sun Aug 11 11:53:24 UTC 2013


This is an automated email from the git hooks/post-receive script.

tach pushed a commit to branch master
in repository libsphinx-search-perl.

commit 2c8128553273200a8fc1c219bbbfa771d8d57a45
Author: tach <tach at 19660600-52fe-0310-9875-adc0d7a7b53c>
Date:   Thu Jun 25 10:27:27 2009 +0000

    New upstream release 0.22
---
 Changes              |   14 +++++++++++++-
 META.yml             |   26 ++++++++++++++++----------
 Makefile.PL          |    3 +++
 debian/changelog     |    6 ++++++
 lib/Sphinx/Search.pm |   17 +++++++++--------
 5 files changed, 47 insertions(+), 19 deletions(-)

diff --git a/Changes b/Changes
index 96a4609..86b8bc7 100644
--- a/Changes
+++ b/Changes
@@ -60,9 +60,21 @@ Revision history for Sphinx-Search
 0.18	2009-04-09
 	Included missing test files in CPAN package.
 
-0.19	Removed request for GMP implementation of Math::BigInt due to apparent
+0.19	2009-04-10
+	Removed request for GMP implementation of Math::BigInt due to apparent
 	bug in Math::BigInt on 32 bit architectures (Math::BigInt::Calc and
 	Math::BigInt::GMP give different answers for 32 bit shift of long
 	integer)
 	Fixed incorrect setting for _max_id that was causing results with 64 bit IDs to be
 	ignored unless SetIDRange() had been called.
+
+0.20	2009-05-01
+	Fixed dependency list to prevent failing tests on some systems.
+
+0.21	2009-05-04
+	Fixed another missing dependency (Encode)
+	Fixed 64 bit ID signed transfer on 32 bit systems compiled with -Duse64bitint.
+
+0.22    2009-05-07 
+     	Moved use of Config variables out of new so Config is only accessed at startup, to avoid delays in
+	new(). (rt.cpan.org #45789)
diff --git a/META.yml b/META.yml
index d0b4d29..0c32417 100644
--- a/META.yml
+++ b/META.yml
@@ -1,13 +1,19 @@
-# http://module-build.sourceforge.net/META-spec.html
-#XXXXXXX This is a prototype!!!  It will change in the future!!! XXXXX#
-name:         Sphinx-Search
-version:      0.19
-version_from: lib/Sphinx/Search.pm
-installdirs:  site
-requires:
+--- #YAML:1.0
+name:                Sphinx-Search
+version:             0.22
+abstract:            Sphinx search engine API Perl client
+license:             ~
+author:              
+    - Jon Schutz <jon at jschutz.net>
+generated_by:        ExtUtils::MakeMaker version 6.42
+distribution_type:   module
+requires:     
     Carp:                          0
+    Class::Accessor::Fast:         0
     Config:                        0
+    Data::Dumper:                  0
     DBI:                           0
+    Encode:                        0
     Errno:                         0
     Fcntl:                         0
     File::SearchPath:              0
@@ -15,6 +21,6 @@ requires:
     Path::Class:                   0
     Socket:                        0
     Test::More:                    0
-
-distribution_type: module
-generated_by: ExtUtils::MakeMaker version 6.30
+meta-spec:
+    url:     http://module-build.sourceforge.net/META-spec-v1.3.html
+    version: 1.3
diff --git a/Makefile.PL b/Makefile.PL
index ddfce11..0b213e9 100644
--- a/Makefile.PL
+++ b/Makefile.PL
@@ -19,6 +19,9 @@ WriteMakefile(
 	'Config' => 0,
 	'Errno' => 0,
 	'Fcntl' => 0,
+	'Class::Accessor::Fast' => 0,
+	'Data::Dumper' => 0,
+	'Encode' => 0,
     },
     dist                => { COMPRESS => 'gzip -9f', SUFFIX => 'gz', },
     clean               => { FILES => 'Sphinx-Search-*' },
diff --git a/debian/changelog b/debian/changelog
index b00aa9d..7311431 100644
--- a/debian/changelog
+++ b/debian/changelog
@@ -1,3 +1,9 @@
+libsphinx-search-perl (0.22-1) unstable; urgency=low
+
+  * New upstream release
+
+ -- Taku YASUI <tach at debian.org>  Thu, 25 Jun 2009 19:26:36 +0900
+
 libsphinx-search-perl (0.19-1) unstable; urgency=low
 
   * New upstream release
diff --git a/lib/Sphinx/Search.pm b/lib/Sphinx/Search.pm
index 5c1e85e..10d4ec5 100644
--- a/lib/Sphinx/Search.pm
+++ b/lib/Sphinx/Search.pm
@@ -13,6 +13,9 @@ use IO::Socket::INET;
 use IO::Socket::UNIX;
 use Encode qw/encode_utf8 decode_utf8/;
 
+my $is_native64 = $Config{longsize} == 8 || defined $Config{use64bitint} || defined $Config{use64bitall};
+    
+
 =head1 NAME
 
 Sphinx::Search - Sphinx search engine API Perl client
@@ -21,7 +24,7 @@ Sphinx::Search - Sphinx search engine API Perl client
 
 Please note that you *MUST* install a version which is compatible with your version of Sphinx.
 
-Use version 0.19 for Sphinx 0.9.9-rc2 and later (Please read the Compatibility Note under L<SetEncoders> regarding encoding changes)
+Use version 0.22 for Sphinx 0.9.9-rc2 and later (Please read the Compatibility Note under L<SetEncoders> regarding encoding changes)
 
 Use version 0.15 for Sphinx 0.9.9-svn-r1674
 
@@ -43,7 +46,7 @@ Use version 0.02 for Sphinx 0.9.8-cvs-20070818
 
 =cut
 
-our $VERSION = '0.19';
+our $VERSION = '0.22';
 
 =head1 SYNOPSIS
 
@@ -150,7 +153,7 @@ sub _sphPackI64 {
     my $v = shift;
 
     # x64 route
-    my $i = $self->{_longsize} >= 8 ? int($v) : Math::BigInt->new("$v");
+    my $i = $is_native64 ? int($v) : Math::BigInt->new("$v");
     return pack ( "NN", $i>>32, $i & 4294967295 );
 }
 
@@ -159,7 +162,7 @@ sub _sphPackU64 {
     my $self = shift;
     my $v = shift;
 
-    my $i = $self->{_longsize} >= 8  ? int($v) : Math::BigInt->new("$v");
+    my $i = $is_native64 ? int($v) : Math::BigInt->new("$v");
     return pack ( "NN", $i>>32, $i & 4294967295 );
 }
 
@@ -181,7 +184,7 @@ sub _sphUnpackU64
     my ($h,$l) = unpack ( "N*N*", $v );
 
     # x64 route
-    return ($h<<32) + $l if ( $self->{_longsize} >= 8 );
+    return ($h<<32) + $l if $is_native64;
 
     # x32 route, BigInt
     $h = Math::BigInt->new($h);
@@ -201,7 +204,7 @@ sub _sphUnpackI64
     my $neg = ($h & 0x80000000) ? 1 : 0;
 
     # x64 route
-    if ( $self->{_longsize} >= 8 ) {
+    if ( $is_native64 ) {
 	return -(~(($h<<32) + $l) + 1) if $neg;
 	return ($h<<32) + $l;
     }
@@ -297,8 +300,6 @@ sub new {
 	_reqs           => [],
 	_timeout        => 0,
 
-	_longsize      => $Config{longsize},
-
 	_string_encoder => \&encode_utf8,
 	_string_decoder => \&decode_utf8,
     };

-- 
Alioth's /usr/local/bin/git-commit-notice on /srv/git.debian.org/git/pkg-perl/packages/libsphinx-search-perl.git



More information about the Pkg-perl-cvs-commits mailing list