Commit | Line | Data |
---|---|---|
959f3c4c JH |
1 | ?RCS: $Id$ |
2 | ?RCS: | |
3 | ?RCS: Copyright (c) 1999 Jarkko Hietaniemi | |
4 | ?RCS: | |
5 | ?RCS: You may distribute under the terms of either the GNU General Public | |
6 | ?RCS: License or the Artistic License, as specified in the README file. | |
7 | ?RCS: | |
8 | ?MAKE:usesocks: Myread Oldconfig Setvar | |
9 | ?MAKE: -pick add $@ %< | |
10 | ?Y:TOP | |
11 | ?S:usesocks: | |
12 | ?S: This variable conditionally defines the USE_SOCKS symbol, | |
13 | ?S: and indicates that Perl should be built to use SOCKS. | |
14 | ?S:. | |
15 | ?C:USE_SOCKS: | |
16 | ?C: This symbol, if defined, indicates that Perl should | |
17 | ?C: be built to use socks. | |
18 | ?C:. | |
a38738d1 JH |
19 | ?H:?%<:#ifndef USE_SOCKS |
20 | ?H:?%<:#$usesocks USE_SOCKS /**/ | |
21 | ?H:?%<:#endif | |
959f3c4c JH |
22 | ?H:. |
23 | ?LINT:set usesocks | |
24 | ?INIT:: set usesocks on the Configure command line to enable socks. | |
2f125bce | 25 | : Check is we will use socks |
959f3c4c JH |
26 | ?X: We should really have some explanatory text here, and some |
27 | ?X: automatic setting of sensible defaults. | |
635fdf3e JH |
28 | case "$usesocks" in |
29 | $define|true|[yY]*) dflt='y';; | |
30 | *) dflt='n';; | |
31 | esac | |
959f3c4c JH |
32 | cat <<EOM |
33 | ||
34 | Perl can be built to use the SOCKS proxy protocol library. To do so, | |
11c1f30a JH |
35 | Configure must be run with -Dusesocks. If you use SOCKS you also need |
36 | to use the PerlIO abstraction layer, this will be implicitly selected. | |
959f3c4c | 37 | |
635fdf3e | 38 | If this doesn't make any sense to you, just accept the default '$dflt'. |
959f3c4c | 39 | EOM |
959f3c4c JH |
40 | rp='Build Perl for SOCKS?' |
41 | . ./myread | |
42 | case "$ans" in | |
4c42341b | 43 | y|Y) val="$define" ;; |
959f3c4c JH |
44 | *) val="$undef" ;; |
45 | esac | |
46 | set usesocks | |
47 | eval $setvar | |
48 |