Commit | Line | Data |
---|---|---|
f6d6199c | 1 | package ExtUtils::MM_DOS; |
2 | ||
3 | use strict; | |
4 | use vars qw($VERSION @ISA); | |
5 | ||
dedf98bc | 6 | $VERSION = 0.02; |
f6d6199c | 7 | |
daf16542 | 8 | require ExtUtils::MM_Any; |
9 | require ExtUtils::MM_Unix; | |
10 | @ISA = qw( ExtUtils::MM_Any ExtUtils::MM_Unix ); | |
f6d6199c | 11 | |
12 | ||
13 | =head1 NAME | |
14 | ||
daf16542 | 15 | ExtUtils::MM_DOS - DOS specific subclass of ExtUtils::MM_Unix |
f6d6199c | 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 | ||
daf16542 | 24 | This is a subclass of ExtUtils::MM_Unix which contains functionality |
f6d6199c | 25 | for DOS. |
26 | ||
daf16542 | 27 | Unless otherwise stated, it works just like ExtUtils::MM_Unix |
f6d6199c | 28 | |
29 | =head2 Overridden methods | |
30 | ||
31 | =over 4 | |
32 | ||
dedf98bc | 33 | =item os_flavor |
34 | ||
35 | =cut | |
36 | ||
37 | sub os_flavor { | |
38 | return('DOS'); | |
39 | } | |
40 | ||
f6d6199c | 41 | =item B<replace_manpage_separator> |
42 | ||
479d2113 | 43 | Generates Foo__Bar.3 style man page names |
44 | ||
f6d6199c | 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 | ||
daf16542 | 62 | L<ExtUtils::MM_Unix>, L<ExtUtils::MakeMaker> |
f6d6199c | 63 | |
daf16542 | 64 | =cut |
479d2113 | 65 | |
f6d6199c | 66 | 1; |