Key mangling, and elliptic curves.

[catacomb-perl] / keystuff.c

diff --git a/keystuff.c b/keystuff.c
index 6df6cecc825d5ea98c0deb862d3ab9c418dcf7f3..b8c95191f1b6c220047266ee6b072a90d248c452 100644 (file)
--- a/keystuff.c
+++ b/keystuff.c
@@ -1,6 +1,6 @@
 /* -*-c-*-
  *
 /* -*-c-*-
  *

- * $Id: keystuff.c,v 1.2 2004/04/08 01:36:21 mdw Exp $
+ * $Id$

  *
  * Useful key-management functions
  *
  *
  * Useful key-management functions
  *


@@ -28,15 +28,13 @@
 
 /*----- Header files ------------------------------------------------------*/
 
 
 /*----- Header files ------------------------------------------------------*/
 

-/*----- Data structures ---------------------------------------------------*/
-
-/*----- Static variables --------------------------------------------------*/
+#include "catacomb-perl.h"

 
 /*----- Main code ---------------------------------------------------------*/
 
 
 /*----- Main code ---------------------------------------------------------*/
 

-void warn_keyreporter(const char *file, int line, char *err, void *p)
+void warn_keyreporter(const char *file, int line, const char *err, void *p)

 {
 {

-  warn("%s:%i: keyfile error: %s", file, line, msg);
+  warn("%s:%i: keyfile error: %s", file, line, err);

 }
 
 SV *keyerr(int rc)
 }
 
 SV *keyerr(int rc)