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

[? sunnavy]

The branch, master has been updated
       via  a752ec9f2c1b2fc107c236cfa4be70bc9114a1d1 (commit)
       via  ddb75cff88b19af53d25ed5bff76248a5877d86b (commit)
      from  1977c9e59c64cb321f0242ae622037591d22a749 (commit)

Summary of changes:
 lib/Shipwright/Manual/ENV.pod      |    4 ++++
 lib/Shipwright/Source/Directory.pm |    4 ++--
 2 files changed, 6 insertions(+), 2 deletions(-)

- Log -----------------------------------------------------------------
commit ddb75cff88b19af53d25ed5bff76248a5877d86b
Author: sunnavy <sunnavy at bestpractical.com>
Date:   Wed Jul 6 09:16:50 2011 +0800

    in case user specify the source a single "."

diff --git a/lib/Shipwright/Source/Directory.pm b/lib/Shipwright/Source/Directory.pm
index 81d0220..22ca8df 100644
--- a/lib/Shipwright/Source/Directory.pm
+++ b/lib/Shipwright/Source/Directory.pm
@@ -2,7 +2,7 @@ package Shipwright::Source::Directory;
 use strict;
 use warnings;
 use Shipwright::Util;
-use File::Spec::Functions qw/catfile catdir/;
+use File::Spec::Functions qw/catfile catdir rel2abs/;
 use File::Basename;
 use File::Copy::Recursive qw/rcopy/;
 use Cwd qw/getcwd/;
@@ -18,7 +18,7 @@ sub new {
     my $self  = $class->SUPER::new(@_);
     my $s     = $self->source;
     $s =~ s{/$}{};    # trim the last / to let cp work as we like
-    $self->source($s);
+    $self->source(rel2abs $s);
     return $self;
 }
 

commit a752ec9f2c1b2fc107c236cfa4be70bc9114a1d1
Author: sunnavy <sunnavy at bestpractical.com>
Date:   Wed Jul 6 09:18:12 2011 +0800

    document dzil env

diff --git a/lib/Shipwright/Manual/ENV.pod b/lib/Shipwright/Manual/ENV.pod
index daef341..3d96f0c 100644
--- a/lib/Shipwright/Manual/ENV.pod
+++ b/lib/Shipwright/Manual/ENV.pod
@@ -63,6 +63,10 @@ F<svnadmin> command is expected to be in the same directory as F<svn>.
 
 path of F<git> command, default value is F<git>.
 
+=item SHIPWRIGHT_DZIL 
+
+path of F<dzil> command, default value is F<dzil>.
+
 =item SHIPWRIGHT_CPAN_MIRROR
 
 url of the cpan mirror

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