Minor bug fix in evaluate.m

== appeared as =

Author: phil-ramsden

evaluate.m

@@ -282,11 +282,11 @@
 	equalQStructure[answer,response,params],
 	type == "semantic",
 	equalQSemantic[answer,response,params],
-	type = "semantic_and_structure",	
+	type == "semantic_and_structure",	
 	equalQSemanticAndStructure[answer,response,params],
-	type = "strict_structure",	
+	type == "strict_structure",	
 	equalQStrictStructure[answer,response,params],
-	type = "semantic_and_strict_structure",	
+	type == "semantic_and_strict_structure",	
 	equalQSemanticAndStrictStructure[answer,response,params],
 	NumericQ[answer],
     equalQNumeric[answer, response, params],