git.oblomov.eu Git - ikiwiki/blob - pm_filter

   1 #!/usr/bin/perl -i -p
   2
   3 BEGIN {
   4         $prefix=shift;
   5         $ver=shift;
   6         $libdir=shift;
   7 }
   8
   9 if (/INSTALLDIR_AUTOREPLACE/) {
  10         $_=qq{my \$installdir="$prefix";};
  11 }
  12 elsif (/VERSION_AUTOREPLACE/) {
  13         $_=qq{our \$version="$ver";};
  14 }
  15 elsif (/^use lib/) {
  16         # The idea here is to figure out if the libdir the Makefile.PL
  17         # was configure to use is in perl's normal search path.
  18         # If not, hard code it into ikiwiki.
  19         if ((grep { $_ eq $libdir } @INC) &&
  20             (! exists $ENV{PERL5LIB} || ! length $ENV{PERL5LIB} ||
  21              $ENV{PERL5LIB} ne $libdir)) {
  22                 $_="";
  23         }
  24         else {
  25                 $_="use lib '$libdir';\n";
  26         }
  27 }
  28 elsif ($. == 1 && ($ENV{NOTAINT} || ! exists $ENV{NOTAINT}) && m{^(#!.*perl.*?) -T$}) {
  29         $_=qq{$1\n};
  30 }
  31 elsif (/^\$ENV{PATH}="(.*)";/) {
  32         $_="\$ENV{PATH}=\"$1:$prefix/bin\";\n";
  33 }