Rev | Line | |
---|
[14489] | 1 | package ExtUtils::MM_UWIN;
|
---|
| 2 |
|
---|
| 3 | use strict;
|
---|
| 4 | use vars qw($VERSION @ISA);
|
---|
| 5 | $VERSION = 0.02;
|
---|
| 6 |
|
---|
| 7 | require ExtUtils::MM_Unix;
|
---|
| 8 | @ISA = qw(ExtUtils::MM_Unix);
|
---|
| 9 |
|
---|
| 10 |
|
---|
| 11 | =head1 NAME
|
---|
| 12 |
|
---|
| 13 | ExtUtils::MM_UWIN - U/WIN specific subclass of ExtUtils::MM_Unix
|
---|
| 14 |
|
---|
| 15 | =head1 SYNOPSIS
|
---|
| 16 |
|
---|
| 17 | Don't use this module directly.
|
---|
| 18 | Use ExtUtils::MM and let it choose.
|
---|
| 19 |
|
---|
| 20 | =head1 DESCRIPTION
|
---|
| 21 |
|
---|
| 22 | This is a subclass of ExtUtils::MM_Unix which contains functionality for
|
---|
| 23 | the AT&T U/WIN UNIX on Windows environment.
|
---|
| 24 |
|
---|
| 25 | Unless otherwise stated it works just like ExtUtils::MM_Unix
|
---|
| 26 |
|
---|
| 27 | =head2 Overridden methods
|
---|
| 28 |
|
---|
| 29 | =over 4
|
---|
| 30 |
|
---|
| 31 | =item os_flavor
|
---|
| 32 |
|
---|
| 33 | In addition to being Unix, we're U/WIN.
|
---|
| 34 |
|
---|
| 35 | =cut
|
---|
| 36 |
|
---|
| 37 | sub os_flavor {
|
---|
| 38 | return('Unix', 'U/WIN');
|
---|
| 39 | }
|
---|
| 40 |
|
---|
| 41 |
|
---|
| 42 | =item B<replace_manpage_separator>
|
---|
| 43 |
|
---|
| 44 | =cut
|
---|
| 45 |
|
---|
| 46 | sub replace_manpage_separator {
|
---|
| 47 | my($self, $man) = @_;
|
---|
| 48 |
|
---|
| 49 | $man =~ s,/+,.,g;
|
---|
| 50 | return $man;
|
---|
| 51 | }
|
---|
| 52 |
|
---|
| 53 | =back
|
---|
| 54 |
|
---|
| 55 | =head1 AUTHOR
|
---|
| 56 |
|
---|
| 57 | Michael G Schwern <[email protected]> with code from ExtUtils::MM_Unix
|
---|
| 58 |
|
---|
| 59 | =head1 SEE ALSO
|
---|
| 60 |
|
---|
| 61 | L<ExtUtils::MM_Win32>, L<ExtUtils::MakeMaker>
|
---|
| 62 |
|
---|
| 63 | =cut
|
---|
| 64 |
|
---|
| 65 | 1;
|
---|
Note:
See
TracBrowser
for help on using the repository browser.