r42795 - in /branches/upstream/libclass-insideout-perl/current: ./ lib/Class/ lib/Class/InsideOut/Manual/ t/ t/Object/

jawnsy-guest at users.alioth.debian.org jawnsy-guest at users.alioth.debian.org
Tue Aug 25 19:44:24 UTC 2009


Author: jawnsy-guest
Date: Tue Aug 25 19:44:18 2009
New Revision: 42795

URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=42795
Log:
[svn-upgrade] Integrating new upstream version, libclass-insideout-perl (1.10)

Modified:
    branches/upstream/libclass-insideout-perl/current/Build.PL
    branches/upstream/libclass-insideout-perl/current/Changes
    branches/upstream/libclass-insideout-perl/current/MANIFEST.SKIP
    branches/upstream/libclass-insideout-perl/current/META.yml
    branches/upstream/libclass-insideout-perl/current/Makefile.PL
    branches/upstream/libclass-insideout-perl/current/README
    branches/upstream/libclass-insideout-perl/current/lib/Class/InsideOut.pm
    branches/upstream/libclass-insideout-perl/current/lib/Class/InsideOut.pod
    branches/upstream/libclass-insideout-perl/current/lib/Class/InsideOut/Manual/About.pm
    branches/upstream/libclass-insideout-perl/current/lib/Class/InsideOut/Manual/About.pod
    branches/upstream/libclass-insideout-perl/current/lib/Class/InsideOut/Manual/Advanced.pm
    branches/upstream/libclass-insideout-perl/current/lib/Class/InsideOut/Manual/Advanced.pod
    branches/upstream/libclass-insideout-perl/current/t/15_no_weaken_fallback.t
    branches/upstream/libclass-insideout-perl/current/t/Object/Scalar.pm

Modified: branches/upstream/libclass-insideout-perl/current/Build.PL
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libclass-insideout-perl/current/Build.PL?rev=42795&op=diff
==============================================================================
--- branches/upstream/libclass-insideout-perl/current/Build.PL (original)
+++ branches/upstream/libclass-insideout-perl/current/Build.PL Tue Aug 25 19:44:18 2009
@@ -49,10 +49,10 @@
         $self->SUPER::ACTION_testpod;
     }
 
