From 215063d0fc74538852de44cd797262ac8d02db22 Mon Sep 17 00:00:00 2001
From: jsteube <jens.steube@gmail.com>
Date: Tue, 12 Jun 2018 16:40:20 +0200
Subject: [PATCH] Fix some formating for -m 7701 and -m 7801 in test.pl

---
 tools/test.pl | 24 +++++++++++++++---------
 1 file changed, 15 insertions(+), 9 deletions(-)

diff --git a/tools/test.pl b/tools/test.pl
index 518748f87..43ebd42e4 100755
--- a/tools/test.pl
+++ b/tools/test.pl
@@ -6350,11 +6350,14 @@ sub gen_hash
 
     $a ^= $c;
     $b ^= $d;
-    if ($mode == 7700) {
-	$tmp_hash = sprintf ("%s\$%08X%08X", $salt_buf, $a, $b);
+
+    if ($mode == 7700)
+    {
+      $tmp_hash = sprintf ("%s\$%08X%08X", $salt_buf, $a, $b);
     }
-    else {
-	$tmp_hash = sprintf ("%s\$%08X%08X", $salt_buf, $a, 0);
+    else
+    {
+      $tmp_hash = sprintf ("%s\$%08X%08X", $salt_buf, $a, 0);
     }
   }
   elsif ($mode == 7800 || $mode == 7801)
@@ -6402,13 +6405,16 @@ sub gen_hash
     $offsetMagicArray += (($e >> 24) & 0xff) % 8;
 
     my $hash_buf = sha1_hex ($word_buf . substr ($theMagicArray_s, $offsetMagicArray, $lengthMagicArray) . $salt_buf);
-    if ($mode == 7800) {
-	$tmp_hash = sprintf ("%s\$%s", $salt_buf, uc $hash_buf);
+
+    if ($mode == 7800)
+    {
+      $tmp_hash = sprintf ("%s\$%s", $salt_buf, uc $hash_buf);
     }
-    else {
-	$tmp_hash = sprintf("%s\$%.20s%020X", $salt_buf, uc $hash_buf, 0);
+    else
+    {
+      $tmp_hash = sprintf("%s\$%.20s%020X", $salt_buf, uc $hash_buf, 0);
     }
-}
+  }
   elsif ($mode == 7900)
   {
     my $cost = 14;