Files
MINGW-packages/mingw-w64-perl/perlprofile.in
Niklas Holm 6d55c8eb80 Update perl to v5.28.0 (#4044)
* mingw-w64-perl: update to v5.28.0

* mingw-w64-perl: Add build options

- USE_64_BIT_INT: 64-bit integers in 32-bit build
- USE_MINGW_ANSI_STDIO: Enable MINGW's ANSI stdio extensions

Inspired by Strawberry Perl's build.

* mingw-w64-perl: Packaging improvements

- New script to update provides array (updpkgprovs)
  * updpkgprovs takes information from corelist
  * patchprov produced lowercase package names witch doesn't match the
    module naming convention
  * patchprov missed a lot of packages which modules declares dependency
    on
- Move pods to doc package (pods are documentation read by perldoc)
- Keep relocation list in install script instead of seperate file
- Make minor improvements to profile script (fewer subshells => faster)
- Various minor improvements
2018-07-05 13:32:26 +03:00

35 lines
993 B
Plaintext

# This script is meant to be installed in /etc/profile.d and sourced
# *after* any PATH modifications done by MSYS Perl.
# Lines marked @REM@ are removed when generating the actual profile script
[ "${MSYSTEM_PREFIX}" != "@PREFIX@" ] && return 0
if [ "$(echo -n "$PATH" | wc -l)" -gt 0 ]; then
echo "@FILENAME@: ERROR: PATH contains line break, skipping PATH setup" >&2
return 1
fi
modify_path() {
# @REM@ mypath is determined in package() based on the built configuration
local mypath=""
# Remove MSYS perl modules from PATH to avoid conflicts
local newpath="$(echo -n "${PATH}" \
| gawk -v mypath="${mypath}" '
BEGIN { RS = ":" }
/^\/usr\/bin\/.*_perl$/ { next }
{ printf "%s", (++i > 1 ? ":" : "") $0 }
mypath && /^\@PREFIX@\/bin$/ { printf "%s", ":" mypath }
'
)"
[ -z "${newpath}" ] && return 1
PATH="${newpath}"
}
modify_path
unset modify_path
# vim: set ts=4 sw=4 et ai syn=sh: