Permalink
Browse files

Added a --uninst option to install

  • Loading branch information...
1 parent d0c19c1 commit b276a547299d1ffc17abc36eee2295d0fabd01df @Leont committed Dec 27, 2010
Showing with 4 additions and 7 deletions.
  1. +0 −1 META.yml
  2. +4 −6 inc/Library/Build/Install.pm
View
@@ -14,7 +14,6 @@ requires:
build_requires:
Archive::Tar: 0
ExtUtils::CBuilder: 0.27
- ExtUtils::Install: 1.47
Module::Load: 0
TAP::Harness: 3
configure_requires:
@@ -7,7 +7,8 @@ use warnings FATAL => 'all';
our $VERSION = '0.003';
use Config;
-use ExtUtils::Install qw/install/;
+use ExtUtils::Install qw/install uninstall/;
+use ExtUtils::Installed;
use File::Spec::Functions qw/catfile/;
my %install_dirs_for = (
@@ -76,11 +77,7 @@ my %install_actions = (
}
}
- install([
- from_to => \%from_to,
- verbose => $builder->stash('verbose') >= 0,
- dry_run => $builder->stash('dry_run'),
- ]);
+ install(\%from_to, $builder->stash('verbose') >= 0, $builder->stash('dry_run'), $builder->stash('uninst'));
},
);
@@ -114,6 +111,7 @@ sub mixin {
},
dest_dir => 1,
dry_run => 0,
+ uninst => 0,
);
$builder->register_paths(%{ $install_dirs_for{site} });
return;

0 comments on commit b276a54

Please sign in to comment.