Hello community,

here is the log from the commit of package perl-Safe-Isa for openSUSE:Factory 
checked in at 2014-09-22 09:23:39
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Comparing /work/SRC/openSUSE:Factory/perl-Safe-Isa (Old)
 and      /work/SRC/openSUSE:Factory/.perl-Safe-Isa.new (New)
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++

Package is "perl-Safe-Isa"

Changes:
--------
--- /work/SRC/openSUSE:Factory/perl-Safe-Isa/perl-Safe-Isa.changes      
2014-03-18 13:59:16.000000000 +0100
+++ /work/SRC/openSUSE:Factory/.perl-Safe-Isa.new/perl-Safe-Isa.changes 
2014-09-22 09:23:40.000000000 +0200
@@ -1,0 +2,7 @@
+Fri Sep 19 12:15:44 UTC 2014 - [email protected]
+
+- updated to 1.000005
+  - comment blessed use so people who don't know perl stop trying to break it
+  - add link to lightning talk given at YAPC::NA 2013
+
+-------------------------------------------------------------------

Old:
----
  Safe-Isa-1.000004.tar.gz

New:
----
  Safe-Isa-1.000005.tar.gz

++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++

Other differences:
------------------
++++++ perl-Safe-Isa.spec ++++++
--- /var/tmp/diff_new_pack.QZkEzT/_old  2014-09-22 09:23:41.000000000 +0200
+++ /var/tmp/diff_new_pack.QZkEzT/_new  2014-09-22 09:23:41.000000000 +0200
@@ -17,7 +17,7 @@
 
 
 Name:           perl-Safe-Isa
-Version:        1.000004
+Version:        1.000005
 Release:        0
 %define cpan_name Safe-Isa
 Summary:        Call isa, can, does and DOES safely on things that may not be 
objects
@@ -68,6 +68,7 @@
 
 %prep
 %setup -q -n %{cpan_name}-%{version}
+find . -type f -print0 | xargs -0 chmod 644
 
 %build
 %{__perl} Makefile.PL INSTALLDIRS=vendor

++++++ Safe-Isa-1.000004.tar.gz -> Safe-Isa-1.000005.tar.gz ++++++
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/Safe-Isa-1.000004/Changes 
new/Safe-Isa-1.000005/Changes
--- old/Safe-Isa-1.000004/Changes       2013-09-19 06:30:46.000000000 +0200
+++ new/Safe-Isa-1.000005/Changes       2014-08-17 00:15:44.000000000 +0200
@@ -1,17 +1,21 @@
 Revision history for Safe-Isa
 
-1.000004   2013-09-18
+1.000005 - 2014-08-16
+  - comment blessed use so people who don't know perl stop trying to break it
+  - add link to lightning talk given at YAPC::NA 2013
+
+1.000004 - 2013-09-18
   - fixed slightly mangled metadata from last release
 
-1.000003   2013-03-25
+1.000003 - 2013-03-25
   - fix NAME in Makefile.PL (RT#84212)
 
-1.000002   2012-07-19
-  - Document why we don't try and handle class namesZ
+1.000002 - 2012-07-19
+  - Document why we don't try and handle class names
   - Missed another stupid doc typo (thanks MJD)
 
-1.000001   2012-07-18
+1.000001 - 2012-07-18
   - Fix stupid doc typo (thanks miyagawa)
 
-1.000000   2012-07-18
+1.000000 - 2012-07-18
   - Initial release
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/Safe-Isa-1.000004/MANIFEST 
new/Safe-Isa-1.000005/MANIFEST
--- old/Safe-Isa-1.000004/MANIFEST      2013-09-19 06:31:51.000000000 +0200
+++ new/Safe-Isa-1.000005/MANIFEST      2014-08-17 00:15:55.000000000 +0200
@@ -1,5 +1,7 @@
 Changes
 lib/Safe/Isa.pm
+maint/bump-version
+maint/Makefile.include
 maint/Makefile.PL.include
 Makefile.PL
 MANIFEST                       This list of files
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/Safe-Isa-1.000004/META.json 
new/Safe-Isa-1.000005/META.json
--- old/Safe-Isa-1.000004/META.json     2013-09-19 06:31:50.000000000 +0200
+++ new/Safe-Isa-1.000005/META.json     2014-08-17 00:15:55.000000000 +0200
@@ -4,7 +4,7 @@
       "mst - Matt S. Trout (cpan:MSTROUT) <[email protected]>"
    ],
    "dynamic_config" : 0,
