[Bps-public-commit] r11377 - SVN-PropDB/bin

[clkao at bestpractical.com]

Author: clkao
Date: Tue Apr  1 23:45:12 2008
New Revision: 11377

Modified:
   SVN-PropDB/bin/taste_recipe

Log:
typo

Modified: SVN-PropDB/bin/taste_recipe
==============================================================================
--- SVN-PropDB/bin/taste_recipe	(original)
+++ SVN-PropDB/bin/taste_recipe	Tue Apr  1 23:45:12 2008
@@ -13,7 +13,7 @@
 
 for (reverse 0..$#{ $d->{recipe}} ) {
     warn "==> removing $_ ".Dumper($d->{recipe}->[$_]);
-    next if $d->[1] eq 'create_record';
+    next if $d->{recipe}->[$_][1] eq 'create_record';
     
     my $foo = dclone $d;