| … | |
… | |
| 6 | *** |
6 | *** |
| 7 | *** WARNING: This module is quite low-level and uses undocumented perl |
7 | *** WARNING: This module is quite low-level and uses undocumented perl |
| 8 | *** internals to do it's job. While it seems to work fine with perl-5.8, |
8 | *** internals to do it's job. While it seems to work fine with perl-5.8, |
| 9 | *** 5.7 and 5.6, it has not been tested with older versions. If it |
9 | *** 5.7 and 5.6, it has not been tested with older versions. If it |
| 10 | *** compiles and passes the testsuite, it should work. Otherwise you |
10 | *** compiles and passes the testsuite, it should work. Otherwise you |
| 11 | *** should either upgrade or contact the author, maybe it can be made to |
11 | *** should either upgrade or fix it ;) |
| 12 | *** work... |
|
|
| 13 | *** |
12 | *** |
| 14 | *** Marc Lehmann <pcg\@goof.com> |
13 | *** Marc Lehmann <pcg\@goof.com> |
| 15 | *** |
14 | *** |
| 16 | |
15 | |
| 17 | EOF |
16 | EOF |
| 18 | } |
17 | } |
|
|
18 | |
|
|
19 | $EVENT = eval { require Event }; |
| 19 | |
20 | |
| 20 | WriteMakefile( |
21 | WriteMakefile( |
| 21 | dist => { |
22 | dist => { |
| 22 | PREOP => 'pod2text Coro.pm | tee README >$(DISTVNAME)/README; chmod -R u=rwX,go=rX . ;', |
23 | PREOP => 'pod2text Coro.pm | tee README >$(DISTVNAME)/README; chmod -R u=rwX,go=rX . ;', |
| 23 | COMPRESS => 'gzip -9v', |
24 | COMPRESS => 'gzip -9v', |
| 24 | SUFFIX => '.gz', |
25 | SUFFIX => '.gz', |
| 25 | }, |
26 | }, |
| 26 | NAME => "Coro", |
27 | NAME => "Coro", |
| 27 | VERSION_FROM => "Coro.pm", |
28 | VERSION_FROM => "Coro.pm", |
| 28 | DIR => ['Coro'], |
29 | DIR => ['Coro', ($EVENT ? 'Event' : ())], |
| 29 | PREREQ_PM => { |
30 | PREREQ_PM => { |
| 30 | Event => 0.84, # yes, 0.83 and below have serious bugs |
31 | Event => 0.83, # still, 0.83 and below have serious bugs(!) |
|
|
32 | Scalar::Util => 0.00, |
| 31 | }, |
33 | }, |
|
|
34 | PM => { |
|
|
35 | 'Coro.pm' => '$(INST_LIBDIR)/Coro.pm', |
|
|
36 | }, |
| 32 | ); |
37 | ); |
| 33 | |
38 | |
| 34 | sub MY::postamble { |
39 | sub MY::postamble { |
| 35 | <<EOF; |
40 | <<EOF; |
| 36 | |
41 | |
