split_list1 removes () -- take 2

This commit is contained in:
Tom Eastep 2010-08-28 13:40:44 -07:00
parent 2a54e8cd24
commit f45879c4f4

View File

@ -433,8 +433,6 @@ sub calculate_quantum( $$ ) {
sub process_flow($) {
my $flow = shift;
$flow =~ s/^\(// if $flow =~ s/\)$//;
my @flow = split /,/, $flow;
for ( @flow ) {