-   "generated_by" : "ExtUtils::MakeMaker version 6.76, CPAN::Meta::Converter 
version 2.132510",
+   "generated_by" : "ExtUtils::MakeMaker version 6.98, CPAN::Meta::Converter 
version 2.142060",
    "license" : [
       "perl_5"
    ],
@@ -20,7 +20,7 @@
       ]
    },
    "prereqs" : {
-      "build" : {
+      "configure" : {
          "requires" : {
             "ExtUtils::MakeMaker" : "0"
          }
@@ -28,7 +28,13 @@
       "runtime" : {
          "requires" : {
             "Exporter" : "5.57",
-            "Scalar::Util" : "0"
+            "Scalar::Util" : "0",
+            "perl" : "5.006"
+         }
+      },
+      "test" : {
+         "requires" : {
+            "Test::More" : "0"
          }
       }
    },
@@ -44,5 +50,5 @@
          "web" : 
"http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=p5sagit/Safe-Isa.git";
       }
    },
-   "version" : "1.000004"
+   "version" : "1.000005"
 }
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/Safe-Isa-1.000004/META.yml 
new/Safe-Isa-1.000005/META.yml
--- old/Safe-Isa-1.000004/META.yml      2013-09-19 06:31:50.000000000 +0200
+++ new/Safe-Isa-1.000005/META.yml      2014-08-17 00:15:55.000000000 +0200
@@ -3,22 +3,25 @@
 author:
   - 'mst - Matt S. Trout (cpan:MSTROUT) <[email protected]>'
 build_requires:
-  ExtUtils::MakeMaker: 0
+  Test::More: '0'
+configure_requires:
+  ExtUtils::MakeMaker: '0'
 dynamic_config: 0
-generated_by: 'ExtUtils::MakeMaker version 6.76, CPAN::Meta::Converter version 
2.132510'
+generated_by: 'ExtUtils::MakeMaker version 6.98, CPAN::Meta::Converter version 
2.142060'
 license: perl
 meta-spec:
   url: http://module-build.sourceforge.net/META-spec-v1.4.html
-  version: 1.4
+  version: '1.4'
 name: Safe-Isa
 no_index:
   directory:
     - t
     - inc
 requires:
-  Exporter: 5.57
-  Scalar::Util: 0
+  Exporter: '5.57'
+  Scalar::Util: '0'
+  perl: '5.006'
 resources:
   bugtracker: https://rt.cpan.org/Public/Dist/Display.html?Name=Safe-Isa
   repository: git://git.shadowcat.co.uk/p5sagit/Safe-Isa.git
-version: 1.000004
+version: '1.000005'
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/Safe-Isa-1.000004/Makefile.PL 
new/Safe-Isa-1.000005/Makefile.PL
--- old/Safe-Isa-1.000004/Makefile.PL   2013-09-19 06:30:41.000000000 +0200
+++ new/Safe-Isa-1.000005/Makefile.PL   2014-08-17 00:10:33.000000000 +0200
@@ -4,17 +4,11 @@
 use ExtUtils::MakeMaker;
 (do 'maint/Makefile.PL.include' or die $@) unless -f 'META.yml';
 
