Permalink
Browse files

[config] Make internal variable's name more self-documenting.

  • Loading branch information...
1 parent 019dac0 commit b4a039576053c7bf07e74e7531e6fc0890e36ad5 @jkeenan jkeenan committed Jan 3, 2011
Showing with 4 additions and 4 deletions.
  1. +4 −4 config/init/optimize.pm
View
@@ -35,9 +35,9 @@ sub runstep {
# A plain --optimize means use perl5's $Config{optimize}. If an argument
# is given, however, use that instead.
- my $optimize = $conf->options->get('optimize');
+ my $request_optimize = $conf->options->get('optimize');
- if (! defined $optimize) {
+ if (! defined $request_optimize) {
$self->set_result('no');
$conf->debug("(none requested) ");
return 1;
@@ -47,7 +47,7 @@ sub runstep {
my $gccversion = $conf->data->get( 'gccversion' );
my $options;
- if ( $optimize eq "1" ) {
+ if ( $request_optimize ) {
# start with perl5's flags ...
$options = $conf->data->get('optimize_provisional');
@@ -58,7 +58,7 @@ sub runstep {
}
else {
# use the command line verbatim
- $options = $optimize;
+ $options = $request_optimize;
}
# save the options, however we got them.

0 comments on commit b4a0395

Please sign in to comment.