Commit | Line | Data |
---|---|---|
920dae64 AT |
1 | package ExtUtils::MM_DOS; |
2 | ||
3 | use strict; | |
4 | use vars qw($VERSION @ISA); | |
5 | ||
6 | $VERSION = 0.02; | |
7 | ||
8 | require ExtUtils::MM_Any; | |
9 | require ExtUtils::MM_Unix; | |
10 | @ISA = qw( ExtUtils::MM_Any ExtUtils::MM_Unix ); | |
11 | ||
12 | ||
13 | =head1 NAME | |
14 | ||
15 | ExtUtils::MM_DOS - DOS specific subclass of ExtUtils::MM_Unix | |
16 | ||
17 | =head1 SYNOPSIS | |
18 | ||
19 | Don't use this module directly. | |
20 | Use ExtUtils::MM and let it choose. | |
21 | ||
22 | =head1 DESCRIPTION | |
23 | ||
24 | This is a subclass of ExtUtils::MM_Unix which contains functionality | |
25 | for DOS. | |
26 | ||
27 | Unless otherwise stated, it works just like ExtUtils::MM_Unix | |
28 | ||
29 | =head2 Overridden methods | |
30 | ||
31 | =over 4 | |
32 | ||
33 | =item os_flavor | |
34 | ||
35 | =cut | |
36 | ||
37 | sub os_flavor { | |
38 | return('DOS'); | |
39 | } | |
40 | ||
41 | =item B<replace_manpage_separator> | |
42 | ||
43 | Generates Foo__Bar.3 style man page names | |
44 | ||
45 | =cut | |
46 | ||
47 | sub replace_manpage_separator { | |
48 | my($self, $man) = @_; | |
49 | ||
50 | $man =~ s,/+,__,g; | |
51 | return $man; | |
52 | } | |
53 | ||
54 | =back | |
55 | ||
56 | =head1 AUTHOR | |
57 | ||
58 | Michael G Schwern <schwern@pobox.com> with code from ExtUtils::MM_Unix | |
59 | ||
60 | =head1 SEE ALSO | |
61 | ||
62 | L<ExtUtils::MM_Unix>, L<ExtUtils::MakeMaker> | |
63 | ||
64 | =cut | |
65 | ||
66 | 1; |