Skip to content
This repository

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
Browse code

Checking in changes prior to tagging of version 0.01. Changelog diff is:

  • Loading branch information...
commit 1465e542031c6c2b9f84e40a162e999a16cb8827 1 parent 19d8d99
Tokuhiro Matsuno authored
1  .gitignore
@@ -27,3 +27,4 @@ inc/Module/Install/Win32.pm
27 27 inc/Module/Install/WriteAll.pm
28 28 inc/Test/More.pm
29 29 t/090_dist/test-0.01.tar.gz
  30 +*/*/MANIFEST.bak
3  README
@@ -33,6 +33,9 @@ DESCRIPTION
33 33 M::I power for C/C++ programs!You can use this module as replacement of
34 34 autoconf/automake for easy case.
35 35
  36 +NOTE
  37 + This is a early bate release! API will change later.
  38 +
36 39 FUNCTIONS
37 40 is_linux()
38 41 is_mac()
59 inc/Module/Install/AuthorTests.pm
... ... @@ -1,59 +0,0 @@
1   -#line 1
2   -package Module::Install::AuthorTests;
3   -
4   -use 5.005;
5   -use strict;
6   -use Module::Install::Base;
7   -use Carp ();
8   -
9   -#line 16
10   -
11   -use vars qw{$VERSION $ISCORE @ISA};
12   -BEGIN {
13   - $VERSION = '0.002';
14   - $ISCORE = 1;
15   - @ISA = qw{Module::Install::Base};
16   -}
17   -
18   -#line 42
19   -
20   -sub author_tests {
21   - my ($self, @dirs) = @_;
22   - _add_author_tests($self, \@dirs, 0);
23   -}
24   -
25   -#line 56
26   -
27   -sub recursive_author_tests {
28   - my ($self, @dirs) = @_;
29   - _add_author_tests($self, \@dirs, 1);
30   -}
31   -
32   -sub _wanted {
33   - my $href = shift;
34   - sub { /\.t$/ and -f $_ and $href->{$File::Find::dir} = 1 }
35   -}
36   -
37   -sub _add_author_tests {
38   - my ($self, $dirs, $recurse) = @_;
39   - return unless $Module::Install::AUTHOR;
40   -
41   - my @tests = $self->tests ? (split / /, $self->tests) : 't/*.t';
42   -
43   - # XXX: pick a default, later -- rjbs, 2008-02-24
44   - my @dirs = @$dirs ? @$dirs : Carp::confess "no dirs given to author_tests";
45   - @dirs = grep { -d } @dirs;
46   -
47   - if ($recurse) {
48   - require File::Find;
49   - my %test_dir;
50   - File::Find::find(_wanted(\%test_dir), @dirs);
51   - $self->tests( join ' ', @tests, map { "$_/*.t" } sort keys %test_dir );
52   - } else {
53   - $self->tests( join ' ', @tests, map { "$_/*.t" } sort @dirs );
54   - }
55   -}
56   -
57   -#line 107
58   -
59   -1;
36 inc/Module/Install/ReadmeFromPod.pm
... ... @@ -1,36 +0,0 @@
1   -#line 1
2   -package Module::Install::ReadmeFromPod;
3   -
4   -use strict;
5   -use warnings;
6   -use base qw(Module::Install::Base);
7   -use vars qw($VERSION);
8   -
9   -$VERSION = '0.06';
10   -
11   -sub readme_from {
12   - my $self = shift;
13   - return unless $Module::Install::AUTHOR;
14   - my $file = shift || return;
15   - my $clean = shift;
16   - require Pod::Text;
17   - my $parser = Pod::Text->new();
18   - open README, '> README' or die "$!\n";
19   - $parser->output_fh( *README );
20   - $parser->parse_file( $file );
21   - return 1 unless $clean;
22   - $self->postamble(<<"END");
23   -distclean :: license_clean
24   -
25   -license_clean:
26   -\t\$(RM_F) README
27   -END
28   - return 1;
29   -}
30   -
31   -'Readme!';
32   -
33   -__END__
34   -
35   -#line 89
36   -
4 lib/Module/Install/ForC.pm
@@ -134,6 +134,10 @@ This module provides some useful functions for writing C/C++ programs/libraries,
134 134
135 135 M::Install is useful for Perl/XS programming, but this module provides M::I power for C/C++ programs!You can use this module as replacement of autoconf/automake for easy case.
136 136
  137 +=head1 NOTE
  138 +
  139 +This is a early bate release! API will change later.
  140 +
137 141 =head1 FUNCTIONS
138 142
139 143 =over 4

0 comments on commit 1465e54

Please sign in to comment.
Something went wrong with that request. Please try again.