← Back to branch summary

~ubuntu-branches/ubuntu/oneiric/libcpandb-perl/oneiric

« back to all changes in this revision

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

  • Committer: Bazaar Package Importer
  • Author(s): Ansgar Burchardt
  • Date: 2010-05-11 21:15:52 UTC
  • mfrom: (1.1.2 upstream)
  • Revision ID: james.westby@ubuntu.com-20100511211552-5ejwob14u8ccv1jm
Tags: 0.14-1
* New upstream release.
* Bump (build-)dep on liborlite-mirror-perl to >= 1.20.

Show diffs side-by-side

added added

removed removed

Lines of Context:
inc/Module/Install/Base.pm
4
4
use strict 'vars';
5
5
use vars qw{$VERSION};
6
6
BEGIN {
7
 
        $VERSION = '0.95';
 
7
        $VERSION = '0.97';
8
8
}
9
9
 
10
10
# Suspend handler for "redefined" warnings
51
51
#line 106
52
52
 
53
53
sub is_admin {
54
 
        $_[0]->admin->VERSION;
 
54
        ! $_[0]->admin->isa('Module::Install::Base::FakeAdmin');
55
55
}
56
56
 
57
57
sub DESTROY {}
58
58
 
59
59
package Module::Install::Base::FakeAdmin;
60
60
 
 
61
use vars qw{$VERSION};
 
62
BEGIN {
 
63
        $VERSION = $Module::Install::Base::VERSION;
 
64
}
 
65
 
61
66
my $fake;
62
67
 
63
68
sub new {
75
80
 
76
81
1;
77
82
 
78
 
#line 154
 
83
#line 159