← Back to branch summary

~ubuntu-branches/ubuntu/trusty/libpoe-component-server-simplehttp-perl/trusty-proposed

« back to all changes in this revision

Viewing changes to inc/Module/Install/WriteAll.pm

  • Committer: Bazaar Package Importer
  • Author(s): gregor herrmann, Jonathan Yu, Ryan Niebur, gregor herrmann
  • Date: 2010-11-20 20:50:41 UTC
  • mfrom: (1.1.6 upstream)
  • Revision ID: james.westby@ubuntu.com-20101120205041-s30ijm85d1c85f51
Tags: 2.04-1
[ Jonathan Yu ]
* New upstream release
* Update to new short debhelper rules format
* Standards-Version 3.8.3 (drop perl version dependency)
* Add myself to Uploaders and Copyright
* Remove Module::Install from B-D-I; it shouldn't be needed

[ Ryan Niebur ]
* Update ryan52's email address

[ gregor herrmann ]
* Switch to source format 3.0 (quilt).
* Set Standards-Version to 3.9.1 (no changes).
* debian/copyright: update formatting and upstream copyright info.
* debian/control: update dependencies.
* debian/control: debhelper 7.2.13 (Module::Install).
* Re-enable tests, CPAN#35993 is fixed.
* Add a patch to fix a small spelling mistake in the documentation.

Show diffs side-by-side

added added

removed removed

Lines of Context:
inc/Module/Install/WriteAll.pm
2
2
package Module::Install::WriteAll;
3
3
 
4
4
use strict;
5
 
use Module::Install::Base;
 
5
use Module::Install::Base ();
6
6
 
7
7
use vars qw{$VERSION @ISA $ISCORE};
8
8
BEGIN {
9
 
        $VERSION = '0.79';
 
9
        $VERSION = '0.97';;
10
10
        @ISA     = qw{Module::Install::Base};
11
11
        $ISCORE  = 1;
12
12
}
22
22
        );
23
23
 
24
24
        $self->sign(1)                if $args{sign};
25
 
        $self->Meta->write            if $args{meta};
26
25
        $self->admin->WriteAll(%args) if $self->is_admin;
27
26
 
28
27
        $self->check_nmake if $args{check_nmake};
29
28
        unless ( $self->makemaker_args->{PL_FILES} ) {
30
 
                $self->makemaker_args( PL_FILES => {} );
 
29
                # XXX: This still may be a bit over-defensive...
 
30
                unless ($self->makemaker(6.25)) {
 
31
                        $self->makemaker_args( PL_FILES => {} ) if -f 'Build.PL';
 
32
                }
31
33
        }
32
34
 
 
35
        # Until ExtUtils::MakeMaker support MYMETA.yml, make sure
 
36
        # we clean it up properly ourself.
 
37
        $self->realclean_files('MYMETA.yml');
 
38
 
33
39
        if ( $args{inline} ) {
34
40
                $self->Inline->write;
35
41
        } else {
36
42
                $self->Makefile->write;
37
43
        }
 
44
 
 
45
        # The Makefile write process adds a couple of dependencies,
 
46
        # so write the META.yml files after the Makefile.
 
47
        if ( $args{meta} ) {
 
48
                $self->Meta->write;
 
49
        }
 
50
 
 
51
        # Experimental support for MYMETA
 
52
        if ( $ENV{X_MYMETA} ) {
 
53
                if ( $ENV{X_MYMETA} eq 'JSON' ) {
 
54
                        $self->Meta->write_mymeta_json;
 
55
                } else {
 
56
                        $self->Meta->write_mymeta_yaml;
 
57
                }
 
58
        }
 
59
 
 
60
        return 1;
38
61
}
39
62
 
40
63
1;