[carton] 50/472: undo check command

Lucas Kanashiro kanashiro-guest at moszumanska.debian.org
Fri Jul 24 00:38:31 UTC 2015


This is an automated email from the git hooks/post-receive script.

kanashiro-guest pushed a commit to branch master
in repository carton.

commit 61ef7fa9b48902ff263b63f0bb042cf1228b047d
Author: Tatsuhiko Miyagawa <miyagawa at bulknews.net>
Date:   Sun Jun 26 14:36:27 2011 -0700

    undo check command
---
 lib/Carton/CLI.pm | 20 +-------------------
 1 file changed, 1 insertion(+), 19 deletions(-)

diff --git a/lib/Carton/CLI.pm b/lib/Carton/CLI.pm
index 8dda2ef..70945e4 100644
--- a/lib/Carton/CLI.pm
+++ b/lib/Carton/CLI.pm
@@ -97,12 +97,6 @@ sub print {
     print $msg;
 }
 
-sub check {
-    my($self, $msg) = @_;
-    $self->print("✓ ", "SUCCESS");
-    $self->print($msg . "\n");
-}
-
 sub error {
     my($self, $msg) = @_;
     $self->print($msg, "ERROR");
@@ -192,19 +186,7 @@ sub cmd_show {
 
 sub cmd_check {
     my $self = shift;
-
-    $self->check_cpanm_version;
-    # check carton.lock and extlib?
-}
-
-sub check_cpanm_version {
-    my $self = shift;
-
-    my $version = (`$self->{cpanm} --version` =~ /version (\S+)/)[0];
-    unless ($version && $version >= 1.5) {
-        $self->error("carton needs cpanm version >= 1.5. You have " . ($version || "(not installed)") . "\n");
-    }
-    $self->check("You have cpanm $version");
+    # check if local directory has all the carton rquirements
 }
 
 sub cmd_update {

-- 
Alioth's /usr/local/bin/git-commit-notice on /srv/git.debian.org/git/pkg-perl/packages/carton.git



More information about the Pkg-perl-cvs-commits mailing list