Corrected camel case handling, removed mutant option not supported in the version used.

Author: dysk

ecommerce/pricing/Makefile

@@ -29,7 +29,7 @@ ifeq ($(origin MUTANT_NODE_INDEX), environment)
 	 head -n 5 .node_files.tmp || echo "File .node_files.tmp is empty."; \
 	 echo "--- END DEBUG (awk) ---"; \
 	 echo "--- DEBUG: Attempting to derive subject names for this node... ---"; \
-	 DERIVED_NAMES=$$(cat .node_files.tmp | perl -pe 's#^lib/##; s#\.rb$$##; s#/(.)#"::" . ucfirst($$1)#eg; s#_([a-z])#uc($$1)#eg; s/(?:^|::)(.)/\u$$1/g'); \
+	 DERIVED_NAMES=$$(cat .node_files.tmp | perl -ne 'chomp; s#^lib/##; s#\.rb$$##; my @parts = split /\//; my $result = ""; foreach my $$part (@parts) { $$part =~ s#_([a-z])#uc($$1)#eg; $result .= "::" . ucfirst($$part); } $result =~ s/^:://; print "$$result\n"'); \
 	 PERL_EXIT_CODE=$$?; \
 	 if [ $$PERL_EXIT_CODE -ne 0 ]; then \
 	   echo "ERROR: Perl command failed with exit code $$PERL_EXIT_CODE"; \
@@ -45,8 +45,8 @@ ifeq ($(origin MUTANT_NODE_INDEX), environment)
 	 if [ -z "$$SUBJECT_ARGS" ]; then \
 	   echo "No subjects derived for this node. Skipping."; \
 	 else \
-	   echo "Attempting to run mutant --fail-fast for derived subjects: $$SUBJECT_ARGS"; \
-	   RAILS_ENV=test bundle exec mutant --fail-fast run $$SUBJECT_ARGS; \
+	   echo "Attempting to run mutant for derived subjects: $$SUBJECT_ARGS"; \
+	   RAILS_ENV=test bundle exec mutant run $$SUBJECT_ARGS; \
 	 fi; \
 	 rm -f .all_files.tmp .node_files.tmp
 else

rails_application/Makefile

@@ -45,7 +45,7 @@ ifeq ($(origin MUTANT_NODE_INDEX), environment)
 	 head -n 5 .node_files.tmp || echo "File .node_files.tmp is empty."; \
 	 echo "--- END DEBUG (awk) ---"; \
 	 echo "--- DEBUG: Attempting to derive subject names for this node... ---"; \
-	 DERIVED_NAMES=$$(cat .node_files.tmp | perl -pe 's#^(app/(controllers|models|helpers|jobs|mailers|channels|client_panel)|lib)/##; s#\.rb$$##; s#/(.)#"::" . ucfirst($$1)#eg; s#_([a-z])#uc($$1)#eg; s/(?:^|::)(.)/\u$$1/g'); \
+	 DERIVED_NAMES=$$(cat .node_files.tmp | perl -ne 'chomp; s#^(app/(controllers|models|helpers|jobs|mailers|channels|client_panel)|lib)/##; s#\.rb$$##; my @parts = split /\//; my $result = ""; foreach my $$part (@parts) { $$part =~ s#_([a-z])#uc($$1)#eg; $result .= "::" . ucfirst($$part); } $result =~ s/^:://; print "$$result\n"'); \
 	 PERL_EXIT_CODE=$$?; \
 	 if [ $$PERL_EXIT_CODE -ne 0 ]; then \
 	   echo "ERROR: Perl command failed with exit code $$PERL_EXIT_CODE"; \
@@ -61,8 +61,8 @@ ifeq ($(origin MUTANT_NODE_INDEX), environment)
 	 if [ -z "$$SUBJECT_ARGS" ]; then \
 	   echo "No subjects derived for this node. Skipping."; \
 	 else \
-	   echo "Attempting to run mutant --fail-fast for derived subjects: $$SUBJECT_ARGS"; \
-	   RAILS_ENV=test bundle exec mutant --fail-fast run $$SUBJECT_ARGS; \
+	   echo "Attempting to run mutant for derived subjects: $$SUBJECT_ARGS"; \
+	   RAILS_ENV=test bundle exec mutant run $$SUBJECT_ARGS; \
 	 fi; \
 	 rm -f .all_files.tmp .node_files.tmp
 else