diff --git a/src/epics/util/feCodeGen.pl b/src/epics/util/feCodeGen.pl index 46a5693edd5b39eedee0f92e3d866dddb0f6b4f7..2fc3c28df665e9766241732d58ac3d372a39b91f 100755 --- a/src/epics/util/feCodeGen.pl +++ b/src/epics/util/feCodeGen.pl @@ -765,11 +765,11 @@ for($kk=0;$kk<$partCnt;$kk++) if ( 0+@duplicates > 0) #If we found 1 or more issues { - my @whole_error = "ERROR - Some part(s) failed the duplicate name check." . - "Two parts, that generate code, with the same name (but diffrent capitalization) were found. " . + my $whole_error = "ERROR - Some part(s) failed the duplicate name check. " . + "Two parts, that generate code, with the same name (but diffrent capitalization) were found.\n" . "This can cause an issue with code generation, please rename one of the parts, from each pair.\n"; - @whole_error = @whole_error . join('', @{$duplicates}); - die @whole_error; + $whole_error = $whole_error . join('', @duplicates); + die $whole_error; } print "Total parts to process $ftotal\n";