[interchange] Remove overcomplicated abort when running on Windows

Jon Jensen interchange-cvs at icdevgroup.org
Thu Nov 2 05:53:50 UTC 2017


commit d65c8c069c2d9260332a483cef326386a6bde5d8
Author: Jon Jensen <jon at endpoint.com>
Date:   Wed Nov 1 18:58:10 2017 -0600

    Remove overcomplicated abort when running on Windows
    
    Strawberry Perl, for example, can use CPAN. Most of Interchange probably
    doesn't work on Windows anymore, but there's no reason to bail on it here.

 dist/src/cpan_local_install |   11 +----------
 1 files changed, 1 insertions(+), 10 deletions(-)
---
diff --git a/dist/src/cpan_local_install b/dist/src/cpan_local_install
index 193b630..9de75d3 100755
--- a/dist/src/cpan_local_install
+++ b/dist/src/cpan_local_install
@@ -11,7 +11,7 @@ require 5.008_005;
 
 use vars qw/$opt_c $opt_d $opt_h $VERSION/;
 
-$VERSION = '2008-11-12';
+$VERSION = '2017-11-01';
 
 my $prog = $0;
 $prog =~ s:.*/::;
@@ -114,15 +114,6 @@ EOF
 	CPAN::get 'Bundle::Interchange';
 }
 
-# See if we have the CPAN module
-eval { 	
-	die "Don't try this at home with Windows.\n" if $^O =~ /win32/i;
-};
-
-if($@) {
-	die "Can't do cpan_local_install: $@\n";
-}
-
 sub my_prompt {
     my($pr) = shift || '? ';
     my($def) = shift;



More information about the interchange-cvs mailing list