[Bps-public-commit] Shipwright branch, master, updated. 500878d61cd9763292db5d3a6d401fe12780d7e0

sunnavy at bestpractical.com sunnavy at bestpractical.com
Mon Apr 27 01:56:58 EDT 2009


The branch, master has been updated
       via  500878d61cd9763292db5d3a6d401fe12780d7e0 (commit)
       via  f1506d1ea1a6307317d992fb0aff4296c166d51b (commit)
      from  4866b2f6d7b68b7dd7baa9f65db14f5ca7817419 (commit)

Summary of changes:
 Changes                        |    4 ++++
 MANIFEST                       |    1 +
 META.yml                       |    2 +-
 lib/Shipwright.pm              |    2 +-
 lib/Shipwright/Backend/Base.pm |    2 +-
 lib/Shipwright/Backend/FS.pm   |    2 +-
 lib/Shipwright/Backend/Git.pm  |    1 +
 lib/Shipwright/Backend/SVN.pm  |    2 +-
 8 files changed, 11 insertions(+), 5 deletions(-)

- Log -----------------------------------------------------------------
commit f1506d1ea1a6307317d992fb0aff4296c166d51b
Author: sunnavy <sunnavy at gmail.com>
Date:   Mon Apr 27 13:55:50 2009 +0800

    never really run import sub when the package is *use*d

diff --git a/lib/Shipwright/Backend/Base.pm b/lib/Shipwright/Backend/Base.pm
index 6dd823d..9f7f055 100644
--- a/lib/Shipwright/Backend/Base.pm
+++ b/lib/Shipwright/Backend/Base.pm
@@ -139,7 +139,7 @@ import a dist.
 
 sub import {
     my $self = shift;
-    return unless @_;
+    return unless ref $self; # get rid of class->import
     my %args = @_;
     my $name = $args{source};
     $name =~ s{.*/}{};
diff --git a/lib/Shipwright/Backend/FS.pm b/lib/Shipwright/Backend/FS.pm
index 26bdc67..ff317ec 100644
--- a/lib/Shipwright/Backend/FS.pm
+++ b/lib/Shipwright/Backend/FS.pm
@@ -207,7 +207,7 @@ sub _update_dir {
 
 sub import {
     my $self = shift;
-    return unless @_;
+    return unless ref $self; # get rid of class->import
     return $self->SUPER::import( @_, delete => 1 );
 }
 
diff --git a/lib/Shipwright/Backend/Git.pm b/lib/Shipwright/Backend/Git.pm
index 17373e1..419ebbe 100644
--- a/lib/Shipwright/Backend/Git.pm
+++ b/lib/Shipwright/Backend/Git.pm
@@ -164,6 +164,7 @@ sub _update_file {
 
 sub import {
     my $self = shift;
+    return unless ref $self; # get rid of class->import
     $self->fs_backend->import(@_);
     my %args = @_;
     my $name = $args{source};
diff --git a/lib/Shipwright/Backend/SVN.pm b/lib/Shipwright/Backend/SVN.pm
index 427fd32..0dd4052 100644
--- a/lib/Shipwright/Backend/SVN.pm
+++ b/lib/Shipwright/Backend/SVN.pm
@@ -50,7 +50,7 @@ sub initialize {
 
 sub import {
     my $self = shift;
-    return unless @_;
+    return unless ref $self; # get rid of class->import
     return $self->SUPER::import( @_, delete => 1 );
 }
 

commit 500878d61cd9763292db5d3a6d401fe12780d7e0
Author: sunnavy <sunnavy at gmail.com>
Date:   Mon Apr 27 13:56:44 2009 +0800

    update version to 2.2.0, also package files

diff --git a/Changes b/Changes
index 9170c92..6c10659 100644
--- a/Changes
+++ b/Changes
@@ -1,5 +1,9 @@
 Revision history for Shipwright
 
+2.2.0 Mon Apr 27 13:40:25 CST 2009
+
++ git backend support
+
 2.1.8 Sat Apr 18 16:01:01 CST 2009
 
 bug fix version
diff --git a/MANIFEST b/MANIFEST
index 442e5cf..3e53979 100644
--- a/MANIFEST
+++ b/MANIFEST
@@ -19,6 +19,7 @@ lib/Shipwright.pm
 lib/Shipwright/Backend.pm
 lib/Shipwright/Backend/Base.pm
 lib/Shipwright/Backend/FS.pm
+lib/Shipwright/Backend/Git.pm
 lib/Shipwright/Backend/SVK.pm
 lib/Shipwright/Backend/SVN.pm
 lib/Shipwright/Logger.pm
diff --git a/META.yml b/META.yml
index a8c89dd..aae74cc 100644
--- a/META.yml
+++ b/META.yml
@@ -50,4 +50,4 @@ requires:
   version: 0
 resources:
   license: http://dev.perl.org/licenses/
-version: 2.001008
+version: 2.002
diff --git a/lib/Shipwright.pm b/lib/Shipwright.pm
index 0f03280..8f376b6 100644
--- a/lib/Shipwright.pm
+++ b/lib/Shipwright.pm
@@ -2,7 +2,7 @@ package Shipwright;
 
 use warnings;
 use strict;
-use version; our $VERSION = qv('2.1.8');
+use version; our $VERSION = qv('2.2.0');
 
 use base qw/Class::Accessor::Fast/;
 

-----------------------------------------------------------------------



More information about the Bps-public-commit mailing list