[Bioperl-guts-l] [16689] bioperl-run/trunk/lib/Bio/Tools/Run/Bowtie.pm: Bug fix

[Dan Kortschak]

Revision: 16689
Author:   kortsch
Date:     2010-01-14 00:03:23 -0500 (Thu, 14 Jan 2010)
Log Message:
-----------
Bug fix

Modified Paths:
--------------
    bioperl-run/trunk/lib/Bio/Tools/Run/Bowtie.pm

Modified: bioperl-run/trunk/lib/Bio/Tools/Run/Bowtie.pm
===================================================================
--- bioperl-run/trunk/lib/Bio/Tools/Run/Bowtie.pm	2010-01-14 04:20:28 UTC (rev 16688)
+++ bioperl-run/trunk/lib/Bio/Tools/Run/Bowtie.pm	2010-01-14 05:03:23 UTC (rev 16689)
@@ -558,7 +558,7 @@
 		s/^-//;
 		foreach my $conflict (@{$incompat_params{$_}}) {
 			return if grep /$conflict/, @added;
-			$args{'-'.$conflict}=0;
+			delete $args{'-'.$conflict};
 			push @removed, $conflict;
 		}
 		foreach my $requirement (@{$corequisite_switches{$_}}) {
@@ -597,7 +597,7 @@
 	foreach (keys %args) {
 		s/^-//;
 		foreach my $requirement (@{$corequisite_switches{$_}}) {
-			$args{'-'.$requirement}=0;
+			delete $args{'-'.$requirement};
 		}
 	}