Mercurial > hg > mhoward > dotfiles / changeset

• changeset
• raw
• gz

changeset

Try 'cpm' before 'cpanm'

Thu, 12 Mar 2020 11:05:42 -0500

author

Meredith Howard <mhoward@roomag.org>

date

Thu, 12 Mar 2020 11:05:42 -0500

changeset 852

cf73e0ff4258

parent 851

b8501cb649b6

child 853

434cf44c295a

Try 'cpm' before 'cpanm'

--- a/.lib/perl5/Autofetch.pm
+++ b/.lib/perl5/Autofetch.pm
@@ -6,6 +6,8 @@ use File::Spec::Functions qw(catfile rel
 
 sub fetch {
   my ($path, $module) = @_;
+  return if
+    system('cpm', 'install', -L => $path, $module) == 0;
   system 'cpanm', -nq, -l => $path, $module;
 }