-WriteMakefile(
+my %WriteMakefileArgs = (
   NAME => 'Safe::Isa',
   VERSION_FROM => 'lib/Safe/Isa.pm',
 
-  PREREQ_PM => {
-    'Exporter' => '5.57',
-    'Scalar::Util' => 0,
-  },
-
-  -f 'META.yml' ? () : (
-    META_MERGE => {
+  META_MERGE => {
       'meta-spec' => { version => 2 },
       dynamic_config => 0,
 
@@ -30,6 +24,73 @@
             web => 
'https://rt.cpan.org/Public/Dist/Display.html?Name=Safe-Isa',
         },
       },
+  },
+
+  META_ADD => {
+    prereqs => {
+      configure => {
+        requires => {
+          'ExtUtils::MakeMaker' => '0',
+        },
+      },
+      runtime => {
+        requires => {
+          'Exporter' => '5.57',
+          'Scalar::Util' => 0,
+          perl => '5.006',
+        },
+      },
+      test => {
+        requires => {
+          'Test::More' => '0',
+        },
+      },
     },
-  ),
+  },
+
+  realclean => { FILES => [ 'Distar/', 'MANIFEST*' ] },
 );
+
+my $eumm_version  = eval $ExtUtils::MakeMaker::VERSION;
+
+for (qw(configure build test runtime)) {
+  my $key = $_ eq 'runtime' ? 'PREREQ_PM' : uc $_.'_REQUIRES';
+  next unless exists $WriteMakefileArgs{META_ADD}{prereqs}{$_}
+           or exists $WriteMakefileArgs{$key};
+  my $r = $WriteMakefileArgs{$key} = {
+    %{$WriteMakefileArgs{META_ADD}{prereqs}{$_}{requires} || {}},
+    %{delete $WriteMakefileArgs{$key} || {}},
+  };
+  defined $r->{$_} or delete $r->{$_} for keys %$r;
+}
+
+# dynamic prereqs get added here.
+
+$WriteMakefileArgs{MIN_PERL_VERSION} = delete 
$WriteMakefileArgs{PREREQ_PM}{perl} || 0;
+
+die 'attention developer: you need to do a sane meta merge here!'
+  if keys %{$WriteMakefileArgs{BUILD_REQUIRES}};
+
+$WriteMakefileArgs{BUILD_REQUIRES} = {
+    %{$WriteMakefileArgs{BUILD_REQUIRES} || {}},
+    %{delete $WriteMakefileArgs{TEST_REQUIRES}}
+} if $eumm_version < 6.63_03;
+
+$WriteMakefileArgs{PREREQ_PM} = {
+    %{$WriteMakefileArgs{PREREQ_PM}},
+    %{delete $WriteMakefileArgs{BUILD_REQUIRES}}
+} if $eumm_version < 6.55_01;
+
+delete $WriteMakefileArgs{CONFIGURE_REQUIRES}
+  if $eumm_version < 6.51_03;
+
+delete $WriteMakefileArgs{MIN_PERL_VERSION}
+  if $eumm_version < 6.48;
+
+delete @WriteMakefileArgs{qw(META_ADD META_MERGE)}
+  if $eumm_version < 6.46;
+
+delete $WriteMakefileArgs{LICENSE}
+  if $eumm_version < 6.31;
+
+WriteMakefile(%WriteMakefileArgs);
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/Safe-Isa-1.000004/README new/Safe-Isa-1.000005/README
--- old/Safe-Isa-1.000004/README        2013-09-19 06:31:51.000000000 +0200
+++ new/Safe-Isa-1.000005/README        2014-08-17 00:15:55.000000000 +0200
@@ -116,6 +116,10 @@
     If called on an object, calls "method_name" on it and returns the
     result, otherwise returns nothing.
 
+SEE ALSO
+    I gave a lightning talk on this module (and curry and Import::Into) at
+    YAPC::NA 2013 <https://www.youtube.com/watch?v=wFXWV2yY7gE&t=46m05s>.
+
 AUTHOR
     mst - Matt S. Trout (cpan:MSTROUT) <[email protected]>
 
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/Safe-Isa-1.000004/lib/Safe/Isa.pm 
new/Safe-Isa-1.000005/lib/Safe/Isa.pm
--- old/Safe-Isa-1.000004/lib/Safe/Isa.pm       2013-09-19 06:30:41.000000000 
+0200
+++ new/Safe-Isa-1.000005/lib/Safe/Isa.pm       2014-08-17 00:14:04.000000000 
+0200
@@ -5,12 +5,15 @@
 use Scalar::Util qw(blessed);
 use Exporter 5.57 qw(import);
 
