[Bps-public-commit] r16890 - in Shipwright/trunk: lib/Shipwright/Script

[sunnavy at bestpractical.com]

Author: sunnavy
Date: Tue Nov 18 14:45:45 2008
New Revision: 16890

Modified:
   Shipwright/trunk/   (props changed)
   Shipwright/trunk/lib/Shipwright/Script/Import.pm

Log:
 r17794 at sunnavys-mb:  sunnavy | 2008-11-19 03:45:01 +0800
 the 2nd arg is the name when importing


Modified: Shipwright/trunk/lib/Shipwright/Script/Import.pm
==============================================================================
--- Shipwright/trunk/lib/Shipwright/Script/Import.pm	(original)
+++ Shipwright/trunk/lib/Shipwright/Script/Import.pm	Tue Nov 18 14:45:45 2008
@@ -46,6 +46,8 @@
 sub run {
     my $self   = shift;
     my $source = shift;
+    my $name   = shift;
+    $self->name( $name ) if $name && ! $self->name;
 
     my $shipwright = Shipwright->new( repository => $self->repository, );
 
@@ -389,7 +391,7 @@
 
 =head1 SYNOPSIS
 
- import SOURCE
+ import SOURCE [NAME]
 
 =head1 OPTIONS
 
@@ -438,6 +440,9 @@
 
 e.g. cpan:Jifty::DBI  cpan:File::Spec
 
+CAVEAT: we don't support renaming CPAN sources when importing, because it
+*really* is not a good idea and maybe hurt shipwright somewhere.
+
 =item File
 
 e.g. L<file:/home/sunnavy/foo-1.23.tar.gz>