On Feb 14, 2006, at 3:18 PM, John Peacock wrote:
Tyler MacDonald wrote:
Seriously though, it sounds like having at least a loud warning "I
did not write this Makefile.PL, move it out of the way first" is
worthwhile.
Pseudocode:
if ($mb->overwrite_makefile() && -f $Makefile ) {
my $answer = $mb->y_n("Found an existing Makefile.PL;
overwrite?");
if ($answer =~/y/i) {
write_makefile;
}
}
where overwrite_makefile is a package option passed to M::B::new
(). I did it this way so that
a) the developer has to affirmatively choose that option;
b) the developer has to _always_ hit 'Y' when running './Build
distdir', just in case he/she did something manually and forgot to
turn off the option.
Ugh, I have to hit "Y" every time??? If you add the following to the
conditional, I'd be happy:
&& slurp($Makefile) !~ /auto.generated/is
Chris
--
Chris Dolan, Software Developer, Clotho Advanced Media Inc.
608-294-7900, fax 294-7025, 1435 E Main St, Madison WI 53703
vCard: http://www.chrisdolan.net/ChrisDolan.vcf
Clotho Advanced Media, Inc. - Creators of MediaLandscape Software
(http://www.media-landscape.com/) and partners in the revolutionary
Croquet project (http://www.opencroquet.org/)