build/msys-perl-wrapper
author John Schoenick <john@pointysoftware.net>
Wed, 04 Mar 2015 23:09:00 -0500
changeset 258436 dffb5c867f476431f65783822d0e2b380f58d7e0
parent 98529 f4157e8c410708d76703f19e4dfb61859bfe32d8
permissions -rw-r--r--
Bug 1139560 - Reject non-standard parses of integers in srcset descriptors. r=jst, a=sledru

#!/bin/sh
# This Source Code Form is subject to the terms of the Mozilla Public
# License, v. 2.0. If a copy of the MPL was not distributed with this
# file, You can obtain one at http://mozilla.org/MPL/2.0/.


args=""

for i in "${@}"
do
    case "$i" in
    -I?:/*)
        i="$(echo "${i}" | sed -e 's|^-I\(.\):/|-I/\1/|')"
	;;
    esac

    args="${args} '${i}'"
done

eval "exec perl $args"