Spelling mistake.

diff --git a/CHANGES b/CHANGES
index 33afc413b796ccbd230f808be3fec05fda430ccc..198291a963ad8eeec08420f36c7ce05d96f7da56 100644 (file)
--- a/CHANGES
+++ b/CHANGES
@@ -5,6 +5,9 @@
 
  Changes between 0.9.1c and 0.9.2
 
+  *) Spelling mistake in C version of CAST-128.
+     [Ben Laurie, reported by Jeremy Hylton <jeremy@cnri.reston.va.us>]
+
   *) Changes to the error generation code. The perl script err-code.pl 
      now reads in the old error codes and retains the old numbers, only
      adding new ones if necessary. It also only changes the .err files if new

diff --git a/crypto/cast/c_enc.c b/crypto/cast/c_enc.c
index 5e6ecb31f5a26b060d2af3c3bf6dd0e68018e1bb..7d861de965929dd59fc1cc43cd2ce06f827fbf64 100644 (file)
--- a/crypto/cast/c_enc.c
+++ b/crypto/cast/c_enc.c
@@ -81,7 +81,7 @@ CAST_KEY *key;
        E_CAST( 9,k,r,l,+,^,-);
        E_CAST(10,k,l,r,^,-,+);
        E_CAST(11,k,r,l,-,+,^);
-       if(!k->short_key)
+       if(!key->short_key)
            {
            E_CAST(12,k,l,r,+,^,-);
            E_CAST(13,k,r,l,^,-,+);
@@ -103,7 +103,7 @@ CAST_KEY *key;
        l=data[0];
        r=data[1];
 
-       if(!k->short_key)
+       if(!key->short_key)
            {
            E_CAST(15,k,l,r,+,^,-);
            E_CAST(14,k,r,l,-,+,^);