Permalink
Browse files

regen

  • Loading branch information...
1 parent 7138ecc commit de88816379df33d8dc4436443d8edbdd3174bd96 @gugod gugod committed Apr 26, 2010
Showing with 2 additions and 2 deletions.
  1. +2 −2 perlbrew
View
@@ -763,7 +763,7 @@ $INC{'HTTP/Lite.pm'} = __FILE__;
package App::perlbrew;
use strict;
use 5.8.0;
-our $VERSION = "0.05";
+our $VERSION = "0.06";
my $ROOT = $ENV{PERLBREW_ROOT} || "$ENV{HOME}/perl5/perlbrew";
my $CURRENT_PERL = "$ROOT/perls/current";
@@ -969,7 +969,7 @@ HELP
my $usedevel = $dist_version =~ /5\.1[13579]|git/ ? "-Dusedevel" : "";
my @d_options = @{ $self->{D} };
- my $as = $self->{as} || $dist_git_describe ? "perl-$dist_git_describe" : $dist;
+ my $as = $self->{as} || ($dist_git_describe ? "perl-$dist_git_describe" : $dist);
unshift @d_options, qq(prefix=$ROOT/perls/$as);
push @d_options, "usedevel" if $usedevel;
print "Installing $dist into $ROOT/perls/$as\n";

0 comments on commit de88816

Please sign in to comment.