perl-Crypt-IDEA-5.6.0.patch

   1 diff -Naur Crypt-IDEA-1.01/IDEA.xs Crypt-IDEA-1.01patched/IDEA.xs
   2 --- Crypt-IDEA-1.01/IDEA.xs     Sat May 22 22:30:47 1999
   3 +++ Crypt-IDEA-1.01patched/IDEA.xs      Sat Dec 30 06:32:53 2000
   4 @@ -11,6 +11,8 @@
   5
   6  MODULE = Crypt::IDEA           PACKAGE = Crypt::IDEA           PREFIX = idea_
   7
   8 +PROTOTYPES: DISABLE
   9 +
  10  char *
  11  idea_expand_key(key)
  12         char *  key = NO_INIT
  13 @@ -63,7 +65,7 @@
  14                 if (ks_len != sizeof(idea_ks))
  15                         croak("Invalid key schedule");
  16
  17 -               if (output == &sv_undef)
  18 +               if (output == &PL_sv_undef)
  19                         output = sv_newmortal();
  20                 output_len = 8;
  21