From 098f8e73685b8786151ca17b5d6b3feda39ff374 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Henrik=20Grubbstr=C3=B6m=20=28Grubba=29?=
 <grubba@grubba.org>
Date: Tue, 20 Jun 2000 15:03:05 +0200
Subject: [PATCH] Bugfix.

Rev: lib/modules/Crypto/rsa.pike:1.24
---
 lib/modules/Crypto/rsa.pike | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/lib/modules/Crypto/rsa.pike b/lib/modules/Crypto/rsa.pike
index 01ddb32aaf..47b28f2e1b 100644
--- a/lib/modules/Crypto/rsa.pike
+++ b/lib/modules/Crypto/rsa.pike
@@ -1,4 +1,4 @@
-/* $Id: rsa.pike,v 1.23 2000/06/20 10:36:13 grubba Exp $
+/* $Id: rsa.pike,v 1.24 2000/06/20 13:03:05 grubba Exp $
  *
  * Follow the PKCS#1 standard for padding and encryption.
  */
@@ -285,7 +285,7 @@ string cooked_get_q()
 object set_private_key(bignum priv, array(bignum)|void extra)
 {
   if (extra) {
-    [p, q] = extra;
+    [p, q] = extra[..1];
   }
   return ::set_private_key(priv);
 }
-- 
GitLab