Diff of /hdf5.pd [83b272] .. [65f11e]  Maximize  Restore

  Switch to side-by-side view

--- a/hdf5.pd
+++ b/hdf5.pd
@@ -682,17 +682,17 @@
 	
 		$attrIndexElement = $attrIndex->{$group};
 		
-		if( grep(defined($_), @attrValues = @$attrIndexElement{@attrs})
-			 == @attrs){ # All Attrs exist
-			# Use multi-dimensional array emulation for the hash
-			#  key here because it should be quicker.
-			if( defined( $groupIndexElement->{$key = join($;,@attrValues)}) ) { # if already defined, add to the list
-				push @{$groupIndexElement->{$key}}, $group;
-			}
-			else{  # not already defined create new element
-				$groupIndexElement->{$key} = [ $group ];
-			}	
+		@attrValues = map defined($_) ? $_ : '',   @$attrIndexElement{@attrs}; # Groups with undefined attr will get a blank string for the value
+		
+
+		# Use multi-dimensional array emulation for the hash
+		#  key here because it should be quicker.
+		if( defined( $groupIndexElement->{$key = join($;,@attrValues)}) ) { # if already defined, add to the list
+			push @{$groupIndexElement->{$key}}, $group;
 		}
+		else{  # not already defined create new element
+			$groupIndexElement->{$key} = [ $group ];
+		}	
 	}
 	
 	# initialize group index if it doesn't exist.

Get latest updates about Open Source Projects, Conferences and News.

Sign up for the SourceForge newsletter:





No, thanks