catcrypt.c: Don't close output file twice.

[u/mdw/catacomb] / rspit.c

diff --git a/rspit.c b/rspit.c
index e9d5c29..e471508 100644 (file)
--- a/rspit.c
+++ b/rspit.c
@@ -1,13 +1,13 @@
 /* -*-c-*-
  *
- * $Id: rspit.c,v 1.20 2004/04/08 01:36:15 mdw Exp $
+ * $Id$
  *
  * Spit out random numbers
  *
  * (c) 1999 Straylight/Edgeware
  */
 
-/*----- Licensing notice --------------------------------------------------* 
+/*----- Licensing notice --------------------------------------------------*
  *
  * This file is part of Catacomb.
  *
@@ -15,12 +15,12 @@
  * it under the terms of the GNU Library General Public License as
  * published by the Free Software Foundation; either version 2 of the
  * License, or (at your option) any later version.
- * 
+ *
  * Catacomb is distributed in the hope that it will be useful,
  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  * GNU Library General Public License for more details.
- * 
+ *
  * You should have received a copy of the GNU Library General Public
  * License along with Catacomb; if not, write to the Free
  * Software Foundation, Inc., 59 Temple Place - Suite 330, Boston,
@@ -495,7 +495,7 @@ static grand *gen_bbs(unsigned i)
    * The factors of this number are
    *
    *  @p = 1229936431484295969649886203367009966370895964206162032259292413@
-   *      @7754313537966036459299022912838407755462506416274551744201653277@
+   *     @7754313537966036459299022912838407755462506416274551744201653277@
    *     @313130311731673973886822067@
    *
    *  @q = 9798171783943489959487301695884963889684294764514008432498259742@
@@ -619,12 +619,12 @@ static grand *gen_bbs(unsigned i)
 
     /* --- Read the key data --- */
 
-    if ((kk->k.e & KF_ENCMASK) != KENC_STRUCT)
+    if ((kk->k->e & KF_ENCMASK) != KENC_STRUCT)
       die(EXIT_FAILURE, "key is not structured");
-    if ((kd = key_structfind(&kk->k, "n")) == 0)
+    if ((kd = key_structfind(kk->k, "n")) == 0)
       die(EXIT_FAILURE, "key has no subkey `n'");
     if ((kd->e & KF_ENCMASK) != KENC_MP)
-      die(EXIT_FAILURE, "incomatible subkey encoding");
+      die(EXIT_FAILURE, "incompatible subkey encoding");
     m = MP_COPY(kd->u.m);
     key_close(&kf);
   } else {