The dist_dir method in Module::Build::Base reads from the properties
directly rather than using the accessors for the values. I want to
override dist_version without having to override dist_dir too.
Index: Base.pm
===================================================================
--- Base.pm (revision 12698)
+++ Base.pm (working copy)
@@ -3425,7 +3425,7 @@
sub dist_dir {
my ($self) = @_;
- return
"$self->{properties}{dist_name}-$self->{properties}{dist_version}";
+ return join "-", map { $self->$_ } qw( dist_name dist_version );
}
sub ppm_name {
RT for rt.cpan.org