-    sub ACTION_distdir {
+    sub ACTION_distmeta {
         my $self = shift;
         $self->depends_on('wikidoc');
-        $self->SUPER::ACTION_distdir;
+        $self->SUPER::ACTION_distmeta;
     }
 
 SUBCLASS

Modified: branches/upstream/libclass-insideout-perl/current/Changes
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libclass-insideout-perl/current/Changes?rev=42795&op=diff
==============================================================================
--- branches/upstream/libclass-insideout-perl/current/Changes (original)
+++ branches/upstream/libclass-insideout-perl/current/Changes Tue Aug 25 19:44:18 2009
@@ -1,4 +1,15 @@
 Revision history for Perl module Class::InsideOut
+
+1.10 Mon Aug 24 20:44:46 EDT 2009
+
+    Bug fixes:
+    - changed method of calling Exporter::import() to avoid confusing DProf
+    - fixed detection of missing 'weaken' function in newer Scalar::Util
+      (fixes test t/15_no_weaken_fallback.t) (RT#47623)
+
+    Other: 
+    - cleanup: eliminate test warning from bogus superclass in a test class
+    - docs: Noted that set_hooks aren't called by new() (RT#48106)
 
 1.09 Fri Jan  4 18:42:41 EST 2008
 

Modified: branches/upstream/libclass-insideout-perl/current/MANIFEST.SKIP
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libclass-insideout-perl/current/MANIFEST.SKIP?rev=42795&op=diff
==============================================================================
--- branches/upstream/libclass-insideout-perl/current/MANIFEST.SKIP (original)
+++ branches/upstream/libclass-insideout-perl/current/MANIFEST.SKIP Tue Aug 25 19:44:18 2009
@@ -3,6 +3,7 @@
 \bCVS\b
 ,v$
 .svn/
+.git
 
 # ExtUtils::MakeMaker generated files and dirs.
 ^MANIFEST\.(?!SKIP)

Modified: branches/upstream/libclass-insideout-perl/current/META.yml
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libclass-insideout-perl/current/META.yml?rev=42795&op=diff
==============================================================================
--- branches/upstream/libclass-insideout-perl/current/META.yml (original)
+++ branches/upstream/libclass-insideout-perl/current/META.yml Tue Aug 25 19:44:18 2009
@@ -1,12 +1,12 @@
 ---
 name: Class-InsideOut
-version: 1.09
+version: 1.10
 author:
   - 'David A. Golden <dagolden at cpan.org>'
 abstract: 'a safe, simple inside-out object construction kit'
 license: apache
 resources:
-  license: http://apache.org/licenses/LICENSE-2.0
+  license: http://www.apache.org/licenses/LICENSE-2.0.txt
 requires:
   Class::ISA: 0
   Config: 0
@@ -15,20 +15,22 @@
   Test::More: 0.45
   base: 0
   perl: 5.005
+configure_requires:
+  Module::Build: 0.34
 provides:
   Class::InsideOut:
     file: lib/Class/InsideOut.pm
-    version: 1.09
+    version: 1.10
   Class::InsideOut::Manual::About:
     file: lib/Class/InsideOut/Manual/About.pm
-    version: 1.09
+    version: 1.10
   Class::InsideOut::Manual::Advanced:
     file: lib/Class/InsideOut/Manual/Advanced.pm
-    version: 1.09
-generated_by: Module::Build version 0.280801
+    version: 1.10
+generated_by: Module::Build version 0.34
 meta-spec:
-  url: http://module-build.sourceforge.net/META-spec-v1.2.html
-  version: 1.2
+  url: http://module-build.sourceforge.net/META-spec-v1.4.html
+  version: 1.4
 no_index:
   directory:
     - examples

Modified: branches/upstream/libclass-insideout-perl/current/Makefile.PL
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libclass-insideout-perl/current/Makefile.PL?rev=42795&op=diff
==============================================================================
--- branches/upstream/libclass-insideout-perl/current/Makefile.PL (original)
+++ branches/upstream/libclass-insideout-perl/current/Makefile.PL Tue Aug 25 19:44:18 2009
@@ -1,4 +1,4 @@
-# Note: this file was auto-generated by Module::Build::Compat version 0.2808_01
+# Note: this file was auto-generated by Module::Build::Compat version 0.34
 require 5.005;
 use ExtUtils::MakeMaker;
 WriteMakefile

Modified: branches/upstream/libclass-insideout-perl/current/README
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libclass-insideout-perl/current/README?rev=42795&op=diff
==============================================================================
--- branches/upstream/libclass-insideout-perl/current/README (original)
+++ branches/upstream/libclass-insideout-perl/current/README Tue Aug 25 19:44:18 2009
@@ -2,7 +2,7 @@
     Class::InsideOut - a safe, simple inside-out object construction kit
 
 VERSION
-    This documentation refers to version 1.09
+    This documentation refers to version 1.10
 
 SYNOPSIS
       package My::Class;
@@ -247,6 +247,10 @@
     inside-out class properties in the @ISA tree. The argument may be a hash
     or hash reference.
 
+    Note: Properties are set directly, not via accessors. This means
+    "set_hook" functions will not be called. For more robust argument
+    checking, you will need to implement your own constructor.
+
   "options"
       Class::InsideOut::options( \%new_options );
       %current_options = Class::InsideOut::options();

Modified: branches/upstream/libclass-insideout-perl/current/lib/Class/InsideOut.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libclass-insideout-perl/current/lib/Class/InsideOut.pm?rev=42795&op=diff
==============================================================================
--- branches/upstream/libclass-insideout-perl/current/lib/Class/InsideOut.pm (original)
+++ branches/upstream/libclass-insideout-perl/current/lib/Class/InsideOut.pm Tue Aug 25 19:44:18 2009
@@ -3,7 +3,7 @@
 
 use vars qw/$VERSION @ISA @EXPORT @EXPORT_OK %EXPORT_TAGS/;
 
-$VERSION     = '1.09';
+$VERSION     = '1.10';
 @ISA         = qw ( Exporter );
 @EXPORT      = qw ( ); # nothing by default
 @EXPORT_OK   = qw ( new id options private property public readonly register );
@@ -20,9 +20,10 @@
 use Scalar::Util qw( refaddr reftype blessed );
 
 # Check for XS Scalar::Util with weaken() or warn and fallback
+# syntax of error changed in Scalar::Util so we check both versions
 BEGIN {
     eval { Scalar::Util->import( "weaken" ) };
-    if ( $@ =~ /\AWeak references/ ) {
+    if ( $@ =~ /\AWeak references|weaken is only available/ ) {
         warn "Scalar::Util::weaken unavailable: "
            . "Class::InsideOut will not be thread-safe and will leak memory\n";
         *weaken = sub { return @_ };
@@ -78,7 +79,8 @@
         *{ "$caller\::STORABLE_freeze" } = _gen_STORABLE_freeze( $caller, 0 );
         *{ "$caller\::STORABLE_thaw" } = _gen_STORABLE_thaw( $caller );
     }
-    goto &Exporter::import;
+    local $Exporter::ExportLevel = $Exporter::ExportLevel + 1;
+    &Exporter::import;
 }
 
 BEGIN { *id = \&Scalar::Util::refaddr; }
@@ -796,6 +798,10 @@
 scalar.  Arguments will be used to initialize all matching inside-out class
 properties in the {@ISA} tree.  The argument may be a hash or hash reference.
 
+Note: Properties are set directly, not via accessors.  This means {set_hook} 
+functions will not be called.  For more robust argument checking, you will
+need to implement your own constructor.
+
 == {options}
 
  Class::InsideOut::options( \%new_options );

Modified: branches/upstream/libclass-insideout-perl/current/lib/Class/InsideOut.pod
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libclass-insideout-perl/current/lib/Class/InsideOut.pod?rev=42795&op=diff
==============================================================================
--- branches/upstream/libclass-insideout-perl/current/lib/Class/InsideOut.pod (original)
+++ branches/upstream/libclass-insideout-perl/current/lib/Class/InsideOut.pod Tue Aug 25 19:44:18 2009
@@ -8,7 +8,7 @@
 
 =head1 VERSION
 
-This documentation refers to version 1.09
+This documentation refers to version 1.10
 
 =head1 SYNOPSIS
 
@@ -295,6 +295,10 @@
 scalar.  Arguments will be used to initialize all matching inside-out class
 properties in the C<<< @ISA >>> tree.  The argument may be a hash or hash reference.
 
+Note: Properties are set directly, not via accessors.  This means C<<< set_hook >>> 
+functions will not be called.  For more robust argument checking, you will
+need to implement your own constructor.
+
 =head2 C<<< options >>>
 
   Class::InsideOut::options( \%new_options );

Modified: branches/upstream/libclass-insideout-perl/current/lib/Class/InsideOut/Manual/About.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libclass-insideout-perl/current/lib/Class/InsideOut/Manual/About.pm?rev=42795&op=diff
==============================================================================
--- branches/upstream/libclass-insideout-perl/current/lib/Class/InsideOut/Manual/About.pm (original)
+++ branches/upstream/libclass-insideout-perl/current/lib/Class/InsideOut/Manual/About.pm Tue Aug 25 19:44:18 2009
@@ -3,7 +3,7 @@
 # turned into .pod by the Build.PL
 use strict; # make CPANTS happy
 use vars /$VERSION/;
-$VERSION = '1.09';
+$VERSION = '1.10';
 1;
 __END__
 

Modified: branches/upstream/libclass-insideout-perl/current/lib/Class/InsideOut/Manual/About.pod
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libclass-insideout-perl/current/lib/Class/InsideOut/Manual/About.pod?rev=42795&op=diff
==============================================================================
--- branches/upstream/libclass-insideout-perl/current/lib/Class/InsideOut/Manual/About.pod (original)
+++ branches/upstream/libclass-insideout-perl/current/lib/Class/InsideOut/Manual/About.pod Tue Aug 25 19:44:18 2009
@@ -9,7 +9,7 @@
 
 =head1 VERSION
 
-This documentation refers to version 1.09
+This documentation refers to version 1.10
 
 =head1 DESCRIPTION
 

Modified: branches/upstream/libclass-insideout-perl/current/lib/Class/InsideOut/Manual/Advanced.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libclass-insideout-perl/current/lib/Class/InsideOut/Manual/Advanced.pm?rev=42795&op=diff
==============================================================================
--- branches/upstream/libclass-insideout-perl/current/lib/Class/InsideOut/Manual/Advanced.pm (original)
+++ branches/upstream/libclass-insideout-perl/current/lib/Class/InsideOut/Manual/Advanced.pm Tue Aug 25 19:44:18 2009
@@ -3,7 +3,7 @@
 # turned into .pod by the Build.PL
 use strict; # make CPANTS happy
 use vars /$VERSION/;
-$VERSION = '1.09';
+$VERSION = '1.10';
 1;
 __END__
 

Modified: branches/upstream/libclass-insideout-perl/current/lib/Class/InsideOut/Manual/Advanced.pod
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libclass-insideout-perl/current/lib/Class/InsideOut/Manual/Advanced.pod?rev=42795&op=diff
==============================================================================
--- branches/upstream/libclass-insideout-perl/current/lib/Class/InsideOut/Manual/Advanced.pod (original)
+++ branches/upstream/libclass-insideout-perl/current/lib/Class/InsideOut/Manual/Advanced.pod Tue Aug 25 19:44:18 2009
@@ -8,7 +8,7 @@
 
 =head1 VERSION
 
-This documentation refers to version 1.09
+This documentation refers to version 1.10
 
 =head1 DESCRIPTION
 

Modified: branches/upstream/libclass-insideout-perl/current/t/15_no_weaken_fallback.t
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libclass-insideout-perl/current/t/15_no_weaken_fallback.t?rev=42795&op=diff
==============================================================================
--- branches/upstream/libclass-insideout-perl/current/t/15_no_weaken_fallback.t (original)
+++ branches/upstream/libclass-insideout-perl/current/t/15_no_weaken_fallback.t Tue Aug 25 19:44:18 2009
@@ -33,7 +33,7 @@
     }
 }
 
-plan tests => 2;
+plan tests => 3;
 
 #--------------------------------------------------------------------------#
 
@@ -52,7 +52,7 @@
 is( $@, q{}, 
     "require $class succeeded without XS" 
 );
-
+ok( $warning, "caught a warning" );
 like( $warning, '/Scalar::Util::weaken/', 
     "Saw warning for Scalar::Util::weaken unavailable"
 );

Modified: branches/upstream/libclass-insideout-perl/current/t/Object/Scalar.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libclass-insideout-perl/current/t/Object/Scalar.pm?rev=42795&op=diff
==============================================================================
--- branches/upstream/libclass-insideout-perl/current/t/Object/Scalar.pm (original)
+++ branches/upstream/libclass-insideout-perl/current/t/Object/Scalar.pm Tue Aug 25 19:44:18 2009
@@ -1,5 +1,5 @@
 package t::Object::Scalar;
- at ISA = qw( Bogus::Superclass );
+#@ISA = qw( Bogus::Superclass );
 
 use strict;
 




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