Commit 22f6a2b2 authored by Dr. Stephen Henson's avatar Dr. Stephen Henson
Browse files

Make salt detection more robust.

parent a3a426cf

fips/mkfipsscr.pl

+1 −1
Original line number Diff line number Diff line
@@ -598,7 +598,7 @@ END 
		my $saltlen;

		while (<IN>)

			{

			if (/^\s*#\s*salt\s+len:\s+(\d+)\s+$/i)

			if (/^\s*#\s*salt\s+len:\s+(\d+)\s*$/i)

				{

				my $sl = $1;

				print STDERR "$req salt length $sl\n" if $debug;