Avoid "Type error: 99"...

Rev: lib/modules/Crypto/rsa.pike:1.25

lib/modules/Crypto/rsa.pike

-/* $Id: rsa.pike,v 1.24 2000/06/20 13:03:05 grubba Exp $
+/* $Id: rsa.pike,v 1.25 2000/06/20 15:13:10 grubba Exp $
  *
  * Follow the PKCS#1 standard for padding and encryption.
  */
@@ -285,7 +285,8 @@ string cooked_get_q()
 object set_private_key(bignum priv, array(bignum)|void extra)
 {
   if (extra) {
-    [p, q] = extra[..1];
+    p = extra[0];
+    q = extra[1];
   }
   return ::set_private_key(priv);
 }