File Coverage

lib/ExtUtils/MM_Win95.pm
Criterion Covered Total %
statement 9 13 69.2
branch n/a
condition 0 2 0.0
subroutine 3 5 60.0
pod 2 2 100.0
total 14 22 63.6


line stmt bran cond sub pod time code
1             package ExtUtils::MM_Win95;
2              
3 1     1   35646 use strict;
  1         3  
  1         37  
4 1     1   8 use warnings;
  1         4  
  1         105  
5              
6             our $VERSION = '7.66';
7             $VERSION =~ tr/_//d;
8              
9             require ExtUtils::MM_Win32;
10             our @ISA = qw(ExtUtils::MM_Win32);
11              
12 1     1   8 use ExtUtils::MakeMaker::Config;
  1         2  
  1         16  
13              
14              
15             =head1 NAME
16              
17             ExtUtils::MM_Win95 - method to customize MakeMaker for Win9X
18              
19             =head1 SYNOPSIS
20              
21             You should not be using this module directly.
22              
23             =head1 DESCRIPTION
24              
25             This is a subclass of L<ExtUtils::MM_Win32> containing changes necessary
26             to get MakeMaker playing nice with command.com and other Win9Xisms.
27              
28             =head2 Overridden methods
29              
30             Most of these make up for limitations in the Win9x/nmake command shell.
31              
32             =over 4
33              
34              
35             =item max_exec_len
36              
37             Win98 chokes on things like Encode if we set the max length to nmake's max
38             of 2K. So we go for a more conservative value of 1K.
39              
40             =cut
41              
42             sub max_exec_len {
43 0     0 1   my $self = shift;
44              
45 0   0       return $self->{_MAX_EXEC_LEN} ||= 1024;
46             }
47              
48              
49             =item os_flavor
50              
51             Win95 and Win98 and WinME are collectively Win9x and Win32
52              
53             =cut
54              
55             sub os_flavor {
56 0     0 1   my $self = shift;
57 0           return ($self->SUPER::os_flavor, 'Win9x');
58             }
59              
60              
61             =back
62              
63              
64             =head1 AUTHOR
65              
66             Code originally inside MM_Win32. Original author unknown.
67              
68             Currently maintained by Michael G Schwern C<schwern@pobox.com>.
69              
70             Send patches and ideas to C<makemaker@perl.org>.
71              
72             See https://metacpan.org/release/ExtUtils-MakeMaker.
73              
74             =cut
75              
76              
77             1;