"Fossies" - the Fresh Open Source Software Archive  

Source code changes of the file "inc/Module/Install/Bugtracker.pm" between
Mail-Mbox-MessageParser-1.5110.tar.gz and Mail-Mbox-MessageParser-1.5111.tar.gz

About: Mail-Mbox-MessageParser is a feature-poor but very fast mbox parser (Perl module).

Bugtracker.pm  (Mail-Mbox-MessageParser-1.5110)	:	Bugtracker.pm  (Mail-Mbox-MessageParser-1.5111)
#line 1		#line 1
package Module::Install::Bugtracker;		package Module::Install::Bugtracker;
use 5.006;		use 5.006;
use strict;		use strict;
use warnings;		use warnings;
use URI::Escape;
use base qw(Module::Install::Base);		use base qw(Module::Install::Base);
our $VERSION = sprintf "%d.%02d%02d", q/0.3.3/ =~ /(\d+)/g;		our $VERSION = sprintf "%d.%02d%02d", q/0.3.6/ =~ /(\d+)/g;
sub auto_set_bugtracker {		sub auto_set_bugtracker {
my $self = shift;		my $self = shift;
if ($self->name) {		if ($self->name) {
$self->configure_requires('URI::Escape', 0);		$self->include_deps('URI::Escape');
		require URI::Escape;
$self->bugtracker(		$self->bugtracker(
sprintf 'http://rt.cpan.org/Public/Dist/Display.html?Name=%s',		sprintf 'http://rt.cpan.org/Public/Dist/Display.html?Name=%s',
uri_escape($self->name),		URI::Escape::uri_escape($self->name),
);		);
} else {		} else {
warn "can't set bugtracker if 'name' is not set\n";		warn "can't set bugtracker if 'name' is not set\n";
}		}
}		}
1;		1;
__END__		__END__
#line 100		#line 101
End of changes. 5 change blocks.
4 lines changed or deleted		5 lines changed or added

---