-our $VERSION = '1.000004';
+our $VERSION = '1.000005';
 
 our @EXPORT = qw($_call_if_object $_isa $_can $_does $_DOES);
 
 our $_call_if_object = sub {
   my ($obj, $method) = (shift, shift);
+  # This is intentionally a truth test, not a defined test, otherwise
+  # we gratuitously break modules like Scalar::Defer, which would be
+  # un-perlish.
   return unless blessed($obj);
   return $obj->$method(@_);
 };
@@ -145,6 +148,11 @@
 If called on an object, calls C<method_name> on it and returns the result,
 otherwise returns nothing.
 
+=head1 SEE ALSO
+
+I gave a lightning talk on this module (and L<curry> and L<Import::Into>) at
+L<YAPC::NA 2013|https://www.youtube.com/watch?v=wFXWV2yY7gE&t=46m05s>.
+
 =head1 AUTHOR
 
 mst - Matt S. Trout (cpan:MSTROUT) <[email protected]>
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/Safe-Isa-1.000004/maint/Makefile.include 
new/Safe-Isa-1.000005/maint/Makefile.include
--- old/Safe-Isa-1.000004/maint/Makefile.include        1970-01-01 
01:00:00.000000000 +0100
+++ new/Safe-Isa-1.000005/maint/Makefile.include        2014-08-17 
00:06:14.000000000 +0200
@@ -0,0 +1,11 @@
+bump:
+       maint/bump-version
+       rm Makefile
+bumpminor:
+       maint/bump-version minor
+       rm Makefile
+bumpmajor:
+       maint/bump-version major
+       rm Makefile
+upload: $(DISTVNAME).tar$(SUFFIX)
+       cpan-upload $<
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/Safe-Isa-1.000004/maint/bump-version 
new/Safe-Isa-1.000005/maint/bump-version
--- old/Safe-Isa-1.000004/maint/bump-version    1970-01-01 01:00:00.000000000 
+0100
+++ new/Safe-Isa-1.000005/maint/bump-version    2014-08-17 00:06:39.000000000 
+0200
@@ -0,0 +1,39 @@
+#!/usr/bin/env perl
+
+use 5.010;
+use strict;
+use warnings FATAL => 'all';
+use autodie;
+
+chomp(my $LATEST = qx(grep '^[0-9]' Changes | head -1 | awk '{print \$1}'));
+
+my @parts = map { m/(\d{1,3})/g } split /\./, $LATEST;
+push @parts, 0, 0;
+
+my $OLD_DECIMAL = sprintf('%i.%03i%03i', @parts[0..2]);
+
+my %bump_part = (major => 0, minor => 1, bugfix => 2);
+
+my $bump_this = 
+  $bump_part{$ARGV[0]||'bugfix'}
+    // die "no idea which part to bump - $ARGV[0] means nothing to me";
+
+my @new_parts = @parts;
+
+$new_parts[$bump_this]++;
+
+my $NEW_DECIMAL = sprintf('%i.%03i%03i', @new_parts[0..2]);
+
+my @PM_FILES = ( 'lib/Safe/Isa.pm' );
+
+foreach my $filename (@PM_FILES) {
+  warn "Bumping $OLD_DECIMAL -> $NEW_DECIMAL in $filename\n";
+
+  my $file = do { local (@ARGV, $/) = ($filename); <> };
+
+  $file =~ s/(?<=\$VERSION = ')${\quotemeta $OLD_DECIMAL}/${NEW_DECIMAL}/;
+
+  open my $out, '>', $filename;
+
+  print $out $file;
+}

-- 
To unsubscribe, e-mail: [email protected]
For additional commands, e-mail: [email protected]

Reply via email to