[svn:parrot] r35998 - trunk/config/auto

[email protected] Sun, 25 Jan 2009 09:13:09 -0800 (PST)
Newsgroups perl.cvs.parrot
Message-ID <[email protected]>
Author: jkeenan
Date: Sun Jan 25 09:13:09 2009
New Revision: 35998

Modified:
   trunk/config/auto/pmc.pm

Log:
Population of $pmc_list is better handled as a branch (using ternary op) rather than as a condition (using || op).

Modified: trunk/config/auto/pmc.pm
==============================================================================
--- trunk/config/auto/pmc.pm	(original)
+++ trunk/config/auto/pmc.pm	Sun Jan 25 09:13:09 2009
@@ -141,7 +141,8 @@
     my @pmc = sort_pmcs( @{ $self->{srcpmc} } );
 
     my $pmc_list = $conf->options->get('pmc')
-        || join( ' ', grep { defined $_ } @pmc );
+        ? $conf->options->get('pmc')
+        : join( ' ', grep { defined $_ } @pmc );
 
     # names of class files for src/pmc/Makefile
     ( my $TEMP_pmc_o   = $pmc_list ) =~ s/\.pmc/\$(O)/g;