sub initialize {
my $self = shift;
my $config = Fink::Config->new_with_path('/sw/etc/fink.conf');
my ($basepath);$self->SUPER::initialize();
$self->{basepath} = $basepath = $config->param("Basepath");
unless ($basepath) {
die "Basepath not set in config file!\n";
}
}This obviously isn't something I'd commit, but $self->{config} can't be set unless it knows where basepath is so it can find the conf file.
so with out config_file basepath can't get set and without basepath config_file can't get set, so one needs to be hardcoded.
As a side note, does Michael test his changes before he commits them? I have never seen fink cvs break as much as it has in the last two weeks in the 3-4 years I've been working on/with fink.
Nothing against he;s changes directly, his perl is awesome, but committing broken changes isn't good.
-TS
smime.p7s
Description: S/MIME cryptographic signature
PGP.sig
Description: This is a digitally signed message part
