Correct reversed naming of SHA chains

Signed-off-by: Tom Eastep <teastep@shorewall.net>
This commit is contained in:
Tom Eastep 2014-11-06 08:18:52 -08:00
parent 6f5de7ef3f
commit 9a6047b3c4

View File

@ -1779,8 +1779,8 @@ sub finalize_script( $ ) {
if ( $file ne '-' ) {
my $sha1sum = generate_sha1;
my $sha1sum1 = join( '-', 'sha-rh', substr( $sha1sum, 0, 20 ) );
my $sha1sum2 = join( '-', 'sha-lh', substr( $sha1sum, -20 ) );
my $sha1sum1 = join( '-', 'sha-lh', substr( $sha1sum, 0, 20 ) );
my $sha1sum2 = join( '-', 'sha-rh', substr( $sha1sum, -20 ) );
@ARGV = ( $tempfile );
$^I = '';