* Many changes to make ikiwiki very resistant to write failures

[ikiwiki] / pm_filter

#!/usr/bin/perl -i -p

BEGIN {
        $prefix=shift;
        $ver=shift;
        $libdir=shift;
}

if (/INSTALLDIR_AUTOREPLACE/) {
        $_=qq{my \$installdir="$prefix";};
}
elsif (/VERSION_AUTOREPLACE/) {
        $_=qq{our \$version="$ver";};
}
elsif (/^use lib/) {
        if (grep { $_ eq $libdir } @INC) {
                $_="";
        }
        else {
                $_="use lib '$libdir';\n";
        }
}