build/msys-perl-wrapper@44a2da4a2ab2 (annotated)
build/msys-perl-wrapper
Fri, 16 Jan 2015 04:50:19 +0100
- author
- Michael Schloh von Bennewitz <michael@schloh.com>
- date
- Fri, 16 Jan 2015 04:50:19 +0100
- branch
- TOR_BUG_9701
- changeset 13
- 44a2da4a2ab2
- permissions
- -rw-r--r--
Replace accessor implementation with direct member state manipulation, by
request https://trac.torproject.org/projects/tor/ticket/9701#comment:32
| michael@0 | 1 | #!/bin/sh |
| michael@0 | 2 | # This Source Code Form is subject to the terms of the Mozilla Public |
| michael@0 | 3 | # License, v. 2.0. If a copy of the MPL was not distributed with this |
| michael@0 | 4 | # file, You can obtain one at http://mozilla.org/MPL/2.0/. |
| michael@0 | 5 | |
| michael@0 | 6 | |
| michael@0 | 7 | args="" |
| michael@0 | 8 | |
| michael@0 | 9 | for i in "${@}" |
| michael@0 | 10 | do |
| michael@0 | 11 | case "$i" in |
| michael@0 | 12 | -I?:/*) |
| michael@0 | 13 | i="$(echo "${i}" | sed -e 's|^-I\(.\):/|-I/\1/|')" |
| michael@0 | 14 | ;; |
| michael@0 | 15 | esac |
| michael@0 | 16 | |
| michael@0 | 17 | args="${args} '${i}'" |
| michael@0 | 18 | done |
| michael@0 | 19 | |
| michael@0 | 20 | eval "exec perl $args" |
